单项选择题

在窗体上画一个名称为Text1的文本框，并编写如下程序：
Private Sub Form_Load()
Show
Textl.Text=""
Textl.Set Focus
End Sub
Private Sub Form_MouseUp(Button As Inateger,Shift As Integer,X As Single,Y As Single)
Frint"程序设计"
End Sub
Private Sub Textl_KeyDown(KeyCode As InteSer,Shin As Integer)
Print"VisualBasic"；
End Sub
程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是______。

A．Visual Bask
B．程序设计
C．A程序设计
D．ViualBasic程序设计

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl_click() Dim a As Integer,s As Integer a=8 s=1 Do s=sta a=a-1 Loop While a＜=0 Print s=a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。

A．79
B．340
C．97
D．死循环

单项选择题

在窗体上画一个名称为Commandl的命令按钮和两个名称分别为Textl、Text2的文本框，然后编写如下事件过程： PrivateSubCommandl_Click() n=Textl.Text Select Case n Case 1 To 20 x=10 Case2,4,6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是______。

A．10
B．20
C．30
D．40

相关试题