学进去

编写VB程序，实现如下功能:在文本框Textl和Text2中分别输入一个整数，单击命令按钮Command1,在列表框List1中显示结果，运行效果如图所示。结果包含两列数据，第1列为两数之间的摄氏温度值（间隔1度、升序），第2列为对应的华氏温度值。为实现上述功能，请在划线处填入合适代码或选项。

Private Sub Command1_Click()
Dim t1 As Integer, t2 As Integer
Dim i As Integer, t As Integer
Dim f As Single
List1.Clear
t1 = Val(Text1.Text)
t2 = Val(Text2.Text)
If __________ Then 
t = t1: t1 = t2: t2 = t
End If
i = t1
Do While ____________
f = i * 9 / 5 + 32   
List1.AddItem Str(i) + "          " + Str(f)
____________
Loop
End Sub