单项选择题

执行以下Command1的Click事件过程，在窗体上显示
Option Base 0
Private Sub Command1_Click()
Dim a
a = Array("a", "b", "c", "d", "e", "f", "g")
Print a(1); a(3); a(5)
End Sub

A．abc
B．bdf
C．ace
D．出错

<上一题目录下一题>

热门试题

单项选择题

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

A．空
B．Visual
C．Vis
D．ual

单项选择题

在窗体上画一个命令按钮和一个文本框，并将窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Form_Load() Show Text1.Text= Text1.SetFocus End Sub Private Sub Command1_Click() Text1.Text = Ucase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后，在键盘上输入abcdefg，单击命令按钮，则文本框中显示的内容为

A．abcdefg
B．不显示任何信息
C．ABCDEFG
D．出错

相关试题