在窗体上有一个过程函数,然后编写如下事件程序,该过程的功能是用选择交换法将10个数排成升序,请
A.108
B.18
C.810
D.出错
在窗体上面有一个列表,然后编写如下两个事件过程: Private Sub Form_Click() List1.RemoveItem 1:List1.RemoveItem2 List1.RemoveItem 3 End Sub Private Sub Form_Loab() List1.AddItem "ItemA ":List1.AddItem "Item B" List1.AddItem"Item C":List1.AddItem "ItemD" List1.AddItem "ItemE" End Sub 运行上面的程序,然后单击窗体,列表框中显示的项目是【 】。
在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Form_Click()
Dim x As Integer
x = Val(InputBox("请输入一个整数"))
Print x + Text1.Text
End Sub
程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。
A.46
B.123
C.3412
D.1234
在窗体上画一个列表框,然后编写如下两个事件过程: Private Sub Form_Click() List1.RemoveItem 1 List1.Removeltem 3 List1.RemoveItem 1 End Sub Private Sub Form. Load() List1.AddItem "ItemA" List1.AddItem "ItemB" List1.AddItem "ItemC" List1.AddItem "ItemD" List1.AddItem "ItemE" End Sub 运行上面的程序,然后单击窗体,列表框中所显示的项目为【 】。
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程: Private Sub Form_Load() Text1.Text="计算机" End Sub Private Sub Text1_Change() Picturel.Print"等级考试" End Sub 程序运行后,在文本框中显示的内容是【 】,而在图片框中显示的内容是【 】。
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2<>0 Then a=a+1 End If a=a+1 Next j Next i Print a End Sub 程序执行后,单击命令按钮,输出结果是【 】。
在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中,则能够触发KeyPress事件的操作是______。
A.单击鼠标
B.双击文本框
C.鼠标滑过文本框
D.按下键盘上的某个键
A.-5
B.25
C.-1
D.1