1.  假定窗体的名称为"Form1"，则把窗体的标题设置为"hello world"的语句是_____。

• A.Form1="hello world"
• B.Caption="hello world"
• C.Form1.Text="hello world"
• D.Form1.Name="hello world"

2.  下列不能打开代码窗口的操作是_________。

• A.双击窗体
• B.双击窗体上的某个控件
• C.单击窗体
• D.按F7键

3.  为了保存一个Visual Basic应用程序，应当_________。

• A.只保存窗体文件(.frm)
• B.只保存工程文件(.vbp)
• C.分别保存工程文件和标准模块文件(.bas)
• D.分别保存工程文件、窗体文件和标准模块文件

4.  为了装入一个Visual Basic应用程序，应当_________。

• A.只装入窗体文件(.frm)
• B.只装入工程文件(.vbp)
• C.分别装入工程文件和标准模块文件(.bas)
• D.分别装入工程文件、窗体文件和标准模块文件

5.  为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为____________。

• A.1
• B.2
• C.3
• D.4

6.  在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：
    Private Sub Command1_Click()
    Text1.Text="VB Programming"
    Text2.Text=Text1.Text
    Text1.Text="ABCD"
    End Sub
    程序运行后，单击命令按钮，Text1文本框中显示的内容为_______。

• A."VB Programming"
• B."ABCD"
• C." VB Programming ABCD"
• D.空

7.  在设计窗体时双击窗体的任何地方，可以打开的窗口是________。

• A.代码窗口
• B.属性窗口
• C.工程资源管理器窗口
• D.工具箱窗口

8.  Visual Basic应用程序通常由3类模块组成，即窗体模块、标准模块和_______。

• A.通用模块
• B.控件模块
• C.类模块
• D.工程模块

9.  在Visual Basic中，长整数的取值范围是______。

• A.-32768～32767
• B.-2147483648～+2147483647
• C.-32768～32768
• D.-2147483648～+2147483648

10.  单精度浮点数的正值取值范围为_______。

• A.3.402823E+38～1.401298E-45
• B.4.94065D-324～1.797693134862316D+308
• C.1.401298E-45～3.402823E+38
• D.1.797693134862316D+308～4.94065D-324

11.  下列选项中，不是字符串常量的是________。

• A."Visual Basic"
• B."等级考试"
• C.""
• D.//Basic//

12.  在Visual Basic中，为表示钱款而设置的数据类型是_______。

• A.字节型
• B.对象型
• C.布尔型
• D.货币型

13.  下列符号常量的声明中，不合法的是____________。

• A.Const a As Single=1.1
• B.Const a="OK"
• C.Const a As Double=Sin(1)
• D.Const a As Integer="12"

14.  以下能正确定义数据类型TelBook的代码是________。

• A.Type TelBook
          Name As String*10
          TelNum As Integer
        End Type
• B.Type TelBook
          Name As String*10
          TelNum As Integer
        End TelBook
• C.Type TelBook
          Name String*10
          TelNum Integer
        End Type TelBook
• D.Typedef TelBook
          Name String*10
          TelNum Integer
        End Type

15.  下列关于声明变量的说法中，错误的是____________。

• A.用显式声明变量的关键字Dim，Private，Static或Public来声明变量的类型
• B.用类型说明符标记变量类型，类型说明符有：%，&，!，#，@，$
• C.用DefType语句声明变量的类型，其中Type是类型标志
• D.用Type<数据类型名>/End Type语句声明记录类型变量

16.  如果一个变量未经定义就直接使用，则该变量的类型为____________。

• A.Integer
• B.Byte
• C.Boolean
• D.Variant

17.  如果将布尔常量值True赋值给一个整型变量，则整型变量的值为____________。

• A.0
• B.-1
• C.True
• D.False

18.  下列关于变量的作用域的说法中不恰当的是____________。

• A.根据变量的定义位置和使用的变量定义语句的不同，Visual Basic中的变量分为局部变量和全局变量两类
• B.在不同的过程中可以定义相同名字的局部变量，它们之间没有任何关系
• C.当同一窗体内的不同过程使用相同的变量时，必须定义窗体层变量
• D.默认声明一般只适用于局部变量

19.  下列表达式中，在Visual Basic中不合法的函数是_________。

