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

[主观题]

（8 ）有如下程序：Private Sub Form_Click （）n=10i=0Doi=i+nn=n-2Loop While n＞2Print iEnd Su

（8 ）有如下程序：

Private Sub Form_Click （）

n=10

i=0

i=i+n

n=n-2

Loop While n＞2

Print i

End Sub

程序运行后，单击窗体，输出结果为【 10 】。

提问人：网友jiaoer234 发布时间：2022-01-06

参考答案

查看官方参考答案

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

您可能会需要：

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

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

更多“（8 ）有如下程序：Private Sub Form_Cli…”相关的问题

第1题

有如下程序: Private Sub Form_Click（)E=1:F=1 For j=1 To 3 E=E+F:F=F+E Next Print E;F End Su

有如下程序:

Private Sub Form_Click()

E=1:F=1

For j=1 To 3

E=E+F:F=F+E

Print E;F

End Sub

该程序的输出结果是

A．6 6

B．5 8

C．13 21

D．34 55

点击查看答案

第2题

在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Su

在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

Private Sub Command1_Click()

Text1＝"VB programming"

Text2＝Text1

Text1＝"ABCD"

End Sub

程序运行后，单击命令按钮，文本框Text2中显示的内容为【】。

点击查看答案

第3题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序 _______。Dim k As IntegerPrivate Su

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b ＝ b + k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是 _______。

A．7 11

B．5 11

C．76

D．2 1

点击查看答案

第4题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)Su

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮，则窗体上显示的内容是______。

A．5

B．120

C．153

D．160

点击查看答案

第5题

在窗体中有两个文本框分别为Textl和Text2，一个命令按钮Cmmand1，编写如下两个事件过程：Private Su

在窗体中有两个文本框分别为Textl和Text2，一个命令按钮Cmmand1，编写如下两个事件过程：

Private Sub Commandl_Click()

a=Textl．Value+Text2．Value

MsgBox a

End Sub

Private Sub Form_Load()

TextI．Value=“”

Text2．Value=””

End Sub

程序运行时，在文本框Textl中输入78，在文本框Text2中输入87，单击命令按钮，消息框中输出的结果为【】。

点击查看答案

第6题

在窗体中添加一个命令按钮,编写如下程序: Private Sub Sub1（p,m,n) p=p+1:m=m+1:n=n+1 Print "su

在窗体中添加一个命令按钮,编写如下程序:

Private Sub Sub1(p,m,n)

p=p+1:m=m+1:n=n+1

Print "sub1:";p;m;n

End Sub

Private Sub Command1_Click()

a1=1:b=2:c1=3

Call Sub1(a,b1+3,c1)

Print"Main:";a1;b1;c1

End Sub

程序运行后,输出结果为

A．Sub: 2 6 4 Main: 2 6 4

B．Sub: 2 6 4 Main: 2 6 4

C．Sub: 2 6 4 Main: 1 2 3

D．Sub: 2 6 4 Main: 2 2 3

点击查看答案

第7题

在窗体上绘制一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：Private Su

在窗体上绘制一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox("请输入日期(1～31)") t="旅游景点："_ &IIf(a＞0 And a＜=10，"长城:,"")_ &IIf(a＞10 And a＜=20，"故宫","")_ &IIf(a＞20And a＜=31，"颐和园:,"") Text1.Text=t End Sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是()

A．旅游景点：长城故宫

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

点击查看答案

第8题

在窗体中添加一个命令按钮，编写如下程序：Private Sub Subl（p,m,n) p=p+1:m=m+1:n=n+1 Print"su

在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后，输出结果为

A．Sub：2 6 4 Main：2 6 4

B．Sub：2 6 4 Main：2 6 4

C．Sub：2 6 4 Main：1 2 3

D．Sub：2 6 4 Main：2 2 3

点击查看答案

第9题

有如下程序：Private Sub Form_C1ick（)E=1:F=1For j=1 To 3E=E+F:F=F+ENextPrint E;FEnd Sub该程

有如下程序：

Private Sub Form_C1ick()

E=1:F=1

For j=1 To 3

E=E+F:F=F+E