一、单项选择题
1. VB中,窗体文件的扩展名是( B    )。
A.bas    B.frm    C.vbp    D.jpg
2. 为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把Scrollbars属性设置为(  D 
A)0   B)1   C)2  D)3
3. 若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是(  C   
A)用鼠标右键单击此按钮       
B)按键盘上的Esc
C)按键盘上的回车键           
D)用鼠标右键双击此按钮
4. 能够获得一个文本框中被选取的文本内容的属性是(  B  )。
AText            BSelText       
CSelLength        DSelStart
5. 使图像框Image控件中的图像自动适应控件的大小应(  C )
A. 将控件的AutoSize属性设为True
B.将控件的AutoSize属性设为False
C. 将控件的Stretche属性设为True
D.将控件的Stretche属性设为False
6. 设窗体上有一个文本框,名称为text1。程序运行后,要求该文本框只能显示信息,不能接受输入的信息,以下能实现该操作的语句是   B   
AText1.MaxLength=0     
BText1.Enabled=Flase
CText1.Visible=Flase       
DText1.Width=0
7. 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是(  C   
AForm1.Name="VisualBasic窗体"
 BForm1.Title="VisualBasic窗体"
 CForm1.Caption="VisualBasic窗体"
  DForm1.Text="VisualBasic窗体”
8. 要想改变一个窗体的标题内容,应该设置以下(  C  )属性的值。
A、Name  B、Title    C、Caption      D、Text
9. 以下叙述中错误的是(
  A) 一个工程中只能有一个Sub Main过程
  B) 窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
  C) 窗体的Hide方法和Unload方法的作用完全相同
  D) 若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体
10. 关于语句If x=1 Then y=1,下面说法正确的是(  C  )。
Ay=1为关系表达式,x=1为赋值语句   
Bx=1y=1均为关系表达式
Cx=1为关系表达式,y=1为赋值语句   
Dx=1y=1均为赋值语句
11. 在代码中将图片文件“mypic.jpg”装入图片框Picture1的语句是( C    )。
APicture1.Picture= "mypic.jpg"
BPicture1.Image= "mypic.jpg"
CPicture1.Picture=LoadPicture("mypic.jpg")
DPicture1="mypic.jpg"
12. 表达式Int(Rnd()*100)可以得到下面()范围内的整数。
A[0,10]    B[0,100]   
C[1,100]    D[0,99]
13. 通过文本框的(  D  )事件过程可以获取向文本框中输入字符的ASCII码值。
AChange    BGotFocus
CLostFocus    DKeyPress
14. 刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是(
  A) 单选按钮    B) 图片框 
C) 通用对话框    D) 文本框
15. 在窗体上已有多个控件,如Text1Text2Command1Command2等,若要使程序一运行焦点就定位在Command2控件上,应将Command2控件的(  B  )属性设置为0
AIndex    BTabIndex   
CTabStop    DEnabled
16. 要想在过程调用后能返回两个结果,下面的过程定义语句能成功的是(  B  )。
ASub Proc1(ByVal n,ByVal m)         
BSub Proc1(n, m)
CSub Proc1(n,ByVal m)               
DSub Proc1(ByVal n, m)   
17. 表示滚动条控件取值范围最大值的属性是(
  A)Max    B)LargeChange   
C)Value  D)Max—Min
18. Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是()。
A.属性、控件和方法      B.属性、事件和方法
C.窗体、控件和过程      D.控件、过程和模块
19. 如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是()。
A.redim  c as integer    B.static c as integer   
C.public c as integer    D.dim c as integer
20. 下列程序执行时会产生()错误。
Dim A(5) As Integer
For I=1 to 6
  A(I)=1
Next I
A.下标越界    B.上标越界     
C.死循环      D.数组变量定义错误
21. 用(  D  )方法,可以将列表框List1中的所有项删除掉。
A.List1.Text=""      B.AddItem    C.RemoveItem    D.Clear
22. 下列关于图像框与图片框控件说法正确的是()。
A.图片框是“容器”控件。
B.图像框是“容器”控件。
C.图片框可以通过 Print 方法显示与接收文本,而图像框不能。
D.图像框比图片框占用内存少,显示速度更快一些。
23. 下列关于文本框说法错误的是()。
A.通过PasswordChar属性,可以设置密码
B.文本框最重要的属性是Caption属性
C.文本框设置多行可以通过Multiline属性
D.文本框可以加滚动条
24. 要使文本框具有垂直滚动条,除了设置其ScrollBar属性外,还应该对其(  A  )属性进行设置。
A、MultiLine B、Caption  C、Border            D、Alignment
25. 若要把"XXX"添加到列表框List1中的第三项,则可执行语句( B )。
AList1.AddItem "XXX", 3           
BList1.AddItem "XXX", 2
CList1.AddItem 3,"XXX"             
DList1.AddItem 2,"XXX"
26. 选中单选按钮控件时,Value属性的值为( A )。
ATrue      BFalse    C0      D1
27. 在窗体上画三个单选按钮,组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是)。
A、Tag    B、index    C、ListIndex  D、name
28. 设置命令按钮的属性时,只有将()属性设置为1Picture属性才有效,否则无效。
    AStyle          BCaption   
CEnabled      DDefault
29. 若要设置文本框最大可接收的字符数,可通过( D )属性来实现。
AMultiLine      BLength     
CMax      DMaxLength
30. 在属性窗口中,下面的()属性是用于设置控件上文字的字体、字型、字号和效果的。
AText          BCaption        CFont        DName
31. 用语句Dim A (-2 To 4) As Integer定义的数组的元素个数是()。
A2      B3      C6        D7
32. 表达式Left("你近来可好?",1)+Right("How do you like",4)+Mid("英语?高数?计算机",4,3)的值是( D )。
A、你高数?  B、你like计算机   
Clike高数?    D、你like高数?
33. 下列可作为VB变量名的是()。
AString        B56a     
Cabc          DCos(x)
34. 如果把一个布尔常量值True赋给一个整型变量,则整型变量的值为(  A    )。
A -1      B 0        C True            D 类型不匹配
35. 用户可以通过设置菜单项的( B  )属性值为False来使该菜单项不可见。
AHide          BVisible         
CEnabled          DChecked
36. 数学表达式 X2+3XY对应的VB算术表达式是:(
A X + 3X * Y          BX * X + 3XY
CX * X + 3 * X * Y    DX * X + 3 * XY
37. 语句Dim Sum  As  Integer作用是:Sum定义为()变量。
(A)printform整型      (B) 单精度型 
(C) 布尔型  (D)字符型
38. 在窗体上画两个文本框(名称分别为text1text2)和一个命令按钮(名称为command1,然后编写如下事件过程:
Private Sub Command1_Click()
  x = 0
  Do While x < 50
  x = (x + 2) * (x + 3)
  n = n + 1
  Loop
  text1.Text = Str(n)
  text2.Text = Str(x)
End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为    B   

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。