当前位置 : 首页 > 信息技术资源 > VB考题1

VB考题1

1.编写VB程序,实现如下功能:在文本框Textl和Text2中分别输入一个整数,单击命令按钮Command1,在列表框List1中显示结果,运行效果如第11题-1图所示。结果包含两列数据,第1列为两数之间的摄氏温度值(间隔1度、升序),第2列为对应的华氏温度值。

~(~ ~(~

第11题-1图                     第11题-2图

 

(1)要使命令按钮Command1上显示的文本改为“转换”,可在其属性窗口(第11题-2图) 中将       属性的属性值修改为“转换”。

 

(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  '(选填字母,从下列A、B、C、D四个选项中选取一项)

t = t1: t1 = t2: t2 = t

End If

i = t1

Do While      ②      '(选填字母,从下列A、B、C、D四个选项中选取一项)

f = i * 9 / 5 + 32    '摄氏温度转换为华氏温度

List1.AddItem ~(~Str(i) + "          " + Str(f)

③      '(填程序代码)

Loop

End Sub

划线①、②处的选项:

A.i <= ~(~t2       B.f <= t2       C.t1 > t2       D. i < f

 


信息技术资源 /
分享:
更多
« 上一篇下一篇 »

相关文章