单选题在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如
Private Sub Command1_Click()
CommonDialogl. Flags = vbOFNHideReadOnly
CommonDialogl. Filter =" All Files(*.*)|*. * |Text Files(*.txt)|*. txt
CommonDialogl. FilterIndex = 1
CommonDialogl. ShowOpen
MsgBox CommonDialogl. FileName End Sub
程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是
A. All Files(*.*)
B. Text Files(*.txt)
C. Batch Files(*.bat)
D. All Files(*. *)|Text Files(*.txt)
单选题在窗体上建立通用对话框需要添加的控件是
____
。
单选题设工程中有2个窗体：Form1、Form2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为"Teacher"，所有菜单都可见；否则看不到"成绩录入"菜单项。为此，某人在Form1窗体文件中编写如下程序：PrivateSubText11_KeyPress(KeyAsciiAsInteger) IfKeyAscii＝13Then IfText1.Text＝"Teacher"Then Form2.input.Visible＝True Else Form2.input.Visible＝False EndIf EndIf Form1.Hide Form2.ShowEndSub程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是( )。
单选题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后，单击命令按钮，在输入对话框中输入123，则在窗体上输出的内容为( ) A) 123345 B) 468 C) 123 D) 345
单选题设置复选框或单选钮的标题对齐方式的属性是( )。 A) Aligh B) Style C) Alignment D) Sorted
单选题下列可以激活属性窗口的操作是___________。
A.用鼠标双击窗体的任何部位
B.执行“工程”菜单中的“属性窗口”命令
C.按Ctrl+F4键
D.按F4键
单选题窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序：PrivateSubcommand1_Click()DimnIfText1.Text＜＞"123456"Thenn=n+1Print"口令输入错误"&n&"次"EndIfEndSub希望程序运行时得到下图1所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是下图2所示的效果，程序需要修改。下面修改方案中正确的是______。图1图2
单选题执行以下程序段后，整型变量C的值为______。 a=24 b=328 Select Case b/10 Case 0 c=a*10+b Case 1 to 9 c=a*100+b Case 10 to 99 c=a*10000+b End Select
单选题可以用InputBox函数产生“输入对话框”。执行语句sf$=(InputBox(“请输出字符串”，“字符串对话框”，“字符串”))，当用户输出完毕，按OK按钮后，st$变量的内容是( )。 A) 字符串 B) 请输入字符串 C) 字符串对话框 D) 用户输出的内容
单选题在随机文件中，下列正确的选项是( )。 A．记录号是通过随机数产生的 B．可以通过记录号随机读取记录 C．记录的内容是随机产生的 D．记录的长度是任意的
单选题设在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。要求单击Command1按钮时可把光标移到文本框中。下面正确的事件过程是( ) A．Private Sub Command1_Click() Text1.GotFocus End Sub B．Private Sub Command1.GotFocus End Sub C．Private Sub Command1_Click() Text1.SetFocus End Sub D．Private Sub Command1.SetFocus End Sub
单选题窗体的MouseUp事件过程如下：Private Sub Form_MouseUp(Button As Integer,Shift As Integer，X As Single，Y As Single)……End Sub关于以上定义，以下叙述中错误的是
单选题在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1，2，3，4) j=1 For i=4 To 1 Step -1 s = s + a(i)* j j = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出的结果为
单选题以下选项中，不合法的Visual Basic的变量名是( )。
单选题为了使文本框显示滚动条，除要设置ScrollBars外，还必须设置的属性是______。
A.AutoSize
B.Alignment
C.Multiline
D.MaxLength
单选题窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入
“FormList”，然后单击命令按钮，执行如下程序：
Private Sub Command1_Click()
Text2.Text=UCase(Mid(Text1.Text，5，4))
End Sub
在Text2中显示的是______。
单选题设循环队列的存储空间为Q(1:35)，初始状态为front=rear=35。现经过一系列入队与退队运算后，front=15，rear=15，则循环队列的元素个数为______。
单选题下列表达式中不能判断x是否为偶数的是______。 A) Fix(x/2)=x/2 B) x/2=0 C) x/2=Int(x/2) D) x Mod 2=0
单选题在窗体上有一个名称为Check1的复选框数组(含4个复选框)，还有一个名称为Text1的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的文字罗列在文本框中(见图)。下面能实现此功能的事件过程是()。
单选题窗体上有一个名称为Command1的命令按钮，其单击事件过程如下： Private Sub Command1_Click() Dim s As Double s=0：i=1 Do While i＜6 s=s+i／(i+1)：i=i+1 Loop Print s End Sub 该事件过程的功能是计算一个表达式的值，该表达式是