在窗体中添加一个命令按钮,并编写如下程序:Private Sub Command1_ Click()x=1: y=2: z=3x=y: y=z

第1题

在窗体中添加命令按钮cmd，并编写如下程序：Funtion panduan(x As Integer,y As Integer) As Integerpanduan=IIF(x＞y,x,y)End FunctionPrivate Sub cmd_click()Dim a As Integer,b As Integera=4b=7MsgBox panduan( a, b)End Sub打开窗体单击命令按钮，消息框中输出的结果为【 】。

点击查看答案

第2题

在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Text1)，然后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer，y As Integer，z As Integerx=5：y=7：z=0Me!Text1=””Call p1(x,y,z)Me!Text1=zEnd SubSub p1(a As Integer，b As Integer，c As Integer)c=a+bEnd Sub打开窗体运行后，单击命令按钮，文本框中，显示的内容是【 】。

点击查看答案

第3题

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：Private Sub Command_Click()Dim x AS Integer， y As Integer， z As Integerx=5:y=7:z=0Me!Textl=””Call pl(x，y，z)Me!Text1=zEnd SubSub pl(a As Integer，b As Integer，c As Integer)C=a+bEnd Sub打开窗体运行后，单击命令按钮，文本框中显示的内容是【 】 。

点击查看答案

第4题

在窗体上画一个名称为Command1 的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click( ) Dim x,y,z As Integer x=5 y=7 z=0 Texttext = " " Call P1 (x,y,z) TextText = Str(z) End Sub Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后，如果单击命令按钮，在文本框中显示的内容是 ______。A．0B．12C．Str(z)D．没有显示

点击查看答案

第5题

在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框，然后编写如下程序； ( ) Private Sub Commandl_Click() Dim x，y，z As Integer x=5：y＝7：z=O Text1．Text="" Call Pl(x，y，z) TextText＝Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End SubA．0B．12C．Str(z)D．没有显示

点击查看答案

第6题

在窗体上画一个命令按钮，然后编写如下代码。运行程序后，单击命令按钮，依次在输人对话框中输入2，7，5，3，8，5，12，6，12，在窗体上输出的结果是______。 Private Sub Command1 Click() z=5 Do Until z＜＞5 x=InputBox<“请输入x值”) x=Val(x) y=InputBox(“请输入y值”) y=Val(y) z=InputBox(“请输入z值”) z=Val(z) y=x+y+2 * z Loop Print y End SubA．19B．21C．42D．19

点击查看答案

第7题

在窗体中添加一个命令按钮，并编写如下程序： Private Sub Command1_CliCk() X=1∶Y=2∶Z=3 X=Y∶Y=Z∶Z=X Print Z End Sub 程序执行后，输出的结果是______。A．3B．0C．2D．1

点击查看答案