填空题

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=3 Call f1 Call f2 MsgBox x End Sub Private Sub f1() x=x*x End Sub Private Sub f2() Dim x As Integer x=x+4 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

【参考答案】

I
<上一题 目录 下一题>
热门 试题

填空题
有一个VBA计算程序的功能如下：该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为：Text1、Text2、Text3和Text4，3个按钮分别为：清除(名为C1)、计算(名为C2)和退出(名为C3)。窗体打开运行后，单击“清除”按钮，则清除所有文本框中显示的内容；单击“计算”按钮，则计算在Text1、Text2和Text3三个文本框中输入的3个数字的和并将结果存放在名为Text4的文本框中；单击“退出”按钮则退出程序。请将下列程序填空补充完整。Private Sub C1_Click()Me!Text1= Me!Text2= Me!Text3= Me!Text4= End SubPrivate Sub C2_Click()If Me!Text1= 0r Me!Text2= 0r Me!Text3= ThenMsgBox 三个文本框都要输入值! ______Me!Text4=(Val(Me!Text1)+Val(Me!Text2)+______)End IfEnd SubPrivate Sub C3_Click()Docmd.______End Sub
填空题
下面程序的输出结果为______。a=4.5b=-123c=Len(Str(b)+Str(a))MsgBox c
相关试题