单选题用语句Open”C：＼teac．txt”For Input As#打开文件后，就可以编程序
单选题假定有如下的窗体事件过程： Private Sub Form_Click() aS=”Microsoft Integer”：bS=Right(aS，5) c$=Mid(aS，1，9)：MsgBox aS，34，b$，c$，5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的是
单选题在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii AsInteger) Dim strAs String，n As Integer str=UCase(Chr(KeyAscii)) n=Len(str) Text1．Text=String(n，str) End Sub 程序运行后，如果在文本框中输入字母“p”，则在文本框中显示的内容为( )。
单选题如果要将一个窗体从内存中清除，应使用的语句是( )。
单选题下列语句中正确的是{{U}} {{/U}}。
A.txt1．Text+txt2．Text=txtS．Text
B.Commandl.Name=cmdOK
C.12Label．Caption=1234
D.A=InputBox(Hello)
单选题现有如下一段程序： Private Sub Command1_Click() x=UCase(InputBox(”输入：”)) Select Case x Case”A”Tb”C” Print”考核通过!” Case”D” Print”考核不通过!” Case Else Print”输入数据不合法!” End Select End Sub 执行程序，在输入框中输入字母“B”，则以下叙述中正确的是
单选题在窗体上有一个名称为Command1的命令按钮，并有如下程序： Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y=1:Y=Y+5:X=5+X:Print X,Y End Sub 程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为( )。
单选题在窗体上画一个命令按钮Command1，然后编写下列代码： Private Sub Command1_Click() Dim Arr1(10) As Integer,Art2(10) As Integer n=3 For i=1 To 5 Arr1(i)=i Arr2(n)=2*n+i Next i Print Arr2(n);Arr1(n) End Sub 运行程序后，单击命令按钮，输出结果是( )。
单选题要使单击命令按钮与按下＜Esc＞键实现相同的作用，则应设置
____
属性为True。
单选题在窗体上添加一个R命令按钮，名称为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 Print s End Sub A) 4321 B) 1234 C) 34 D) 12
单选题下列选项中，不属于数据管理员(DB
单选题下列正确的Visual Basic注释语句是
单选题若看到程序中有以下事件过程，则可以肯定的是，当程序运行时( )。 Private Sub Click_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) Print "VB Program" End Sub A) 用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程 B) 用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程 C) 用鼠标右键单击名称为“MouseDown”的控件时，执行此过程 D) 用鼠标左键或右键单击名称为“Click”的控件时，执行此过程
单选题设有如下的程序段： n=0 For i = 1 To 3 For j = 1 To i For k = j To 3 n=n+1 Next k Next j Next i 执行上面的程序段后，n的值为( )。 A) 3 B) 21 C) 9 D) 14
单选题窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件过程如下： Private Sub Command1_Click() CD1. Filter = "All File| *. * |Text File| *. txt|PPT| *. ppt" CD1. FiherIndex = 2 CD1. InitDir = "C: /" CD1. FileName = "default" CD1. ShowSave End Sub 关于上述过程，以下叙述中正确的是( )。 A) 默认过滤器为“*. ppt” B) 指定的初始目录为“C: /” C) 打开的文件对话框的标题为“default” D) 上面事件过程实现保存文件的操作
单选题在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1)，然后编写如下两个事件过程，该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End Sub
单选题假定有如下事件过程： Private Sub Form Click() Dim X As Integer,n As Integer x=1：n=0 Do While x<28 x=x*3：n=n+1 loop Print x，nEnd Sub 程序运行后，单击窗体，输出结果是
单选题组合框是文本框和( )特性的组合。
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() C=“ABCD” For n=1 To 4 Print____ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在横线处应填入的内容为( )。 A) Left(c,n) B) Right(c,n) C) Mid(c,n,1) D) Mid(c,n,n)
单选题执行下面的程序段后，x的值为( )。 x=50 Fori=1 To 20 Step2 x=X+i/5 Next i