单项选择题

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：　Private Sub Command1_Click() 　　strText = InputBox("请输入") 　　Text1.Text = strText 　End Sub 　Private Sub Text1_Change() 　　Label1.Caption = Right(Trim(Text1.Text), 3) 　End Sub 　程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是

A．空
B．abcdef
C．abc
D．def

<上一题目录下一题>

热门试题

单项选择题

有如下事件过程，当同时按下转换键Shift和功能键F5时其最后输出的信息是（）。Const ShiftKey=1Const CtrlKey=2Const Key_F5=&H74Const Key_F6=&H75Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)If KeyCode=Key_F5 And Shift=ShiftKey ThenPrint Press Shift+F5 ElseIf KeyCode=Key_F6 And Shift=CtrlKey ThenPrint Press Ctrl+F6 End IfEnd Sub

A．无任何信息
B． Press Shift+F5
C． Press Ctrl+F6
D．程序出错

单项选择题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click()n = Val(Text1.Text)For i = 2 To nFor j = 2 To sqr(i)If i Mod j = 0 Then Exit ForNext jIf j > Sqr(i) Then Print iNext iEnd Sub该事件过程的功能是（）。

A．输出n以内的奇数
B．输出n以内的偶数
C．输出n以内的素数
D．输出n以内能被j整除的数

相关试题