VB程序设计模拟考试题
VB程序设计模拟考试题
一、判断题（10分，每小题1分）
(1). 当定时器控件的interval属性值设置为0时，会连续不断激发Timer事件。( 错)
(2). 有的对象属性既可在属性窗口中设定又可在程序代码中设定。（对）
(3). 在框架内的几个单选按钮中，只能有一个单选按钮的Value属性为True。( 对)
(4). 标签没有Change事件和SetFocus方法。（对）
(5). 事件过程与Sub过程，它们相同点都是事件驱动，而不同的只是事件过程由控件决定，而Sub过程是由用户自定义。（错）
(6). Function函数有参数传递，并且一定有返回值。( 错)
(7). 窗体的Enabled属性值为False时，该窗体上的按钮、文本框等控件就不会对用户的操作做出反应。( 对)
(8). 过程中的静态变量是局部变量，当过程再次被执行时，静态变量的初值是上一次过程调用后的值。（对）
(9). 单选钮控件和复选框控件都具有Value属性，它们的作用完全相同。（错）
(10). Dim i，j as integer 表明i和j都是整型变量。( 错)
二、单选题（15分，每小题1分）
(1). 将通用对话框类型，设置为字体对话框，可修改该控件的（D ）属性。
A．font B．filename C．filter D．action
(2). 文本框中选定的内容，由下列( C )属性反映。
A．Text B．Caption C．Seltext D．sellenght
(3). 以下的VB常量中非法的是( B ) 。
A. “Good Luck”
B. PI
C. 1.5E-03
D. 16.3412
(4). 要使得窗体一开始运行就充满整个屏幕则须设置( C ) 属性。
A. borderstyle
B. appearance
C. windowstate
D. drawmode
(5). 由For k=10 to 0 step 3 ：next k循环语句控制的循环次数是（A ）。
A．0 B．1 C．2 D．3
(6). 以下叙述中正确的是（D ）。
A．对象的Name属性值可以为空
B．窗体的Name属性的值是显示在窗体标题栏中的文本
C．可以在运行期间改变对象的Name属性的值
D．窗体的Name属性指定窗体的名称，用来标识一个窗体
(7). 设a=10,b=1，则以下表达式值为真的是（B ）。
A．a>=b And b>10 B．(a>b)Or(b>0)
C．(a<0)Eqv(b>0) D．(-3+5>a)And(b>0)
(8). 以下叙述中错误的是（C ）。
A．Visual Basic 是事件驱动型可视化编程工具
B．Visual Basic应用程序不具有明显的开始和结束语句
C．Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性
D．Visual Basic中控件的某些属性只能在运行时设置
(9). 下列哪个变量的取法是不正确的（D ）。
A．TName B．T_Temp C．T32 D．T32#
(10). 下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作（A ）。
A．Open “c:\file1.dat”For Output as #1
B．Open “c:\file1.dat”For Input as #1
C．Open “c:\file1.dat”For Append as #1
D．Open “c:\file1.dat”For Write as #1
(11). 要使得窗体在出现之前就完成相关的程序设置可在( C ) 事件中进行编程。
A. linkopen
B. KeyPress
C. load
D. click
(12). 下列表达式中, 其值为0的是( C )。
A. 7/9
B. 7 mod 15
C. 7\9
D. 15 mod 9
(13). 发生在对象上的行为和指使对象识别的动作分别称为（A ）。
A、事件、方法
B、方法、事件
C、属性、方法
D、过程、事件
(14). 下面（ C ）是日期型常量。
A．”12/19/99”B．12/19/99 C．#12/19/99# D．{12/19/99}
(15). 为了把焦点移到某个指定的控件，所使用的方法是（B ）。
A．Visible B．SetFocus C．Refresh D．GetFocus
三、完成程序（10分，每小题5分）
(1). 本程序功能为用InputBox函数任意输入10个整数，然后按数值从大到小的顺序排序输出。请在横线处添加必要的语句实现本程序的功能。
Option Explicit
Private Sub Command1_Click()
Dim i%, j%, k%,n%, tmp%, s(1 to 10) As Integer
n = 10
For i = 1 to n
S(i)=Val(InputBox(”请输入第” & i & “个数”))
Next i
Picture1.Cls
For i = 1 to n - 1
K = i
For j = i + 1 to n
If s(j)>s(k) then k=j
Next j
t=s(i)
s(i)=s(k)
s(k)=s(i)
Next i
For i = 1 to n
Picture1.Print s(i); " ";
Next i
End Sub
(2). 本程序功能为利用随机函数产生50个10到99之间的任意两位整数并按每行10个输出，求出其中的最大数与最小数输出。请在横线处添加必要的语句实现本程序的功能。
Option Explicit
Private Sub Picture1_Click()
Dim i As Integer, n As Integer, mx As Integer, mn As Integer
Dim s(1 to 50) as Integer
Picture1.Cls
Randomize
n = 50
for i = 1 to 50__________________________
s(i) = Fix(Rnd * 90 + 10)
Picture1.Print s(i); " ";
If i mod 10 = 0 Then Picture1.Print
Next i__________________________
mx = s(1)
mn = s(1)
For i = 1 To n
If s(i)>mx______ Then
mx =s(i)
elseif s(i) End If Next i Picture1.Print "最大数：" & mx Picture1.Print "最小数：" & mn End Sub 四、画流程图（5分） 在Raptor环境下画出实现下列算法的流程图，然后将文件保存为“流程图.Rap”并上传。 任意输入一个自然数保存到变量X中，然后判断该数是否为素数，若是素数则输出“该数是素数！”，否则输出“该数不是素数！”。 五、程序设计（共60分） (1).（15分）启动VB考试文件夹下的“vbks1.vbp”工程,其功能是：（1）利用窗体的Load 事件将数字1到10添加到列表框list1中；（2）从列表框list1 选择某个数，然后计算这个数的阶乘并输出到Picture1中，输出格式如下图所示。 注意：文件必须存放在考生文件夹中，并按原文件名保存修改后的文件。 (2).（20分）启动VB考试文件夹下的“vbks2.vbp”工程, 对Picture1控件设计弹出菜单，菜单项目为：产生数、最大值、排序、清除。要求：（1）单击“产生数”菜单随机产生24个3位数的整数，并输出到Picture1中，每行输出8个数；（2）单击“最大值”菜单计算24个数中的最大值，并输出在Picture1中；（3）单击“排序”菜单将24个数从小到大排列并输出到picture1中，每行输出8个数；（4）单击“清除”菜单将Picture1中的显示内容清除。格式如下图所示。 注意：文件必须存放在考生文件夹中，并按原文件名保存修改后的文件。 (3).（25分）启动VB考试文件夹下的“vbks3.vbp”工程，soprts数据类型已在标准模块Module1中定义，其中id、na、blood、age、xb分别用来存取运动员的编号、姓名、血型、年龄和性别。请按以下给定菜单功能设计程序(1) Form1窗体的“保存数据”菜单的功能是将当前输入的某个运动员数据保存到名为：App.path & “\sports.dat”随机文件中，保存后将Text1-Text3内容清除；(2) Form1窗体的“查询数据”菜单的功能是从当前窗体切换到Form2窗体；(3) Form1窗体的“退出”菜单即结束程序；(4)Form2窗体的“查询”菜单功能是将存储运动员数据的文件：App.path & “\sports.dat”打开，查询并打印年龄小于25岁的运动员数据，格式见下图；(5) Form2窗体的“返回”菜单功能是从当前Form2窗体切换回Form1窗体。注意：文件必须存放在考生文件夹中，并按原文件名保存修改后的文件。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。 《VB 程序设计》考试题型练习 一. 填空 1. VB 中的对象具有 属性 、 事件 、和 方法 三种特性，它们是构成对象的三个基本要素。 2. VB 中的常量分为哪三种： 文字常量 、 符号常量（用户自定义常量） 系统内部常量 。 3. 变量的三要素是指： 变量的名 、 变量的数据类型 、 变量的值 。 4. VB 中日期型数据的表示格式为： #mm/dd/YYYY#或#mm-dd-YYYY# 。 5. 在VB 中，“\”是 整除 运算符；“/”是 浮点除 运算符。两个字符串可以使用连接符 &或+ 串接起来。 6. 2 22z y x z y x ++++的VB 表达式为 （x+y+z ）/sqr(x^2+y^2+z^2) 。 7. a ac b b 242-+的VB 表达式为 (b+sqr(b^2-4*a*c))/(2*a) 。 8. 计时器控件的 Interval 属性用于设置Timer 事件发生的时间间隔，为了使计时器控件Timer1每隔0.5秒触发一次Timer 事件，应将该属性设置为 500 ；为了暂时关闭计时器，应把该计时器的 Enable 属性设置为False 。 二. 单选题 1. 如果要使VB 程序运行时不能对文本框中的内容进行编辑，需将文本框的哪个属性设置为True （ D ）。 A ）MultiLine B ）Visible C ）TabStop D ）Locked 2. 表达式Right("asdf", 2)+Ucase("as" )的值为（ A ）。 A ）dfAS B ）asAS C ）dfas D ）asas 3. 执行如下语句： a ＝InputBox("Today", "Tomorrow", "Yesterday") 将显示一个输入对话框，在对话框的输入区中的默认值是（ C ）。 A) Today B) Tomorrow C) Yesterday D) Today Tomorrow Yesterday 4. 设a=3，b=5，则以下表达式值为真的是（ B ）。 A) a>=b And b>10 B) (a>b) Or (b>0) C) (a<0) Or Not (b>0) D) (-3+5>a) And (b>0) ******学院 2009-2010学年第二学期 《VB程序设计》期末考试试卷（A）附答案 一、选择题（2分/题，共60分） （1）要设置窗体上各控件的属性，可以在＿＿＿中进行。 A“窗体布局”窗口B“工程资源管理器”窗口 C“属性”窗口D“对象”窗口 （2）下面程序段＿＿＿能够正确实现目的：如果x （5）双击窗体中的对象后，VB将显示的窗口是＿＿＿。 A工具箱B“工程”窗口 C“代码”窗口D“属性”窗口 （6）下列程序段的执行结果是＿＿＿。 X=int(Rnd()+4) Selectcasex Case5 Print“优秀” Case4 Print“良好” Case3 Print”通过” Caseelse Print”不通过” Endselect A优秀B良好 C通过D不通过 （7）下列哪个不是窗体的属性＿＿＿。 ACaptionBText CControlBoxDBorderStyle （8）设组合框Combo1中有3个项目,则以下能删除最后一项的语句是＿＿＿。 ACombo1.RemoveItemTextBCombo1.RemoveItem2 CCombo1.RemoveItem3DCombo1.RemoveItemCombo1.Listcount （9）窗体BorderStyle属性的功能是＿＿＿。 A设置窗体的边框大小 B设置窗体的边框样式，是否显示标题栏，是否可以调整大小等 C决定是否显示窗体的控制菜单图标与状态控制按钮 D决定窗体的最大化或最小化按钮是否有效 （10）下列可作为VB的变量名的是＿＿＿。 VB复习题 一．选择题 1．使用声明语句建立一个数值型的变量后，VB自动将该变量初始化为（B）。 A．空值 B．0 C．1 D．Null 2．使用声明语句建立一个字符型的变量后，VB自动将该变量初始化为（ A ）。 A．空值 B．0 C．1 D．Null 3．使用声明语句建立一个布尔型的变量后，VB自动将该变量初始化为（A ）。 A．False B．0 C．1 D．True 4．关于 VB 中的运算符，以下说法正确的是（）。 A．“×”是算术运算符，含义是“乘法运算” B．“≠”是关系运算符，含义是“不等于” C．“!”是逻辑运算符，含义是“非” D．“And”是逻辑运算符，含义是“与” 5．对象的三要素是（）。 A．属性、事件、程序 B．属性、事件、方法 C．窗体、事件、程序 D．语句、函数、程序 6．VB中，表达式10<2 Or Not 5>2+6的值为（）。 A．TRUE B．FALSE C．0 D．出错 7．VB中，表达式Mid$("南京工程学院",3,4)的结果是（）。A．"工程学院" B．"京工程学" C．"程学院" D．"工程" 8．在VB中，应用程序被称为（）。 A．工程 B．窗体 C．属性 D．对象 9．VB中，事件Click由（）引发。 A．移动鼠标 B．左键单击鼠标 C．双击鼠标 D．右键单击鼠标 10．VB中，隐藏窗体的方法是（）。 A．Unload B．Stop C．Hide D．Show 11．在Visual Basic中最基本的对象是（），它是应用程序的基石，也是其它控件的容器。 A．文本框 B．命令按钮 C．窗体 D．标签 12．VB窗体文件的扩展名为（）。 A．VBP B．FRM C．BAS D．EXE 第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C ) 程序设计 〖第1题〗『程序设计』(5分)(题号:148) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目：(事件)单击窗体。 ' (响应)求10~20之间所有素数的乘积并输出在窗体上。 ' 将结果存入变量L中。 '------------------------------------------------- '注意：请在指定的事件内编写代码。 '------------------------------------------------- 答案：---------------------- Dim i As Integer Dim j As Integer Dim b As Boolean l = 1 b = False For i = 10 To 20 For j = 2 To i - 2 If i Mod j = 0 Then b = True End If Next If b = False Then l = l * i End If b = False Next Print Str(l) ---------------------- 〖第2题〗『程序设计』(5分)(题号:150) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目：(事件)单击窗体。 ' (响应)求1 - 1/2 + 1/3 - 1/4 + ……+ 1/99 - 1/100的值。' 将结果存入变量J中。 '------------------------------------------------- '注意：请在指定的事件内编写代码。 '------------------------------------------------- 答案：---------------------- Dim i As Integer For i = 1 To 100 If i Mod 2 = 1 Then j = j + 1 / i ElseIf i Mod 2 = 0 Then j = j - 1 / i End If Next Print j ---------------------- 〖第3题〗『程序设计』(5分)(题号:131) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目：(事件)单击窗体。 ' (响应)已知S=1+1/4+1/9+1/16+1/25+…+1/100， ' 结果输出在窗体上。 '------------------------------------------------- '将结果存入变量S中 '------------------------------------------------- 答案：---------------------- Dim i As Integer s = 0 For i = 1 To 10 s = s + 1 / (i ^ i) Next Print (s) ---------------------- 〖第4题〗『程序设计』(5分)(题号:152) 《VB程序设计》期末模拟试卷 一、单项选择 （b ）1．被对象所识别的动作与对象可执行的动作分别称为对象的___________。 A．方法、事件 B．事件、方法 C．事件、属性 D．过程、属性 （ c）2．下列________是Single型变量。 A．Time% B．Name$ C．Sheight! D．CXYZ& （a ）3．以下四个VB的变量名中，合法的是____________。 A．X23 B．$Re C． Len D．3xy （ d）4．在程序中使用 Dim str1,str2 As Long 语句对变量str1、str2进行声明后，下面正确的说法是________。 A. str1是整型，str2是长整型 B. str1是长整型，str2变体型 C. str1、str2都是长整型 D. str1是变体型，str2是长整型 （b ）5．表达式(&O36>31) and (“A”>”B”) 的结果是 ____________。 A．True B．False C．”&O3631AB” D．&O3631 （c ）6．表达式“100” + 100 和表达式“100” & 100的值分别是 ____________。 A．200、200 B．“100100”、“100100” C．200、“100100” D．“100100”、200 （b ）7．以下语句执行时，从键盘上输入Zhao，并按回车键。执行结果是________。 Dim a As String A=InputBox("Input", "", "Name") Print a A．Input B．Zhao C．Name D．空字符串 （b）8．语句Print 4 + 5 \ 6 * 7 / 8 Mod 9的运行结果是________。 A．4 B．5 C．6 D．7 （ d）9．在窗体的通用段声明变量时，不能使用__________ 关键字。 A．Dim VB程序设计编程考试题及答案 1.输入3个数，输出最大的数 Private Sub command1_click() Dim max For i = 1 To 3 n = Val(InputBox("输入第" & i & "个数")) If n > max Then max = n End If Next Print "三个数中最大的数是" ; max End Sub 2.有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根 Private Sub Command1_Click() Dim a, b, c, n a = Text1 b = Text2 c = Text3 n = b * b - 4 * a * c If n >= 0 Then Label4 = "方程有根" Else Label4 = "方程无根" End If End Sub 3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示“恭喜！成绩通过！”， 若小于60，则弹出消息框，显示“抱歉！成绩没有通过！ Private Sub Form_Load() Text1 = "" End Sub Private Sub Command1_Click() Dim n n = Text1 If n > =60 Then Val (MsgBox("恭喜！成绩通过！")) Else Val (MsgBox("抱歉！成绩没有通过！")) End If End Sub 4.输入一年份，判断它是否为闰年，并显示有关信息。（判断闰年的条件是：年份能被4整 除但不能被100整除，或者能被400整除） Private Sub Command1_Click() Dim y% 一、程序设计 '【程序设计】 1.'题目：编写函数fun，函数的功能是：计算两个正整数的最大公约数，并显示。如：'两个数为15、20，结果显示"5" '要求使用Do ... Loop语句来实现。 答案：Do r = m Mod n If r = 0 Then Exit Do m = n n = r Loop fun = n 2.'题目：判断一个数是否是素数。 答案：---------------------- Dim i As Integer Prime = True For i = 2 To Int(Sqr(m)) If m Mod i = 0 Then Prime = False: Exit For Next i ---------------------- 3,'题目：(事件)单击窗体。 ' (响应)求10!的值，并将结果输出到窗体上。 将结果存入变量SUM中。 答案：---------------------- Dim i As Integer sum = 1 For i = 1 To 10 sum = sum * i Next Print sum 4,'题目：(事件)单击窗体。 (响应)求1+2+3+……+100的值，并把结果输出在窗体上。结果存入变量SUM中。 答案：---------------------- Dim i As Integer For i = 1 To 100 sum = sum + i Next Print sum ---------------------- 5,'题目：编写函数fun，函数的功能是：求1到m之间的偶数之积。 答案：---------------------- Dim y As Double y = 1 Dim i As Integer For i = 1 To m VB程序设计期末考试题 一、选择题 1 下列常量中，是Integer类型常量的是（ C ）。 A、123& B、-38844 C、123% D、32768 2 下面选项中()是字符连接运算符. A A、& B、And C、% D、Mod 3 下面关于VB的集成开发环境（IDE）的叙述中，不正确的是（ B ）。 A、IDE是设计、调试、运行VB程序的工具。 B、用户不能随意关闭IDE中的窗口。 C、"窗体设计" 窗口是用来设计应用程序界面（窗体）的。 D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中。 4 len(“vb程序设计”)=( C ) 。 A、 5 B、2 C、 6 D、10 5 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 D A、7 B、0 C、2 D、4 6 赋值语句A=123 + Mid$( “123456”,3,2) 执行后，A=（A）。 A、157 B、12334 C、123 D、"12334" 7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C). A、, B、; C、: D、、 8 将逻辑型数据转换成整型数据时，转换规则是（ D ）。 A、将True转换为 1 ，将False转换为 0 B、将True转换为 1 ，将False转换为 -1 C、将True转换为 0 ，将False转换为 -1 D、将True转换为 -1 ，将False转换为 0 9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D). A、SIN B、4^5 C、3*4 D、x+1 10 如果x=2，则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值（ B ）。 A、不能计算 B、 True C、5 D、False 11 随机产生[10，50] 之间整数的正确表达式是（ D ）。 A、Round( Rnd*50) B、 Int(Rnd*40+10) C、Round( Rnd*51) D、 10+Int(Rnd*41) 12 每建立一个窗体,工程管理器窗口中就会增加一个(C). A、类模块文件 B、工程文件 C、窗体文件 D、程序模块文件 13 INT(100*RND(1))产生的随机整数的闭区间是(B). A、[1,100] B、[0,99] C、[0,100] D、[1,99] 14 下列数据类型中,占用内存最小的是(D). A、Integer B、Single C、Boolean D、Byte 15 VisualBasic是一种()程序设计语言.B A、过程式 B、非过程式 C、机器 D、低级 16 函数Int(10*Rnd)是在(A)范围内的整数. A、[0,9] B、[0,1] C、[1,9] D、[1,10] 17 以下合法的一组Visual Basic用户标识符是 C A、Sum 和 8abc B、a#x 和 Pi C、ForLoop 和 Total D、Const 和 DoWhile 《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 《VB程序设计》期末试卷 一、判断题（每题１分，共10分） （）１、设置属性的语句格式为：“对象名．属性名＝属性值”。 （）２、在窗体或模块文件中声明为Private的过程，只能被本窗体或模块中的过程所调用。（）３、ＶＢ的赋值语句只能给变量赋值。 （）４、在ＶＢ中，字符型常量应使用＂＃＂号将其括起来。 （）５、窗体大小只能通过鼠标拖动窗体边框来设置。 （）６、VB的Double类型数据，可以精确表示其数值范围内的所有实数。 （）７、若用户在键盘上按下一个键，则会产生一个Click事件。 （）８、罗马数制是进位计数制。 （）９、事件过程可以由用户事件触发执行，也可以由其他过程所调用。 （）１０、Do While条件.....Loop和DO Until Not条件.....Loop 两条循环语句，实现循环控制是等效的。 二、单项选择题。（每小题2分，共50分） （）1．设a=“Visual Basic”，下面使b=“Visual”的语句是 A. b=Left(a,6) B. b=Mid(a,1) C. b=Rigth(a,5,5) D. b=Left(a,1,6) （）2．在立即窗口中执行？9>=9，输出结果是 A．0 B．True C．False D. －1 （）3．语句Dim var1 As Boolean作用是:将var1定义为什么类型变量 A.单精度型 B. 整型 C. 布尔型 D.字符型 （）4．Int(—0.618*10)/10的值是 A.—0.7 B.—0.6 C. —1 D. —0.1 （）5．表达式2 + 8 * 6 / 4 Mod 2的值是 A.5 B.2 C.6 D.9 （）6．在VB中快捷键F4打开哪个窗口？ A. 资源管理器窗口 B. 属性窗口 C. 代码窗口 D. 立即窗口 （）7．函数Int( 64 * RND() )的值是在哪个范围内的整数？ A. [0,63] B. [0,64] C. [1,63] D. [1,64] （）8.下列叙述中正确的是 A. 只有窗体才是Visual Basic中的对象 B. 只有控件才是Visual Basic中的对象 C. 窗体和控件都是Visual Basic中的对象 D. 窗体和控件都不是Visual Basic中的对象 （）9.用于Visual Basic程序设计的控件在 A. 工具箱中 B.工具菜单中 C. 工程窗口中 D.工具栏上 （）10．Visual Basic程序中表示续行的字符是 A. ： B. _ C. \ D. ’ （）11．决定按钮显示内容的属性是 A. Text https://www.wendangku.net/doc/cb18820247.html, C. Caption D.BackStyle （）12．下列可以把图形文件c:\地鼠1.jpg装入窗体FORM1中的语句为 A. Form1.Picture= LoadPicture("c:\ 地鼠1.jpg") B. Form1.Handle = " c:\ 地鼠1 .jpg" C. Form1 = LoadPicture("c:\ 地鼠1.jpg") D. Form1 = " c:\ 地鼠1.jpg" （）13．设a、b、c为整型变量，执行以下程序后a、b、c的值是 a=1:b=2:c=3 a=b:b=c:c=a A.2 3 1 B.2 3 2 C.3 2 1 D.1 3 2 （）14．将数学表达式2 2* 5 ) ( cos e b a+ +写成Visual Basic的表达式，其正确的形式是 A.Cos (a+b) ^2+5*exp(2) B.Cos^2(a+b)+ 5*exp(2) C.Cos (a+b) ^2+5*ln(2) D.Cos^2(a+b)+ 5*ln(2) （）15．下列描述图片框和图像框区别，那条是错误的 A．图像框中显示图片一般用作背景 B．图片框有拉伸属性 V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5）。 《VB程序设计》试卷试卷十五 一、判断题（共10分，每题1分，在答题卡上回答，A表示正确，B表示错误） 1. 窗体中只能有一个命令按钮设置Default属性为True，在任何情况下，按 2016/2017 学年第一学期 VB程序设计课程考试试题（A）卷 类别继续教育学院拟题人叶臣 适用专业计算机网络技术专科 （答案写在答题纸上，写在试题纸上无效） 一、选择题（每题2分，共30分） 1、VB窗体文件的扩展名是（）。 A．.frm B．.vbp C．.bas D．.res 2、在窗体上已经创建了一个文本框对象Text1，可以通过（）事件获得输入键值的ASCII码。 A．Change B．LostFocus C．KeyPress D．GotFocus 3、以下子过程和函数过程语句说明合法的是（）。 A．Sub f1( ByVal n%( ) ) B．Sub f1( n%( ) ) As Integer C．Function f1%(f1%) D．Function f1(ByVal n%) As Integer 4、不论何控件，共同具有的属性是（）。 A．Caption B．Name C．ForeColor D．Text 5、InputBox函数返回值的类型是（）。 A．整型B．字符型C．可变类型D．数值或字符型 6、赋值语句：a=123 & Mid("123456",3,2)执行后，a变量中的值是（）。 A．"12334" B．123234 C．123 D．157 7、设a=1,b=3,c=4,表达式：Not a<=c Or 4*c=b^2 And b< >a+c的值是（）。 A．-1 B． 1 C．False D．True 8、要使命令按钮不可操作，需要设置其（）属性。 A. Visible B. Enabled C. Caption D. BackColor 9、下面关于多重窗体的叙述中，正确的是（）。 A．作为启动对象的Main子过程只能放在窗体模块内 B. 如果启动对象是Main子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载或加载哪一个窗体。 C. 如果没有启动窗体，则程序不能执行。 D. 以上都不对。 10、复选框的Value属性为1时，表示（）。 A 复选框未被选中 B 复选框显示为灰色 C 复选框操作有错误 D 复选框被选中 11、为了把焦点移到某个指定的控件，所使用的方法是（）。 VB程序设计试题及答案（一） 一、单选题 1. 是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) =“欢迎使用VB” (B) ='欢迎使用VB' (C) =欢迎使用VB (D) ="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 … … Next x Next xVB期末考试试题及答案
《VB程序设计》考试题型练习 答案
《VB程序设计》期末考试试卷(A)附答案
VB程序设计期末考试复习题
vb程序设计试题(含答案)
VB题库—程序设计[1]
VB程序设计期末模拟试卷
VB程序设计编程考试~题及答案~
vb题库程序设计
VB考试题及答案
VB程序设计 试题与答案-1
VB程序设计期末试卷
VB程序设计试题及答案一
大学VB期末考试试题
VB程序设计试卷
VB程序设计试卷一
VB程序设计试题及答案(一)
- [整理]VB程序设计复习题及答案.
- VB程序设计编程考试题及答案
- VB程序设计考试题库考试专用
- VB程序设计试题及答案(一)-vb程序设计答案
- VB程序设计初步单元试题
- VB程序设计试题与答案-1资料
- 《VB程序设计》历年全真模拟试卷四(含答案)
- 大学计算机VB程序设计考试题目
- VB语言程序设计试题库
- VB程序设计考试试题及答案
- VB程序设计考试题库——考试专用
- VB程序设计编程考试~题及答案~
- VB程序设计题库(共46题)
- 最新vb程序设计试题(含答案)资料
- VB程序设计试题及答案.doc
- VB程序设计试题及答案(一)
- (整理)VB程序设计期末试卷及答案.
- vb程序设计试题(含标准答案)
- 《VB程序设计基础》模拟试题
- VB语言程序设计试题库