• A.Exp(X)
• B.Sin(X)
• C.Cos(Z)
• D.Log[D］

20.  Int(20*Rnd)产生的随机整数的区间是_______。

• A.[1,20］
• B.[0,20］
• C.[1,19］
• D.[0,19］

21.  表达式Int(-20.45)的值是________。

• A.-21
• B.-20
• C.20
• D.21

22.  已知X＞Y，A＞B，能正确表示它们之间关系的式子是_______。

• A.Sgn(Y-X)-Sgn(A-B)＜0
• B.Sgn(Y-X)-Sgn(A-B)=-2
• C.Sgn(Y-X)-Sgn(A-B)=0
• D.Sgn(Y-X)-Sgn(A-B)=-1

23.  函数UCase("basic")的值为________。

• A.Visual
• B.basic
• C.VISUAL
• D.BASIC

24.  如果在立即窗口中执行以下操作
      m=123:n=145
      p=Len(Str$(m)+Str$(n))
      Print p
  则输出的结果是__________。

• A.2
• B.4
• C.5
• D.8

25.  语句Print "Int(-13.2)=";Int(-13.2)的输出结果为__________。

• A.Int(-13.2)=-13.2
• B.Int(-13.2)=13.2
• C.Int(-13.2)=-13
• D.Int(-13.2)=-14

26.  在窗体上画一个命令按钮，然后编写如下事件过程：
    Private Sub Command1_Click()
        s=InputBox("Please input Password:")
        If s <> "car" Then
            Print "您无权使用!"
        Else
            Print "谢谢使用!"
        End If
      End Sub
    程序运行后在输入框中输入"car"，则输出结果为__________。

• A.您无权使用!
• B.谢谢使用!
• C.什么也没有
• D.程序出错

27.  下列语句的运行结果是________。
      Print Format$("Palace", "<")

• A.PALACE
• B.palace
• C.Palace
• D.错误用法

28.  下列语句的运行结果是__________。
      x=Format(2)
      Print x

• A.0
• B.2
• C.4
• D.错误用法

29.  运行下列语句后，在信息提示框内显示的内容是__________。
      t=MsgBox("Hello", 64, "Come")

• A.Hello
• B.64
• C.Come
• D.没有内容

30.  从键盘上输入一个实数nu，利用字符串函数对该数进行处理，如果输出的内容不是字符END，则程序输出的内容是__________。
      nu=InputBox("nu=")
      n$=Str$(nu)
      p=InStr(n$,".")
      If p＞0 Then
        Print Mid$(n$,p)
      Else
        Print "END"
      End If

• A.用字符方式输出数据nu
• B.输出数据的整数部分
• C.输出数据的小数部分+小数点(包括小数点)
• D.只去掉数据中的小数点，保留所有数字输出

31.  设有语句：
      x=InputBox("输入数值"，"0"，"示例")
    程序运行后，如果从键盘上输入数值10，并按回车键，则下列叙述中正确的是__________。

• A.变量X的值是数值10
• B.在InputBox对话框标题栏中显示的是"示例"
• C.0是默认值
• D.变量X的值是字符串"10"

32.  下列标签属性中属于逻辑型的是________。

• A.Caption
• B.BorderStyle
• C.Visible
• D.Name

33.  窗体上有一个名为Label1的标签，为了使该标签透明并且没有边框，正确的属性设置为________。

• A.Label1.BackStyle=0
        Label1.BorderStyle=0
• B.Label1.BackStyle=1
        Label1.BorderStyle=1
• C.Label1.BackStyle=true
        Label1.BorderStyle=true
• D.Label1.BackStyle=False
        Label1.BorderStyle=False

34.  设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入的信息，以下能实现该操作的语句是________。

• A.Text1.MaxLength=0
• B.Text1.Enabled=False
• C.Text1.Visible=False
• D.Text1.Width=0

35.  窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是________。
      Private Sub Command1_Click()
        Picture1.Picture=LoadPicture("c:＼1.jpg")
        Picture1.Cls
        Picture1.Print "Test"
      End Sub 

• A.窗体无显示，图片框显示图片和文字Test
• B.窗体上出现Test文本，图片框无显示
• C.窗体上出现Test文本，图片框显示图片1.jpg
• D.窗体无显示，图片框只显示Test文字

36.  以下关于Image控件和PictureBox控件的说明中，错误的是________。

• A.Image控件和PictureBox控件都有Picture属性
• B.Image控件和PictureBox控件都支持Print方法
• C.Image控件和PictureBox控件都可以用LoadPicture函数把图形文件装入控件中
• D.Image控件和PictureBox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件

37.  以下关于图片框控件的说法中，错误的是________。

• A.可以通过Print方法在图片框中输出文本
• B.清空图片框控件中图形的方法之一是加载一个空图形
• C.图片框控件可以作为容器使用
• D.用Stretch属性可以自动调整图片框中图形的大小

38.  命令按钮不支持的事件是________。

• A.Click
• B.DblClick
• C.GotFocus
• D.LostFocus

39.  设置复选框或单选按钮标题对齐方式的属性是________。

• A.Align
• B.Style
• C.Sorted
• D.Alignment

40.  在窗体上画两个单选按钮，名称分别为Option1，Option2，标题分别为"宋体"和"黑体"；一个复选框，名称为Check1，标题为"粗体"；一个文本框，名称为Text1，Text属性为"改变文字字体"。要求程序运行时，"宋体"单选按钮和"粗体"复选框被选中，则能够实现上述要求的语句序列是________。

• A.Option1.Value=True
        Check1.Value=False
• B.Option1.Value=True
        Check1.Value=True
• C.Option2.Value=False
        Check1.Value=True
• D.Option1.Value=True
        Check1.Value=1

41.  窗体上有一个按钮和一个列表框(Sorted属性为True)，执行下列过程后的输出结果为________。
      Private Sub Command1_Click()
        List1.AddItem "China"
        List1.AddItem "Great"
        List1.AddItem "Is",1
        List1.AddItem "!",3
        Print List1.List(2)
      End Sub

• A.China
• B.Great
• C.Is
• D.!

42.  给程序的空白行选择适当的语句。该程序段的功能是：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除。程序如下：
      Do While List2.ListCount
        ________
        List2.RemoveItem 0
      Loop

• A.List1.AddItem List2.List(0)
• B.List1.AddItem List2.Text
• C.List2.AddItem List1.List(0)
• D.List2.AddItem List1.Text

43.  下列每组控件中，都包含有滚动条的一组控件是________。

• A.ListBox和Label
• B.TextBox和DriveListBox
• C.ComboBox和CheckBox
• D.FileListBox和DirListBox