单选题单击一次命令按钮，下列程序代码的执行结果为( )。Private Sub Command1_Click()Dim a As Integer，b As Integer，c，As Integera=2：b=3：c=4PrintP2(c，b，a)End SubPrivate Function P1(x As Integer，y AS Integer，z As Integer)P1=2*x+y+3*zEnd FunctionPrivate Function P2(x As Integer，y As Integer，z As Integer)P2=P1(z，x，y)+xEnd Function
单选题在设计窗体时双击窗体的任何地方，可以打开的窗口是
单选题下列说法正确的是( )。
A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器
B.只有当代码窗体为当前活动窗体时，才能打开菜单编辑器
C.只有当某个窗体为当前活动窗体时，才能打开菜单编辑器
D.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器
单选题为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容，首先应执行的操作是
单选题将数据项“Student”添加到名称为List1的列表框中，并使其成为列表框第一项的语句为
单选题有如下事件过程，当同时按下转换键Shift和功能键F5时其最后输出的信息是（ ）。
Const ShiftKey=1
Const CtrlKey=2
Const Key_F5=&H74
Const Key_F6=&H75
Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)
If KeyCode=Key_F5 And Shift=ShiftKey Then
Print"Press Shift+F5"
ElseIf KeyCode=Key_F6 And Shift=CtrlKey Then
Print"Press Ctrl+F6"
End If
End Sub
单选题要求当鼠标在图片框P1中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是______。
A.Private Sub P1_MouseMove(Button As Integer，Shift As Integer，X As Single，Y
As Single) Print X，Y End Sub
B.Private Sub P1_MouseDown(Button As Integer，Shift As Integer，X As Single，Y
As Single) Picture．Print X，Y End Sub
C.Private Sub P1_MouseMove(Button As Integer，Shift As Integer，X As Single，Y
As Single) P1.Print X，Y End Sub
D.Privme Sub Form_MouseMove(Buuon As Integer，Shift As Integer，X As Single，Y
As Single) P1.Print X，Y End Sub
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下代码： Dption Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10, 12, 21, 32, 24) For i=1 To 5 If x(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。
单选题以下说法中正确的是
单选题要使一个标签透明且不具有边框，则应______。
单选题下列关于顺序文件的描述中，正确的是
单选题设有以下程序： 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，输出结果为
单选题在窗体模块的通用部分有一条语句"Public A As Integer"，则变量A的作用域是( )。
单选题有如下事件过程：
Private Sub Form KeyDown(KeyCode As Integer, Shift As Integer)
If(Button And 1)=1 Then
Print "你好棒啊!"
End If
End Sub
程序运行后，为了在窗体上输出“你好棒啊!”，应当按下的鼠标键是______。
单选题窗体上有一个名为Command1的命令按钮和一个名为Timed的计时器，并有下面的事件过程： Private Sub Command1_Click() Timer1. Enabled=True EndSub Private Sub Form_Load() Timer1. Interval=10 Timed. Enabled=False End Sub Private Sub Timer1_Timer() Command1. Left=Command1. Left+10 End Sub 程序运行时，单击命令按钮，则产生的结果是( )。
单选题按文件的访问方式不同，可以将文件分为{{U}} {{/U}}。
A. 顺序文件、随机文件
B. 文本文件和数据文件
C. 数据文件和可执行文件
D. ASCII文件和二进制文件
单选题在Visual Basic中，所有的窗体和控件都必定具有的一个属性是 ______。
单选题设有下面程序代码：Pfivme Sub Commandl_Click() Dim strAs String，ehAs String str="Visual Basic Programming"：ch="a" n=fun(ch，str)：Print str，n End Sub Private Function fun(ch As String，str As String)As Integer Dim strbufAs String，c As String，n As Integer For k=1 To Len(str) c=Mid＄(str，k，1) Ifc＜＞ch Then strbuf=strbuf&c Else strbuf=strbuf&UCase(c)：n=n+1 End If Next k str=strbuf：fun=nEnd Function程序运行时的输出是
单选题设工程文件包含两个窗体文件Form1．frm、Form2．frm及一个标准模块文件Modulel．bas。两个窗体上分别只有一个名称为Command1的命令按钮。Forml的代码如下：Public X As IntegerPrivate Sub Form Load() x=1：y=5End SubPrivate Sub Commandl_Click() Form2．ShowEnd SubForm2的代码如下：Private Sub Commandl_Click() Print Forml．x．yEnd SubModulel的代码如下：Public y As Integer运行以上程序，单击Forml的命令按钮Commandl，则显示Form2；再单击Form2上的命令按钮Commandl，则窗体上显示的是
单选题在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Open "C:/SDat.txt" For Output AS 1 For i=1 To 5 StuNo=InputBox("请输入学号") StuName=InputBox("请输入姓名") StuEndg=Val(InputBox("请输入英语成绩")) ______ Next i Close #1 End Sub