有如下程序：程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（　　）。

在窗体上画一个文本框，然后编写如下事件过程：

Private Sub Form_Click（）

x = InputBox（"请输入一个整数"）

Print x + Text1.Text

End Sub

程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（ ）。

A．123

B．456

C．479

D．123456

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1 Click()

a= Val(InputBox(“请输入一个整数”))

b=Val(InputBox(“请输入一个整数”))

Print a+b

End Sub

程序运行后，单击命令按钮，在输入对话框中分别输入12和34，输出结果为 ______。

在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：

Dim Flag As Boolean

Private Sub Command1_Click（）

Dim intNum As Integer

intNum=InputBox（"请输入："）

If Flag Then

Print f（intNum）

End If

End Sub

Function f（X As Integer）As Integer

If X<10 Then

Y=X

Else

Y=X+10

End If

f=Y

End Function

Private Sub Form_MouseUp（Button As Integer,Shift As Integer,X As Single,Y As Single）

Flag=True

End Sub

运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为（ ）。

A．0

B．5

C．15

D．无任何输出

在窗体上有个命令按钮，然后编写如下事件过程 m=InputBox("enter the first integer") n=InputBox("enter the second integer") Print n+m 程序运行后，单击命令按钮，先后在两个输入框中分别输入“1”和“5”，则输出结果为

A．1

B．51

C．6

D．15

在窗体上画一个命令按钮，然后编写如下程序：

Dim k As Long

k=1

Do While num

Loop

fun=k

End Function

Private Sub Command1_Click()

Dim n As Long

Dim r As Long

MsgBox r

End Sub

程序运行后，单击命令按钮，在输入对话框中输入234，消息框显示的结果为( )。

（ 32 ）设有以下程序：

Private Sub Form_Click()

X=50

For i=1 To 4

Y=InputBox( “ 请输入一个整数 ” )

Y=Val(y)

If y Mod 5=0 Then

a=a+y

x=y

Else

a=a+x

End If

Next i

Print a

End Sub

程序运行后，单击窗体，在输入对话框中依次输入 15 、 24 、 35 、 46 ，输出结果为

A ） 100

B ） 50

C ） 120

D ） 70

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a=InputBox("请输入一个整数") b=InputBox("请输入一个整数") Print a+b End Sub 程序运行后，单击命令按钮，在输入对话框中分别输入37和18，输出结果为

A．3718

B．55

C．0

D．a+b

在窗体上画1个命令按钮，名称为Command1，然后编写如下程序： Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox(“请输入：”) If Flag Then Print f(intNum) End If End Sub Function f(X as Integer)As Integer If X＜10 Then Y=X Else Y=X＋10 End If f=Y End Function Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X as Single,Y As Single) Flag=True End Sub 运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。

A．0

B．5

C．15

D．无任何输出

在考生文件夹中有一个工程文件execise25.vbp，相应的窗体文件为execise25.timo在在名为Form1的窗体上有一个命令按钮，其名称为Cmd1，标题为“输入”；还有一个文本框，其名称为Text1，初始内容为空白。

程序运行后，单击“输入”命令按钮，显示“输入”对话框。在对话框中输入某个月份的数值(1～12)，然后单击“确定”按钮，即可在文本框中输出该月份所在的季节。例如输入8，将输出“8月份是秋季”，如下图所示。

该程序不完整，请补充完整。

要求：

去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其能正确运行，但不得修改程序的其他部分。最后用原名保存工程文件和窗体文件。

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后，单击命令按钮，在输入对话框中输入123，则在窗体上输出的内容为( )

A．123345

B．468

C．123

D．345