

1、单选题:
与传统的程序设计语言相比,Visual Basic最突出的特点是 。
选项:
A: 结构化程序设计
B: 程序开发环境
C: 事件驱动编程机制
D: 程序调试技术
答案: 【 事件驱动编程机制 】
2、单选题:
在设计阶段,当按CTRL+R键时,所打开的窗口是 。
选项:
A: 代码窗口
B: 工具箱窗口
C: 属性窗口
D: 工程资源管理器窗口
答案: 【 工程资源管理器窗口】
3、单选题:
Visual Basic中窗体文件的扩展名是 。
选项:
A: VBP
B: FRM
C: VBW
D: PDM
答案: 【 FRM】
4、填空题:
为了把一个Visual Basic应用程序装入内存,只要装入 文件即可。
答案: 【 工程】
1、单选题:
与传统的程序设计语言相比,Visual Basic最突出的特点是 。
选项:
A: 结构化程序设计
B: 程序开发环境
C: 事件驱动编程机制
D: 程序调试技术
答案: 【 事件驱动编程机制】
2、单选题:
Visual Basic中窗体文件的扩展名是 。
选项:
A: VBP
B: FRM
C: VBW
D: PDM
答案: 【 FRM 】
3、单选题:
以下关于Visual Basic特点叙述中,错误的是 。
选项:
A: Visual Basic是采用事件驱动编程机制的语言
B: Visual Basic程序既可以编译运行,也可以解释运行
C: 构成Visual Basic程序的多个过程没有固定的执行顺序
D: Visual Basic程序不是结构化程序,不具备结构化程序的三种基本结构
答案: 【 Visual Basic程序不是结构化程序,不具备结构化程序的三种基本结构】
4、单选题:
VB窗体设计器的主要功能是______。
选项:
A: 建立用户界面
B: 编写源程序代码
C: 画图
D: 显示文字
答案: 【 建立用户界面 】
5、单选题:
以下叙述中错误的是______。
选项:
A: 打开一个工程文件时,系统自动装入与该工程有关的窗体、标准模块等文件
B: 保存VB程序时,应分别保存窗体文件及工程文件
C: VB应用程序只能以解释方式执行
D: 事件可以由用户引发,也可以由系统引发
答案: 【 VB应用程序只能以解释方式执行】
6、填空题:
Visual Basic是一种面向______的语言。
答案: 【 对象】
7、填空题:
为了把一个Visual Basic应用程序装入内存,只要装入______文件即可。
答案: 【 工程】
8、填空题:
代码窗口分为左右两栏,左边一栏称为对象框,右边一栏称为 。
答案: 【 事件框】
9、填空题:
Visual Basic应用程序通常由3类模块组成,即窗体模块、 和类模块。
答案: 【 标准模块】
10、填空题:
给窗体或控件命名时,第一个字符必须是__________。
答案: 【 字母】
1、单选题:
决定控件上文字的字体、字形、大小、效果的属性是______。
选项:
A: Text
B: Caption
C: Name
D: Font
答案: 【 Font】
2、单选题:
要使一个标签透明且不具有边框,则应______。
选项:
A: 将其BackStyle属性设置为0,BorderStyle属性设置为0
B: 将其BackStyle属性设置为0,BorderStyle属性设置为1
C: 将其BackStyle属性设置为1,BorderStyle属性设置为0
D: 将其BackStyle属性设置为1,BorderStyle属性设置为1
答案: 【 将其BackStyle属性设置为0,BorderStyle属性设置为0】
3、单选题:
以下能够触发文本框Change事件的操作是______。
选项:
A: 文本框失去焦点
B: 文本框获得焦点
C: 设置文本框的焦点
D: 改变文本框的内容
答案: 【 改变文本框的内容】
4、单选题:
为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为______。
选项:
A: 0
B: 1
C: 2
D: 3
答案: 【 3】
5、单选题:
若设置了文本框的属性PasswordChar = "$",运行程序时向文本框中输入8个任意字符后,文本框中显示的是______。
选项:
A: 8个"$"
B: 1个"$"
C: 8个"*"
D: 无任何内容
答案: 【 8个"$"】
6、单选题:
在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1,Interval属性为1000,要求每一秒在文本框中显示一次当前的时间。程序为:Private Sub Timer1_ ______() TxtTime.Text = TimeEnd Sub在下划线上应填入的内容是______。
选项:
A: Enabled
B: Visible
C: Interval
D: Timer
答案: 【 Timer】
7、单选题:
要把一个命令按钮设置成无效,应设置的属性是______。
选项:
A: Visible
B: Enabled
C: Default
D: Cancel
答案: 【 Enabled 】
8、单选题:
要使两个单选按钮属于同一个框架,正确的操作是______。
选项:
A: 先画一个框架,再在框架中画两个单选按钮
B: 先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中
C: 先画两个单选按钮,再画框架将单选按钮框起来
D: 以上三种方法都正确
答案: 【 先画一个框架,再在框架中画两个单选按钮】
9、单选题:
通过改变选项按钮控件的______属性值,可以改变单选按钮的选中状态。
选项:
A: Value
B: Style
C: Appearance
D: Caption
答案: 【 Value 】
10、单选题:
在列表框中当前被选中的列表项的序号是由下列______属性表示。
选项:
A: List
B: Index
C: ListIndex
D: TabIndex
答案: 【 ListIndex】
11、填空题:
为了使标签能自动调整大小以显示全部文本内容,应把标签的______属性设置为True。
答案: 【 AutoSize】
12、填空题:
为了在按下[ESC]键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是__________。
答案: 【 Cancel】
13、填空题:
为了在运行时把e:pic文件夹下的图形文件aa.jpg装入图片框Picture1,所使用的语句是___________________________________。
答案: 【 Picture1.Picture=LoadPicture(“e:picaa.jpg”)】
14、填空题:
计时器事件之间的间隔通过__________属性设置。
答案: 【 Interval】
15、填空题:
一个控件在窗体上的位置由Top和Left属性决定,其大小由Width和______属性决定。
答案: 【 Height】
1、单选题:
以下变量名中不合法的是______。
选项:
A: a5b
B: _xyz
C: a_b
D: andif
答案: 【 _xyz】
2、单选题:
执行语句 Dim X, Y As Integer 后,______。
选项:
A: X 和Y 均被定义为整型变量
B: X和Y被定义为变体类型变量
C: X被定义为整型变量,Y被定义为变体类型变量
D: X被定义为变体类型变量,Y被定义为整型变量
答案: 【 X被定义为变体类型变量,Y被定义为整型变量】
3、单选题:
在Visual Basic中,表达式3 * 25 Mod 3的值是______。
选项:
A: 1
B: 0
C: 3
D: 出现错误提示
答案: 【 3】
4、单选题:
设a=4,b=5,c=6,执行语句Print a<b And b<c后,窗体上显示的是____。
选项:
A: True
B: False
C: 出错信息
D: 0
答案: 【 True】
5、单选题:
以下不能输出Program的语句是______。
选项:
A: Print Mid("VBProgram",3,7)
B: Print Right("VBProgram",7)
C: Print Mid("VBProgram",3)
D: Print Left("VBProgram",7)
答案: 【 Print Left("VBProgram",7)】
6、单选题:
执行以下程序段后,变量c$的值为______。a$ = "Visual Basic Programming"b$ = "C++" c$ = UCase(Left$(a$, 7)) & b$ & Right$(a$, 12)
选项:
A: Visual Basic Programming
B: VISUAL C++ Programming
C: Visual C++ Programming
D: VISUAL BASIC Programming
答案: 【 VISUAL C++ Programming】
7、单选题:
以下语句的输出结果是______。Print Format$("32548.5","000,000.00")
选项:
A: 32548.5
B: 32,548.5
C: 032,548.50
D: 32,548.50
答案: 【 032,548.50】
8、单选题:
可以产生30~50(含30和50)之间的随机整数的表达式是______。
选项:
A: Int(Rnd*21+30)
B: Int(Rnd*20+30)
C: Int(Rnd*50-Rnd*30)
D: Int(Rnd*20+50)
答案: 【 Int(Rnd*21+30)】
9、单选题:
在Visual Basic代码中,将多个语句合并写在一行上的符号是______。
选项:
A: 撇号(‘)
B: 冒号(:)
C: 感叹号(!)
D: 星号(*)
答案: 【 冒号(:)】
10、单选题:
表达式Abs(-5)+Len("ABCDE")的值是______。
选项:
A: 5ABCDE
B: -5ABCDE
C: 10
D: 0
答案: 【 10】
11、填空题:
表达式String(3,66)的值是______。
答案: 【 BBB】
12、填空题:
语句Print 1 < 2 < -2的输出结果是______。
答案: 【 False】
13、填空题:
语句Print 26.5 Mod 3.5的输出结果是______。
答案: 【 2】
14、填空题:
执行下列语句后,输出的结果是______。s$ = "ABCDEFGH"Print InStr(s$, "EFG")
答案: 【 5】
15、填空题:
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:Private Sub Command1_Click() s$ = InputBox("请输入一个字符串") Text1.Text = s$End SubPrivate Sub Text1_Change() Label1.Caption = UCase(Mid(Text1.Text, 7))End Sub程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串VisualBasic,则在标签中显示的内容是______。
答案: 【 BASIC】
1、单选题:
InputBox函数返回值的类型为 。
选项:
A: 数值
B: 字符串
C: 变体
D: 数值或字符串(视输入的数据而定)
答案: 【 字符串】
2、单选题:
对用MsgBox显示的消息框,下面______是错的。
选项:
A: 可以有一个按钮
B: 可以有两个按钮
C: 可以有三个按钮
D: 可以有四个按钮
答案: 【 可以有四个按钮】
3、单选题:
设有语句:x = InputBox("输入数值","0","示例")程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是_______。
选项:
A: 变量X的值是数值10
B: 在InputBox对话框标题栏中显示的是"示例"
C: 0是默认值
D: 变量X的值是字符串"10"
答案: 【 变量X的值是字符串"10"】
4、单选题:
下列叙述中正确的是 ____ 。
选项:
A: MsgBox语句的返回值是一个整数
B: 如果省略MsgBox语句的第三个参数(Title),则信息框的标题为空
C: 执行MsgBox语句并出现信息框后,不用关闭信息框即可执行其他操作
D: MsgBox语句的第一个参数不能省略
答案: 【 MsgBox语句的第一个参数不能省略】
5、单选题:
窗体上有一个命令按钮Command1,其事件过程如下:Private Sub Command1_Click() x = "VisualBasicProgramming" a = Right(x, 11) b = Mid(x, 7, 5) c = MsgBox(a, , b) End Sub运行程序后单击命令按钮,以下叙述中错误的是 ____ 。
选项:
A: 信息框的标题是Basic
B: 信息框中的提示信息是Programming
C: c的值是函数的返回值
D: MsgBox的使用格式有错
答案: 【 MsgBox的使用格式有错】
6、单选题:
下面关于Visual Basic应用程序的叙述中正确的是 。
选项:
A: Visual Basic应用程序必须先编译,然后解释执行
B: Visual Basic应用程序只能编译运行
C: Visual Basic应用程序只能解释运行
D: Visual Basic应用程序既能解释运行,也能编译运行
答案: 【 Visual Basic应用程序既能解释运行,也能编译运行】
7、单选题:
为了装入一个Visual Basic应用程序,下列说法正确的是 。
选项:
A: 只装入窗体文件(.frm)
B: 只装入工程文件(.vbp)
C: 分别装入工程文件和标准模块文件(.bas)
D: 分别装入工程文件、窗体文件和标准模块文件
答案: 【 只装入工程文件(.vbp)】
8、填空题:
执行下面的语句后,所产生的信息框的标题是 。a = MsgBox("AAAA",,"BBBB","",5)
答案: 【 BBBB】
9、填空题:
在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click() a = InputBox("请输入一个整数:") b = InputBox("请输入一个整数:") Print a + bEnd Sub程序运行后,单击命令按钮,在输入对话框中分别输入321和456,输出结果为 。
答案: 【 321456】
10、填空题:
以下程序段执行后y的值是 。x = 5.7y = Int(x + 0.5)Print y
答案: 【 6】
1、单选题:
有名称为Opiton1的单选按钮,且程序中有语句If Option1.Value = True Then,下面语句中与该语句不等价的是______。
选项:
A: If Option1.Vulue Then
B: If Value=True Then
C: If Option1=True Then
D: If Option Then
答案: 【 If Value=True Then】
2、单选题:
设a=6,则执行语句x = IIF(a>5,-1,0) 后,x的值为______。
选项:
A: 5
B: 6
C: 0
D: -1
答案: 【 -1】
3、单选题:
设a=5,b=6,c=7,d=8,则执行语句x=IIF((a>b) And (c<d),10,20)后,x的值为______。
选项:
A: 10
B: 20
C: 30
D: 200
答案: 【 20】
4、单选题:
在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:Private Sub Command1_Click() a = InputBox("请输入日期(1~31)") t = "去往" & IIf(a > 0 And a <= 15, "杭州", "") _ & IIf(a > 15 And a <= 31, "苏州", "") Text1.Text = t & "方向旅游"End Sub
选项:
A: 去往方向旅游
B: 去往苏州方向旅游
C: 去往杭州方向旅游
D: 去往杭州,苏州方向旅游
答案: 【 去往苏州方向旅游】
5、单选题:
执行下列语句后整型变量a的值是______。If (3 – 2) > 2 Then a = 10ElseIf (10 / 2) = 6 Then a = 20Else a = 30End If
选项:
A: 10
B: 20
C: 30
D: 不确定
答案: 【 30】
6、单选题:
下列程序段的执行结果为______。x = 5y = -20If Not x > 0 Then x = y – 3 Else y = x + 3Print x – y; y – x
选项:
A: -3 3
B: 5 -8
C: 3 -3
D: 25 -25
答案: 【 -3 3】
7、单选题:
下列程序段的执行结果为______。A = "abcd"B = "bcde"e = Right(A, 3)f = Mid(B, 2, 3)If e < f Then Print e + f Else Print f + e
选项:
A: cdebcd
B: cdd
C: cdcd
D: bcdcde
答案: 【 bcdcde】
8、单选题:
执行以下语句后显示结果为______。Dim x As IntegerIf x Then Print x Else Print x – 1
选项:
A: 1
B: 0
C: -1
D: 1
答案: 【 -1】
9、单选题:
以下叙述正确的是______。
选项:
A: Select Case语句中的测试表达式可以是任何形式的表达式
B: Select Case语句中的测试表达式只能是数值表达式或字符串表达式
C: 在执行Select Case语句时,所有的Case子句均按出现的次序被顺序执行
D: 如下Select Case语句中的Case表达式是错误的Select Case x Case 1 To 10 ……End Select
答案: 【 Select Case语句中的测试表达式只能是数值表达式或字符串表达式】
10、单选题:
下列说法不正确的是______。
选项:
A: “=”是赋值符号
B: “=”是判断符号
C: “=”可将右边的值赋给左边
D: “If True = True Then MsgBox "" ” 在VB中通不过
答案: 【 “If True = True Then MsgBox "" ” 在VB中通不过】
11、填空题:
以下程序实现每次单击按钮Command1时,标签在窗体Form1上向右移动100特维,当标签移动出窗体右边界时,再次单击按钮标签将回到窗体的左边界,请填空。Private Sub Command1_Click() If Label1.Left > Form1.Width Then Label1.Left=0 Else __________________________ End IfEnd Sub
答案: 【 Label1.Left=Label1.Left+100】
12、填空题:
工程中有Form1和Form2两个窗体。程序运行时,在Form1中名称为Text1的文本框中输入一个数值(圆的半径),然后单击命令按钮“计算并显示”(其名称为Command1),则显示Form2窗体,且根据输入的圆的半径计算圆的面积,并在Form2的窗体上显示出来。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示“请输入数值数据!”,请填空。Private Sub Command1_Click() If Text1.Text = "" Then MsgBox "请输入半径!" ElseIf Not IsNumeric() Then MsgBox "请输入数值数据!" Else r = Val(Text1.Text) Form2.Show __________.Print "圆的面积是" & 3.14 * r * r End IfEnd Sub
答案: 【 Form2】
13、填空题:
设有整型变量s,取值范围为0~100,表示学生的成绩,有如下程序段: If s >= 90 Then Level = "A"ElseIf s >= 75 Then Level = "B"ElseIf s >= 60 Then Level = "C"Else Level = "D"End If下面用Select Case结构改写上述程序,使两段程序所实现的功能完全相同,请填空。 Select Case s Case _______ >= 90 Level = "A" Case 75 To 89 Level = "B" Case 60 To 74 Level = "C" Case Else Level = "D"End Select
答案: 【 Is】
14、填空题:
有如下程序段:x = -5s = InputBox("请输入s的值:")Select Case s Case Is > 0 y = x + 1 Case Is = 0 y = x + 2 Case Else y = x + 3
备案号:冀ICP备20010840号 2020-2099辉辉网络科技 All Rights Reserved