单选题设有一名称为mnuBold的下拉菜单项，程序运行时，希望达到如下效果：当第一次单击该菜单项时，其标题左侧显示"√"，当第二次单击该菜单项时，其标题左侧的"√"消失，依此交替进行，...... 。则应在mnuBold_Click事件过程中书写的语句是( )。
单选题若变量a未事先定义而直接使用(例如：a=0)，则变量a的类型是______。
A.Integer
B.String
C.Boolean
D.Variant
单选题下列选项中，不是一个算法的基本特征的是
____
。
单选题按文件的访问方式不同，可以将文件分为( )。
单选题设a=5，b=10，则执行 c=Int((b-
单选题窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1，其下标从左到右分别为0、1、2、3，窗体外观如图所示。命令按钮的事件过程如下：PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action=1Case1CD1.ShowSaveCase2CD1.Action=5Case3EndEndSelectEndSub对上述程序，下列叙述中错误的是()。A)单击“打开”按钮，显示打开文件的对话框B)单击“保存”按钮，显示保存文件的对话框C)单击“打印”按钮，能够设置打印选项，并执行打印操作D)单击“退出”按钮，结束程序的运行
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是
单选题下面的程序执行时，将把当前目录下的顺序文件smtextl．txt的内容读入内存，并在文本框Text1中显示出来。在横线处应填写( )。 Privme Sub Command1_Click() Dim inData As String Text1．Text=-"" Open"．＼smtextl．txt"_________As #1 Do While__________ Input #1．inData Text1．TeXt=Text1．Text& inData Loop Close #1 End Sub
单选题关于变量作用域，下列叙述中正确的是
____
。
单选题设有如下通用过程：
Public Function Fun(xStr As String) As String
Dim tStr As String, strL As Integer
tStr="":strL=Len(xStr)
i=strL/2
Do While i＜=strL
tStr=tStr&Mid(xStr,i+1,1)
i=i+1
Loop
Fun=tStr & tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：
Private Sub Command1_Click()
Dim S1 As String
S1="ABCDEF":Text1.Text=LCase(Fun(S1))
End Sub
程序运行后，单击命令按钮，文本框中显示的是
单选题下列关于类、对象、属性和方法的叙述中，错误的是( )。
单选题下列程序段的执行结果为 a=1 b=1 For I=1 To 3 f=a + b a=b b=f Print f； Next I
单选题要使两个单选按钮属于同一个框架，下面三种操作方法中正确的是( )。 ①先画一个框架，再在框架中画两个单选按钮 ②先画一个框架，再在框架外画两个单选按钮，然后把单选按钮拖到框架中 ③先画两个单选按钮，再画框架将单选按钮框起来
单选题窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序：PrivateSubcommandl_Click()DimnIfText1．Text<>”123456”Thenn=n+1Print"口令输入错误"＆n&"次"EndIfEndSUb希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是()。
单选题在程序中发现有语句：Put #1，2，num 并且能够正确执行，因此可以判断
单选题在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i = 1 To 2 For j = 1 To i Print String(i, "Hello") Next j Print Next i End Sub
单选题设有以下程序：
Private Sub Form_Click()
x=50
For i=1 To 4
y=InputBox("请输入一个整数")
y=Val(y)
If y Mod 5=O Then
a=a+y
x=y
Else
a=a+x
End If
Next i
Print a
End Sub
程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为______。
单选题窗体上有一个名称为Command1的命令按钮，其事件过程如下：
Private Sub Command1_Click( )
Dim s As String
Open “c:\File1.txt” For Input As #1
Open “c:\File2.txt” For Output As #2
Do While Not EOF(1)
Input #1,s
Print #2,s
Loop
Close #1,#2
End Sub
关于上述程序，以下叙述错误的是
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form Load() Show Text1. Text="" Text2. Text="" Text1. SetFocus End Sub Private Sub Text1_Change() Text2. Text=Mid(Text1. Text, 8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是______。
单选题在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为______。 Prinvate Sub Command1_Click() For i=1 To 4 x=4 Forj=1 To 3 x=3 For k=1 To 2 x=x+5 Next Next Next Ptint x End Sub A) 13 B) 26 C) 30 D) 40