单选题已知文本框的ScrollBars属性设置为3，却看不到任何效果，原因是( )。
单选题假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是
单选题下面不属于软件设计原则的是
单选题假定用下面的语句打开文件： Open "File1.Txt" For Input As #1 则不能正确读文件的语句是( )。 A) Input#1, ch$ B) Line Input#1, ch$ C) ch$=Input$(5, #1) D) read#1, ch$
单选题下列4组控件属性中，属性值的类型不相同的一组是
单选题设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是______。
单选题若在窗体模块的声明部分声明了如下自定义类型和数组：
Private Type ree
Code As Integer
Caption As String
End Type
Dim arr(5)As rec
则下面的输出语句中正确的是______。
单选题假定有一个菜单项，名称为MenuItem，为了在运行时使该菜单项失效(变灰)，应使用的语句为______ 。
单选题如窗体中已经有若干个不同的单选按钮，要把它们改为一个单选按钮数组，在书写窗口中需要进行的操作是
单选题在窗体上有一个名称为Text1的文本框，现在要得到其中按键的ASCII码，应使用它的( )事件。
单选题编写如下程序： Private Sub Command1_Click() Dim n As Integer：Static s As Integer For n=1 To 3 s=s+n Next Print s End Sub 程序运行后，第三次单击命令按钮Command1时，输出结果为
单选题阅读程序：
Function fac(ByVal As Integer)As Integer
Dim temp As Integer
temp=1
For i%=1 To n
temp=temp*i%
Next i%
fac=temp
End Function
Private Sub Form_Click()
Dim nsum As Integer
nsum=1
For i%=2 To 4
nsum=nsum+fac(i%)
Next i%
Print nsum
End Sub
程序运行后，单击窗体，输出结果是______。
单选题下列程序段的输出结果为( )。 Dim M(5, 5), S(5) For i=1 To 5 S(i)=0 For j=1 To 5 M(i, j)=i+j S(i)=S(i)+M(i, j) Next j Next i For Each x In S Print x; Next x
单选题在窗体上画一个命令按钮(名称为Command1)，并编写如下代码： Function Fun1(ByVal a As Integer，b As Integer)As Integer Dim t As Integer t=a—b b=t+a Fun1=t+b End Function Private Sub Command1_Click() Dim x As Integer x=10 Print Fun1(Fun1(x，(Fun1(x，x一1)))，x一1) End Sub 程序运行后，单击命令按钮，输出结果是( )。
单选题有以下函数：Function fun(x As Integer, y As Integer) As Integer Do While x >= y x = x - y Loop fun = xEnd Function则下面语句中与语句x = fun(5, 2) 等效（即为x赋相同值）的语句是
单选题运行下列语句后，在信息提示框内显示的内容是______。
t=MsgBox("Hello",64,"Come")
单选题以下能在窗体Form1的标题栏中显示“VisualBasic窗体”的语句是______。
单选题下面不是键盘事件的是( )。
单选题用菜单编辑器创建菜单时，如果要在一个菜单中添加一条分隔线，正确的操作是______。
单选题在运行程序时，在文本框中输入新的内容，或在程序代码中改变Text的属性值，相应会触发到 A) GotFocus事件 B) Click事件 C) Change事件 D) DblClick事件