在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click(
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是
A. 123.45
B.12345.00
C.12345
D.00123.45
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是
A. 123.45
B.12345.00
C.12345
D.00123.45
第1题
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如 Private Sub Command1_Click() CommonDialogl. Flags = vbOFNHideReadOnly CommonDialogl. Filter =" All Files(*.*)|*. * |Text Files(*.txt)|*. txt CommonDialogl. FilterIndex = 1 CommonDialogl. ShowOpen MsgBox CommonDialogl. FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A.All Files(*.*)
B.Text Files(*.txt)
C.Batch Files(*.bat)
D.All Files(*. *)|Text Files(*.txt)
第2题
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:
程序运行后,单击命令按钮,其输出结果为__________。
第3题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后,单击命令按钮,窗体上显示的是()。
A.123.45
B.12345.00
C.12345
D.00123.45
第4题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是
A.123.45
B.12345.00
C.12345
D.00123.45
第5题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
a = 12345
Print Format$(a, "000.00")
End Sub
程序运行后,单击命令按钮,窗体上显示的是()。
A.123.45
B.12345.00
C.12345
D.00123.45
第6题
在窗体上画一个命令按钮,其名称为Command],然后编写如下事件过程:程序运行后,单击命令按钮,消息框输出的是()
A. 48
B. 72
C. 96
D. 128
第7题
在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果为 ()。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i, "*") Print x Next i End Sub Private Sub Command1_Click() p1 (3) End Sub
A.* * * * * *
B.* * * * * *
C.* * *
D.* * * * * *
第8题
在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果是()。
Private Sub p1(n As Integer)
For i=n To 1 Step-1
x=String(i,"*")
Print x
Next i
End Sub
Private Sub Command1_Click()
p1(3)
End SubA)
*B)C)D)
A.*** ** *
B.* ** ****
C.* * *
D.******
第9题
(7)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下事件过程:
Private Sub Command1_Click()
a$="National Computer Rank Examination"
n=Len(a$)
s=0
For i=1 To n
b$=Mid(a$, i, 1)
If b$="n" Then
s=s+1
End If
Next i
Print s
End Sub
程序运行后,单击命令按钮,输出结果是 【7】 。
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!