![](https://lstatic.shangxueba.com/jiandati/h5/images/m_q_title.png)
以下程序运行时连续单击4次窗体,则第4次单击窗体后消息框中的输出结果为【】。PRIVATE FORM_CLICK(
以下程序运行时连续单击4次窗体,则第4次单击窗体后消息框中的输出结果为【 】。
PRIVATE FORM_CLICK()
STATIC A AS INTEGER
DIM B AS INTEGER
B=A+B+1
A=A+B
MSGBOX A&"," &B
END SUB
以下程序运行时连续单击4次窗体,则第4次单击窗体后消息框中的输出结果为【 】。
PRIVATE FORM_CLICK()
STATIC A AS INTEGER
DIM B AS INTEGER
B=A+B+1
A=A+B
MSGBOX A&"," &B
END SUB
现有以下程序代码: Private sub Form_click() Static s as integer s=s+1 text4, text = str(s) End sub 单击窗体4次后,文本框中的内容是()。
A.4
B.0
C.2
D.以上都不对
在窗体上画1一个名称为Command1的命令按钮,并编写以下程序
Private Sub Command1_Click()
Print fun(“ABCDEFG”)
End Sub
Function fun(st As String) As String
stlen=Len(st)
temp=””
For k
fun=temp
End Function
程序运行时,单击命令按钮,则窗体上显示的是()。
A.ABCDEFG
B.AGBFCE
C.GFEDCBA
D.AGBFCED
PrivateSubForm_Click()
DimxAsInteger
StaticyAsInteger
x=x+2
y=y+3
Form1.Print"x=";x,"y=";y
EndSub
写出程序运行时连续单击三次窗体后,Form1上的输出结果。
当程序运行时,在窗体上单击鼠标,以下______ 事件是窗体不会接收到的。
A. MouseDown
B.MouseUp
C.Load
D.Click
设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮,并有以下事件过程:
Private Sub Commandl一Click()
x!==Val(Textl.Text)
Select Case x
Casc Is<-10,Is>=20
Print“输入错误”
Case Is<0
Print 20 x
Case ls<10
Print 20
Case Is=20
Print x+10
End Select
End Sub
程序运行时,如果存文本框中输入一5,则单击命令按钮后的输出结果是
A.5
B.20
C.25
D.输入错误
阅读下列程序并写出程序运行结果。
Private Sub Form_Click()
Dim x As Integer
Static y As Integer
x = x + 2
y = y + 3
Form1.Print "x="; x, "y="; y
End Sub
写出程序运行时连续单击三次窗体后,Form1上的输出结果。
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!