VB测试题选择题.doc

《VB测试题选择题.doc》由会员分享，可在线阅读，更多相关《VB测试题选择题.doc（11页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、1.下面所列四组数据中，全部是正确的VB常数的是_。2768,1.34D2，ABCDE，&O17672.函数Len(Str(Val(123.4)的值为_。63.下面表达式中，_Exp（-3.5） _的运算结果与其他三个不同。4.PictureBox、Frame、OptionButton、ListBox、TextBox、Form、ComboBox这7个对象中，具有Caption属性的有_ 3 _个。5.以下叙述中错误的是_如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见_。6.使用_ AddItem _方法可将新的列表项添加到一个列表框中。7.执行下列程序段，输出结果为 _

2、7 0 _。Dim a(10) As IntegerDim i As IntegerFor i = 1 To 10 a(i) = 2 * i - 1Next iPrint a(4);Erase aPrint a(4)8.以下关于动态数组的语句中，正确的是_ReDim a(k+1)：ReDim preserve a(10)_。9.下列程序段的执行结果为_11 3 _。Dim M(10), N(10)i = 3For j = 1 To 5 M(j) = j N(i) = 2 * i + jNext jPrint N(i); M(i)10.执行下面的程序，输出结果是_18 30_。 Option E

3、xplicit Private Sub Form_Click() Dim M As Integer,N As Integer M=1:N=2 Print M+N+F(M,N) M=2:N=1 Print F(M,N)+F(M,N); End Sub Private Function F(X As Integer,Y As Integer) X=X+Y Y=X+3 F=X+Y End Function11.调用由语句Private Sub Convert(Y As Integer)定义的Sub过程时，以下不是按值传递的是_Convert X_。12.下列说法正确的是_模块级变量可在模块通用声明段

4、中用Private和Dim定义_。13.以下不属于Visual Basic系统的文件类型是_.Bat _。14.在VB中有一行程序代码：Text1.Text=Visual Basic,其中的Text1、Text和Visual Basic分别代表_对象、属性、值_。15.以下叙述中错误的是_在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 _。16.VB 中三种文件访问的类型为_顺序、随机、二进制_。17.在使用OPEN语句打开文件时，如果省略for 子句，则打开的文件存取方式为_随机存取方式_。18.向已有数据的C:testtest.txt文件添加数据，正确的文件打开命令是_O

5、pen C:testtest.txt For Append As #511_。19.下面程序段的运行结果为_溢出 _。 Dim s As Integer, i As Integer i = 1: s = 1 Do i = i + s Loop Until s 10 Print i, s20.执行以下语句后，a的值为_溢出 _。 Dim a As Integer a = 1 Do a = a + 2 Loop Until a = 10021.下面程序段的运行结果为_1 2 12 288_。n = 1For i = 1 To 4 For j = 1 To i n = n * j Next jPri

6、nt n;Next i22.若执行定义语句Dim a As Integer，以下给a赋值的语句中，错误的是_a = 2 * 32760 3_。23.执行语句：A = Inputbox(Today, Tomorrow, Yesterday)将显示一个输入对话框，在对话框的输入区中显示的信息是_Yesterday _。24.在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有_Text3.Text=val(Text1.Text) +val( Text2.Text)_可使文本框Text3中显示46。25.下列程序段的执行结果是_False _。X = 2 Y = 1If X

7、 * Y 026.关于语句If x=1 Then y=1，下列说法正确的是_x=1为关系表达式，y=1为赋值语句 _。27.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() N = Text1.Text Select Case N Case 1 To 20 X = 10 Case 2, 4, 6 X = 20 Case Is 10 X = 30 Case 10 X = 40 End Select Text2.Text = X End Sub程序运行后，如果在文本框Tex

8、t1中输入10，然后单击命令按钮，则在Text2中显示的内容是_10 _。28.在菜单过程中使用的事件是利用鼠标_单击 _菜单条来实现的。29.如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入 _- _。30.窗体Form1的名称属性是frm，它的Load事件过程名是 _Form_Load _。31.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分别为Label1.Label2，标题分别为空白和共有文件的标签。编写程序，使得驱动器列表框与目录列表框.目录列表框与文件列表框同步变化，并且在标签Label1中显

9、示当前文件夹中文件的数量。能够正确实现上述功能的程序是: Private Sub Dir1_Change()File1.Path = Dir1.PathLabel1.Caption = File1.ListCountEnd SubPrivate Sub Drive1_Change()Dir1.Path = Drive1.DriveLabel1.Caption = File1.ListCountEnd Sub假定在窗体上建立了通用对话框，其名称为CommonDialog1 ，用下面的语句可以建立一个对话框:CommonDialog1.Action = 2与该语句等价的语句是_CommonDial

10、og1.showsave _。32.在代码编辑器中,如果一条语句太长,无法在一行内写下(不包括注释),要折行书写,可以在行末使用续行字符_一个空格加一个下划字符（ _） _,表示下一行是当前行的继续。33.以下关于图片框控件的说法中，错误的是_用Stretch属性可以自动调整图片框中图形的大小_。34.Sub过程与Function 函数最根本的区别是_前者无返回值，但后者有_。35.执行以下语句后，a的值为_3 _。 Dim a As Integer a = 1 Do a = a + 2 Loop While a = 10036.如果单击一个当前没有被选中的复选框，其他已被选中的复选框会处于_

11、选中_状态。37. 以下关于窗体的描述中，错误的是_执行Unload Form1语句后，窗体Form1消失，但仍在内存中_。在程序中分别将变量IntA、Bl、st和D定义为整型、布尔型、字符串型和日期型，下列赋值语句在执行时会出错的是 Bl=#True# _。Visual Basic布尔运算符Xor ,Or,Not,And中，级别最高的运算符是_Not _。函数Int(Rnd*6+1)的取值范围是_从1到6共6个整数 _。以下使用方法的代码中，正确的是_Text1.SetFocus _。放置控件到窗体中的最迅速的方法是_双击工具箱中的控件 _。下列程序段的执行结果为 _0 2 2 3 _。Di

12、m M(2)For i=1 To 2 M(i)=0Next iK=2For i=1 To k For j=1 TO k M(j)=M(i)+1 Print M(k); Next jNext i假设通用声明段中有语句Option base 1，过程中定义数组：Dim a(6) as Integer，则以下引用数组元素的语句中正确的是_a(n + 3) = a(n+1) + a(n+2)_。下列程序段的执行结果为_18 _ Dim A(5, 5) As IntegerFor i = 1 To 3 For j = 1 To 4 A(i, j) = i * j Next jNext iPrint A(

13、2, 3) + A(3, 4) + A(4, 5)执行下面的程序，输出结果是_18 30_。 Option Explicit Private Sub Form_Click() Dim M As Integer,N As Integer M=1:N=2 Print M+N+F(M,N) M=2:N=1 Print F(M,N)+F(M,N); End Sub Private Function F(X As Integer,Y As Integer) X=X+Y Y=X+3 F=X+Y End Function在语句Public Sub Sort(I As Integer)中，I是一个按_地址_传

14、递的参数。设有如下程序 Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer Dim n As Integer n = InputBox(输入数据) If n b And a c, a, IIf(b c, b,c) print d End Sub有如下程序： Private Sub Command1_Click() x = InputBox(input value) Select Case x Case Is 0 y = x + 1 Case Is = 0 y = x + 2 Case Else y = x + 3 En

15、d Select Print x; y End Sub假设运行时从键盘上输入-5，输出结果是_-5 -2 _。若要将水平滚动条的最小值设为0，最大值设为255，应对其_Min 和 Max_属性进行设置。以下能在窗体Form1的标题栏中显示Visualbasic窗体的语句是_Form1.Caption=Visualbasic窗体_。在窗体上画一个名称为CommonDialog1 的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程: Private Sub Command1_Click() CommonDialog1.FileName = CommonDialog1.Filt

16、er = all file|*.*|(*.DoC）|*.Doc|(*.Txt)|*.Txt CommonDialog1.FilterIndex = 2 CommonDialog1.DialogTitle = VBTest CommonDialog1.Action = 1 End Sub 对于这个程序，以下叙述中错误的是_在该对话框中指定的默认文件类型为文本框（*.Txt）_。以下不能作为Visual Basic变量名的是_12-E_。表达式2+3*45-Sin（X+1）/2中最先进行的运算是_X+1 _。图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是_Stretch_。以下关于函数过程的叙述中，正确的是_函数过程形参的类型与函数返回值的类型没有关系 _。在下面的程序段中，循环体将执行_0_次。 For v=10 To 20 Step -2 print v Next v当一个PictureBox控件的AutoSize属性为True时，在该控件中载入一个比控件的高度与宽度都大的图片时，图片的大小与控件的大小相比是_相等 _。程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是_Load _。设窗体上有一个文本框，名称为Text1,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是_Text1.Enabled=False_。38.