单项选择题
在窗体上画一个名称为command1的命令按钮,然后编写如下程序; Option Base 1 Private Sub Command1_Click() Dim arr(4)As String For i=1 To 4 arr(i) = Chr(Asc("A")+(i-1)) Next i For Each b1 In arr Print b1; Next End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ______。
A.ABCD
B.abcd
C.出错信息
D.1 2 3 4
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() CommonDialogl.Flags=cdlOFNHideReadOnly commonDialogl.Filter= All Files(*.*)|*.*| Text Files &_ (*.txt)|*.txt|Batch Files(*.bat)|*.bat CommonDialogl.Filterlndex=1 CommonDialogl.ShowOpen MsgBox CommonDialogl.FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是 ______。
A.AllFiles(*.*)
B.TextFiles(*.tx
C.BatchFiles(*.ba
D.不确定
点击查看答案&解析
单项选择题
以下程序运行后输出的结果是 ______。 a = 12.3 b=-123 m=Len(Str$(A)+Str$(B)) Print m End
A.9
B.5
C.7
D.8
点击查看答案&解析
相关试题
假定有如下的Sub过程: Sub Func(x As...
在窗体上画一个命令按钮,然后编写如下事件...