题目内容（请给出正确答案）

[主观题]

窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是（)。Priva

窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是()。 Private Sub Command1_Clcik() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next k Print s End Sub

A．10

B．14

C．15

D．120

提问人：网友kevinfuyu001 发布时间：2022-01-07

参考答案

查看官方参考答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装简答题APP，拍照搜题省时又省心！

更多“窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后…”相关的问题

第1题

已知一命令按钮的单击事件的代码如下，第一次单击该按钮输出的值为2，第三次单击该按钮输出的值为（）。

PrivateSubCommand1_Click（）

StaticStu（3）AsInteger

ForI=2To3

Stu（I）=Stu（I）+I

NextI

PrintStu（2）；

EndSub

A. 2

B. 4

C. 6

D. 8

点击查看答案

第2题

在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n=Val(Text1.Text) if n\2=n/2 Then f=f1(n) Else f=f2(n) End If Print f;n End Sub Public Function f1(ByRef x) x=x*x f1=x+x End Function Public Function f2(ByVal x) x=x*x f2=x+x+x End Function 程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是()。

A．72 36

B．108 36

C．72 6

D．108 6

点击查看答案

第3题

编写如下事件过程： Private Sub Form-MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Shift=6 And Button=2 Then Print"Hello" End If End Sub 程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下()操作。

A．同时按下Shift键和鼠标左键

B．同时按下Shift键和鼠标右键

C．同时按下Ctrl、Alt键和鼠标左键

D．同时按下Ctrl、Alt键和鼠标右键

点击查看答案

第4题

有如下程序： Private Sub Form_Click() Dim Check,Counter Check=True Counter=0 Do Do While Counter＜20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter,Check End Sub 程序运行后，单击窗体，输出结果为()。

A．15 0

B．20 -1

C．10 True

D．10 False

点击查看答案

第5题

下列程序运行时输出的结果是 Option Base 1 Private Sub Form_Click() Dim x(10) As Integer，y(5) As Integer For i=1 to 10 x(i)=10-i+1 Next For i=1 to 5 y(i)=x(2*i-1)+x(2*i) Next For i=1 to 5 Print y(i) Next End Sub

A．3 7 11 45 19

B．19 15 11 7 3

C．1 3 5 7 9

D．不确定的值

点击查看答案

第6题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在______处应填入的内容为

A．Left(c,n)

B．Right(c,n)

C．Mid(c,n,1)

D．Mid(c,n,n)

点击查看答案

第7题

设有如下过程： Sub ff(x,y,z,) x=y+z End Sub 以下所有参数的虚实结合都是传址方式的调用语句是()。

A．Call ff(5,7,z)

B．Call ff(x,y,z)

C．Call ff(3+x,5+y,z)

D．Call ff(x+y,x-y,z)

点击查看答案

第8题

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(pl(x),y) Text2.Text=pl(x) End Sub Private Function pl(x As Integer)As Integer x=x+y:y=x+y pl=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是()。

A．2 4 2 4

B．2 4 4 8

C．10 10 58 58

D．4 4

点击查看答案

第9题

下列程序段的执行结果为()。 A=0:B=1 A=A+B:B=A+B:Print A:B A=A+B:B=A+B:PrintA:B A=A+B:B=A+B:PrintA:B

A．1 2 3 5 8 13

B．1 1 3 5 8 13

C．1 3 3 4 8 1

D．1 2 5 6

点击查看答案