题目内容
（请给出正确答案）
[单选题]
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubcommand1clickIfx＞0Theny=x^2ElseEndIfPrintyEndsub程序运行后，单击命令按钮，窗体上显示的是（)。
A.-5
B.25
C.-1
D.1
答案
查看答案
重要提示：请勿将账号共享给其他人使用，违者账号将被封禁！
查看《购买须知》>>>
请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
A.-5
B.25
C.-1
D.1
答案
更多“在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubcommand1clickIfx＞0Theny=x^2ElseEndIfPrintyEndsub程序运行后，单…”相关的问题
第1题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是()。
A．4
B．5
C．6
D．7
第2题
Private x As Integer
Private Sub Command1_Click()
x = 5: y = 3
Call Proc(x, y)
Label
1.Caption = x
Label
2.Caption = y
End Sub
Private Sub Proc(ByVal a As Integer, ByVal b
As Integer)
x = a * a
y = b + b
End Sub
运行程序后， 则两个标签中显示的内容分别是
A.5和3
B.25和3
C.25和6
D.5和6
第3题
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
第4题
在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是______。
A．单击鼠标
B．双击文本框
C．鼠标滑过文本框
D．按下键盘上的某个键
第5题
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）。
A)机床
B)车床
C)钻床
D)轴承
第6题
A.Private Sub Listl_ClickLabell.Caption=Listl.ListIndex End Sub
B.Private Sub Listl_ClickLabell.Name=Listl.ListIndex End Sub
C.Private Sub Listl_clickLabell.Name=Listl.Text End Sub
D.Private Sub Listl_ClickLabell.Caption=Listl.Text End Sub
第9题
A．For i=0 To List1．ListCount-1 …… Next
B．For i=0 To List1．Count-1 …… Next
C．For i=1 To List1．ListCount …… Next
D．For i=1 To List1．Count-1 …… Next
第10题
A.Private Sub Text1_ChangeLabel1.Caption = Str（Len（Text1.Text））End Sub
B.Private Sub Textl_ClickLabel1.Caption = str（Len（Text1.Text））End Sub
C.Private Sub Textl_ChangeLabel1.Caption = Text1.TextEnd Sub
D.Private Sub Label1_ChangeLabel1.Caption = Str（Len（Text1.Text））End Sub
