在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For
在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For X=5 To 5 Step-6 Next X Print X End Sub 程序运行后,输出的结果是
A.2.2
B.2.5
C.2.9
D.-1
在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For X=5 To 5 Step-6 Next X Print X End Sub 程序运行后,输出的结果是
A.2.2
B.2.5
C.2.9
D.-1
在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For j=1 To 3 Print Tab(3(j);11((2(j-1); Next j Print End Sub 程序的执行结果为
A.11
B.33
C.11 33
D.11 33 55
在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x = 3 For k=1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是
A.7
B.15
C.157
D.538
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程。
Private Sub Command1_Click()
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.txt) |*.txt
CommonDialog1.FilterIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后,单击命令按钮,将显示一个"打开"对话框,此时在"文件类型"框中显示的是
A.All Files(*.*)
B.Text Files(*.txt)
C.*.txt
D.All Files(*.*) |Text Files(*.*)
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:
Private Sub Command1_Click()
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt
CommonDialog1.FiherIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A.All Files(*.*)
B.Text Files(*.*)
C.*.txt
D.All Files(*.*)|Text Files(*.*)
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程。
Private Sub Command1_Click()
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter= "All Files(*.*) |*.*|Text Files(*.txt)|*.txt
CommonDialog1.FilterIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后,单击命令按钮,将显示一个"打开"对话框,此时在"文件类型"框中显示的是
A.All Files(*.*)
B.Text Files(*.txt)
C.Batch Files(*.bat)
D.All Files(*.*) |Text Files(*.txt)
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程。 Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A.All Files(*.*)
B.Text Files(*.txt)
C.*.txt
D.All Files(*.*)|Text Files(*.*)
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1FilterIndex=1 CommonDialog1ShowOpen MsgBox CommonDialog1FileName End Sub 程序运行后,单击命令按钮,将显示—个“打开”对话框,此时在“文件类型”框中显示的是
A.All Files(*.*)
B.Text Files(*.txt)
C.Batch Files(*.bat)
D.All Files(*.*)|Text Files(*.txt)
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写下列事件过程:
Private Sub Command1_Click()
CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"_
&"(*.txt)|*.txt|Batch Files(*.bat)|*.bat"
CommonDialog1.FilterIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是【 】;如果在对话框中选择d盘temp目录下的tel.txt文件,然后单击“确定”按钮,则在MsgBox信息框中显示的提示信息是【 】。
在窗体画一个命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。
A. ABCDE
B.1 2 3 4 5
C.abcde
D.出错信息
在窗体画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 To 5 a(I)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。
A.ABCDE
B.1 2 3 4 5
C.abcde
D.出错信息
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!