单项选择题

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
Private Sub Commandl_C1ick()
Dim i As Integer, n As Integer
For i=0 To 50
i=i+3
n=n+1
If i＞10 Then Exit For
Next
Textl. Text=Str(n)
End sub
程序运行后，单击命令按钮，在文本框中显示的值是 ( )

A．2
B．3
C．4
D．5

<上一题目录下一题>

热门试题

单项选择题

一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub Fun1() ...... End Sub Func中定义的过程： Public Sub Fun2() ...... End Sub 若要在窗体For2g调用Porm1和Func中分别建立的自定义过程，则调用格式正确的是 ( )

A．Call Form1. Funl()
Func．Fun2()
B．Call Form1. Fun1()
Call Fun2()
C．Form1. Fun1()
Func. Fun2()
D．Fun1()
Fun2()

单项选择题

在窗体中添加一个名称为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) Text1. Text＝Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End Sub

A．0
B．12
C．Str(z)
D．没有显示

相关试题