单选题窗体的MouseDown事件过程 Form MouseDown (Button As Integer，Shift As Integer，X As Single，Y As Single) 有4个参数，关于这些参数，正确的描述是
单选题文件d：＼city．txt的内容如下： BeiJing TianJin ShangHai ChongQing 编写如下事件过程： Pfivate Sub Form Click() Dim InD Open”d：＼citv.txt”For Input As#1 Do While Not EOF(1) Line Input#1．InD Loop Close 1 Print InDEnd Sub运行程序，单击窗体，输出结果是
单选题为了使用窗体输出，使Print方法在Form_Load事件中起作用，必须设置窗体的( )属性。 A) AutoReDraw B) BackColor C) Moveable D) Caption
单选题要使两个单选按钮属于同一个框架，正确的操作是( )。
单选题下列程序的执行结果为______。
n=0
j=1
Do Until n＞2
n=n+1:j=j+n*(n+1)
Loop
Print n; j
单选题窗体上有名称为Command1的命令按钮和名称为Textl的文本框
Private Sub Command1 Click()
Text1．Text="程序设计"
Text1．SeFocus
End Sub
Private Sub Text1 GotFocus()
Text1．Text="等级考试"
End Sub
运行以下程序，单击命令按钮后( )。
单选题下列4组控件属性中，属性值的类型不相同的一组是 A) Label控件的Enabled属性与TextBox控件的Enabled属性 B) OptionButton控件的Value属性与CheckBox控件的Value属性 C) Command控件的Default属性与Command控件的Cancel属性 D) Command控件的Visible属性与Form控件的Visible属性
单选题如图所示，在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime．Text=TimeEndSub在下划线上应填入的内容是()。
单选题假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是( )。
单选题工程资源管理器窗口包含的文件类型有( )种。 A) 2 B) 3 C) 4 D) 5
单选题当a＝1、b＝3、c＝5、d＝4时，执行下面一段程序后，x的值为______。 If a＜b Then If c＜d Then x=1 Else If a＜c Then If b＜d Then x=2 Else x=3 End If Else x=6 End If End If Else x=7 End If
单选题设文本框的PasswordChar属性被设置为“％”。程序运行时，在文本框中输入了“OK”，则产生的结果是 ( )。
单选题假定有如下语句：
answer$=MsgBox("String1",,"String2","String3",2)
执行该语句后，将显示一个信息框，单击其中的“确定”按钮，则answer$的值为
单选题下列程序执行后，在Ctrl和Alt这两个键都被按下的同时，再在文本框中输入“a”，输出结果为 Prirate Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) If Shift ＞ 0 And KeyCode ＞= Asc("A")Then Print KeyCode + Shift End If End Sub
单选题有如下函数过程： Function gys(ByVal x As Integer，ByVal y As Integer) As Integer Do While y＜＞0 reminder = x Mod y x=y y=reminder Loop gys=x End Function以下是调用该函数的事件过程，该程序的运行结果是______。 Private Sub Command7_Click() Dim s As Integer Dim b As Integer a=100 b=25 x=gys(a，b) Print x End Sub
单选题在窗体上画一个命令按钮，名称为Command1，然后编写下列代码： Option Base 0 Private Sub Command1_Click() Dim A1(4)As Integer，A2(4)As Integer For k=0 To 2 A1(k+1)=InputBox("请输入一个整数") A2(3-k)=A1(k+1) Next k Print A2(k) End Sub 程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6．则输出结果为( ) A．0 B．1 C．2 D．3
单选题运行以下程序后，输出的图案是( )。 Form1.Cls A$=String$(10."*") For i=1 To 5 n=10-2*i X$=A$:Y$=Space$(n) Mid$(X$,i+1,n)=Y$ Print X$ Next i
单选题窗体上有一个名称为Command1的命令按钮，其事件过程如下：PrivateSubCommand1_Click()x="VisualBasicProgramming"a=Right(x,11)b=Mid(x,7,5)c=MsgBox(a,,b)EndSub运行程序后单击命令按钮。以下叙述中错误的是
单选题设有如下程序：
Private Sub Form_Click()
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+1
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后，单击窗体，则在窗体上显示的是______。
单选题在窗体上画一个名称为“Command1”，标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”。运行程序时会自动生成5个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在Label2。下列为“计算”按钮的事件过程，请为横线处选择合适的语句()。PrivateSubCommand1_Click()Sum=0Fori=0To4Sum=Sum+______Next______=SumEndSub