题目
一个窗体单击事件过程如下:
Private Sub Form_Click()
X = Val(Text1.Text):Y = Val(Text2.Text)
If X = 0 Or Y = 0 Then Print "不在任何象限内": Exit Sub
If X > 0 And Y > 0 Then Print "IN A"
If X > 0 And Y < 0 Then Print "IN D"
If X < 0 And Y > 0 Then Print "IN B"
If X < 0 And Y < 0 Then Print "IN C"
End Sub
第1题
窗体上有一个命令按钮,命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后,单击命令按钮,输出结果是
A.10
B.14
C.15
D.120
第2题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click() Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub
A.10
B.14
C.15
D.120
第3题
在窗体上放一个文本框Text1,在文本框中输入456,并有如下事件过程, Private Sub Form. Click() x=InputBox("请输入一个整数") Print x+Text1. Text End Sub 单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示是()。
A.123
B.456
C.579
D.123456
第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 S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。
A.VVV
B.Vis
C.sic
D.11
第6题
在窗体上画一个命令按钮,其名称为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
第7题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是
A.VVV
B.Vis
C.sic
D.11
第8题
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() Dim b As Integer b=b+1 End Sub 运行程序,三次单击命令按钮后,变量b的值是: ______。
A.0
B.1
C.2
D.3
第9题
窗体上有一个命令桉钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是()。
Private Sub Command1_click()
Dim a
a=Array(1,2,3,4,5)
Fork=1 To 4
S=S+a(k)
Next k
Print S
End Sub
A.10
B.14
C.15
D.120
第10题
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是()。 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 S=S+a(k) Next k Print S End Sub
A.10
B.14
C.15
D.120
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!