vb程序设计试题(含标准答案)

合集下载

vb程序设计题及答案

vb 程序设计题及答案篇一：vb 程序设计试题及答案】txt> 一、单选题1. visual basic 是一种面向对象的可视化程序设计语言，采取了a 的编程机制。

(a) 事件驱动(b) 按过程顺序执行(c) 从主程序开始执行(d) 按模块顺序执行2. 若要使标签控件显示时不覆盖其背景内容，要对d 属性进行设置。

(a) backcolor (b) borderstyle(c) forecolor (d) backstyle3. 在visual basic 中最基本的对象是c ，它是应用程序的基石，是其他控件的容器。

(a) 文本框(b) 命令按钮(c) 窗体(d) 标签4. 要判断在文本框是否按下enter 键，应在文本框的d 事件中判断。

(a) change (b)keydown(c) click (d)keypress5. 数学表达式3W xIO在vb中的逻辑表达式为d 。

(a) 3=x10(b) 3=x and x10(c) x=3 or x1O (d) x=3 and x1O6. rnd 函数不可能为下列b 值。

(a) O (b) 1(c) O.1234 (d) O.OOO57. 赋值语句:a=123+mid(123456 ，3，2)执行后，a 变量中的值是d(a) 12334(b) 123 (c) 12334 (d) 1578. 对于语句if x=I then y=I ，下列说法正确的是c 。

(a) x=I 和y=I 均为赋值语句(b) x=I 和y=I 均为关系表达式(c) x=I 为关系表达式，y=I 为赋值语句(d) x=I 为赋值语句，y=I 为关系表达式9. 下面程序段表示求两个数中的大数，d 不正确。

(a) max=iif(xy ，x，y) (b) if xy then max=x eIse max=y(c) max=x (d) ify=x then max=yif y=x then max=y max=x10. 当在文本框中输入“ a bcd ”4个字符时，窗体上显示的是c。

vb程序设计试题(含答案)

第一套试题一、选择题（每题2分，共30分）1.在VB环境中，工程文件的扩展名是( C )（A）.frm （B）.bas （C）.vbp （D）.frx2.下面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）Caption5.不论何控件，共同具有的属性是( B )（A）Text （B）Name（C）ForeColor （D）Caption6.要使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）1579.下面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+110.若要清除列表框的所有内容，可用来实现的方法是( C )（A）RemoveItem （B）Cls（C）Clear （D）以上均不可以11.要使时钟控件Timer1的Timer事件不起作用，以下正确的语句是( B ) （A）Timer1.Visible=False （B）Timer1.Enabled=False（A） Timer1.Interval=1000 （D）Timer1.Index=012.引用列表框(List1)最后一个数据项应使用的语( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount) (D)List1.List(ListCount-1)13.如下数组声明语句，正确的是( B )（A）Dim a[3,4]As Integer （B）Dim a(3,4)As Integer（C）Dim a(n,n) As Integer （D）Dim a(3,4)As Integer14.下面子过程语句说明合法的是(A、D )（A）Sub f1(ByVal n%) （B）Sub f1(n%)As Integer（C）Function f1%(f1%) （D）Function f1(ByVal n%)15.假定有如下的命令按钮(名称为Command1)事件过程：Private Sub Command1_Click()x=InputBox("输入："，"输入整数")MsgBox"输入的数据是：”，，”输入数据："+xEnd Sub16.程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是( A )（A）x的值是数值10 （B）输入对话框的标题是“输入整数”（C）信息框的标题是“输入数据：10”（D）信息框中显示的是“输入的数据是：”二、填空题（每题2分，共20分）1、当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择视图菜单的工具箱选项，使“工具箱”窗口显示。

专升本vb程序设计试题及答案

专升本vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明类模块中的方法？A. FunctionB. SubC. PropertyD. Class答案：B2. VB中的单精度浮点数类型是什么？A. IntegerB. SingleC. DoubleD. Long答案：B3. 如果想要在VB中实现多态，可以使用哪种机制？A. 继承B. 接口C. 重载D. 封装答案：B4. 在VB中，以下哪个控件可以用于显示图像？A. LabelB. PictureBoxC. TextBoxD. ComboBox答案：B5. VB中的“Option Explicit”语句的作用是什么？A. 声明变量类型B. 强制变量声明C. 定义常量D. 创建对象实例答案：B6. 在VB中，如何实现一个事件处理程序？A. 使用Sub过程B. 使用Function过程C. 使用Property过程D. 使用Handles关键字答案：D7. 如果要使一个变量在多个窗体之间共享，应该使用哪种变量作用域？A. PublicB. PrivateC. FriendD. Protected答案：A8. 在VB中，以下哪个不是标准的控件属性？A. NameB. TextC. VisibleD. Color答案：D9. VB中的“With”语句用于什么目的？A. 初始化对象B. 创建对象实例C. 链式调用同一对象的多个属性或方法D. 定义对象的生命周期答案：C10. 在VB中，以下哪个不是Visual Basic Power Packs控件？A. LineB. OvalC. ShapeD. DataGrid答案：D二、填空题（每空2分，共20分）11. VB中的“_____”关键字用于定义一个类。

答案：Class12. 当需要在VB中捕获并处理异常时，可以使用“_____”语句。

答案：Try...Catch13. 在VB中，一个窗体的标题可以通过“_____”属性来设置。

《Visual_Basic程序设计》试题及其答案

页脚内容1一、填空题（每题1分，共10分）1.把数学式子： 25sin 21π+写成VB 的数值表达式为（ Sqr(1+3.14159/2*Sin(25*3.14159/180)) ）。

2．设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D 的值是（ True ）。

3．若Case 子句中的表达式表列具有形式：<表达式1> To <表达式2>，则它的含义是：当测试表达式的值等于（指定范围内的值）时，执行该Case 子句相应的语句块。

4．执行下面的程序段后，x 的值为（ 12 ）。

x=0For i=1 To 8 Step 3x=x+iNext i5．在图片框上放置的控件称为图片框的（子）对象，而窗体是图片框的（父）对象。

6．将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为( Text1.Text=Command1.Caption )7．复选框的Value 属性为（ 1 ）时，表示复选框被选中。

8. 使用滚动条可以获取某一范围内的数值输入。

为使垂直滚动条的Value 属性值从下往上递增变化，应设置滚动条Min 属性值大于( Max )属性值。

9．语句：Dim A(-3 to 4) as Integer定义的一维数组A的元素个数是（8）。

10．给定如下子过程：Function fun(ByVal num As Long) As LongDim k As Long,i As Integerk=1For i=1 To numk=k*iNext iEnd Function执行语句Print fun(5) 后在窗体上显示的结果为（0）。

二、单项选择题（每题1.5分，共30分）1.装载窗体是窗体的（ C ）。

A) 对象B) 属性C) 事件D) 方法2.设a="Visual Basic"，下面使b的值为"Basic"的赋值语句正确的是( B)。

vb程序设计试题及答案

vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. SetD. All of the above答案：A3. 在VB中，下列哪个选项是正确的循环语句？A. ForB. DoC. WhileD. All of the above答案：D4. VB中用于打开文件的函数是？A. OpenB. CloseC. WriteD. Read答案：A5. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. Select CaseC. Do WhileD. All of the above答案：A6. VB中用于创建新窗体的语句是？A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案：A7. VB中用于声明常量的关键字是？A. ConstB. DimC. StaticD. Option答案：A8. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案：A9. VB中用于结束程序的语句是？A. EndB. ExitC. CloseD. All of the above答案：B10. VB中用于捕获异常的语句是？A. Try...CatchB. On ErrorC. CatchD. All of the above答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个名为myVar的变量，其类型为字符串，应该使用语句________。

答案：Dim myVar As String2. VB中，用于定义一个名为myFunction的函数，返回值为整数，应该使用语句________。

VB程序的设计编程考试题与答案

VB程序设计编程考试题及答案1.输入3个数，输出最大的数Private Sub command1_click()Dim maxFor i = 1 To 3n = Val(InputBox("输入第" & i & "个数"))If n > max Thenmax = nEnd IfNextPrint "三个数中最大的数是" ; maxEnd Sub2.有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根Private Sub Command1_Click()Dim a, b, c, na = Text1b = Text2c = Text3n = b * b - 4 * a * cIf n >= 0 ThenLabel4 = "方程有根"ElseLabel4 = "方程无根"End IfEnd Sub3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示“恭喜！成绩通过！”，若小于60，则弹出消息框，显示“抱歉！成绩没有通过！Private Sub Form_Load()Text1 = ""End SubPrivate Sub Command1_Click()Dim nn = Text1If n > =60 ThenVal (MsgBox("恭喜！成绩通过！"))ElseVal (MsgBox("抱歉！成绩没有通过！"))End IfEnd Sub4.输入一年份，判断它是否为闰年，并显示有关信息。

（判断闰年的条件是：年份能被4整除但不能被100整除，或者能被400整除）Private Sub Command1_Click()Dim y%y = InputBox("请输入年份")If y Mod 4 = 0 And y Mod 100 <> 0 Or y Mod 400 = 0 ThenVal (MsgBox("闰年！"))ElseVal (MsgBox("平年！"))End IfEnd Sub5.输入学生的百分制成绩，转换输出为五级制成绩，90～100分转换为优秀，80～89转换为良好，70～79转换为中等，60～69转换为及格，0～60转换为不及格。

专升本vb程序设计试题及答案

专升本vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A2. 下列哪个选项是Visual Basic中的单行注释符号？A. //B. /* */C. 'D. ' '答案：C3. 在Visual Basic中，下列哪个函数用于计算数组中元素的个数？A. UBoundB. LBoundC. CountD. Len答案：A4. 如果要创建一个名为“Form1”的窗体，应该使用哪个关键字？A. FormB. SubC. FunctionD. Class5. 在Visual Basic中，下列哪个选项是正确的事件处理程序的声明方式？A. Sub Form1_Click()B. Sub Form1_Click(ByVal sender As Object, ByVal e As EventArgs)C. Function Form1_Click()D. Function Form1_Click(ByVal sender As Object, ByVal e As EventArgs)答案：B6. 下列哪个选项是Visual Basic中的逻辑运算符？A. AndB. OrC. NotD. All of the above答案：D7. 在Visual Basic中，哪个关键字用于退出当前的Sub过程？A. ExitB. EndC. ReturnD. Stop答案：A8. 在Visual Basic中，下列哪个选项是正确的条件语句？A. If...ThenB. Do...LoopC. For...NextD. Switch...Case9. 在Visual Basic中，下列哪个选项用于创建一个标签控件？A. LabelB. TextBoxC. ButtonD. ComboBox答案：A10. 在Visual Basic中，下列哪个选项用于创建一个文本框控件？A. LabelB. TextBoxC. ButtonD. ComboBox答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个常量。

VB程序设计试题及答案（一）-vb程序设计答案

VB程序设计试题及答案（一）一、单选题1. VB6.0是一种面向B 的编程环境。

(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。

(A) Forml.Cap on=“欢迎使用VB”(B) Forml.Cap on='欢迎使用欢迎使用VB'(C) Forml.Cap on=欢迎使用VB(D) Forml.Cap on="欢迎使用VB"3. 若要使命令按钮不可操作，要对A 属性进行设置。

(A) EnabIed (B)Visible(C) Backcolor (D)Cap on4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。

(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。

(A) X_yz (B) 123ab。

(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=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。

(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是D 。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

第一套试题
一、选择题(每题2分，共30分）
1.在ＶB环境中,工程文件的扩展名是( C )
(A）.frm (B)．baｓ（Ｃ）.vbp （D).ｆrx
2．下面4项中不属于面向对象系统三要素的是( A )
(A)变量（B)事件（C)属性（D）方法
3. \、/、Ｍod、*这4个算述运算符中，优先级别最低的是( Ｃ )
（A)＼ (Ｂ）/ （C）Mod (D）*
4.要使Pｒinｔ方法在Ｆoｒm_Load事件中起作用,要对窗体的( C )属性进行设置
（A）ＢackＣoｌor （B）ForeCoｌor
（Ｃ）AｕtｏRｅdraｗ（D）Cａptｉon
5．不论何控件,共同具有的属性是（ B )
（A)Text (B)Naｍe
（C）FoｒeColoｒ（Ｄ）Ｃaｐtｉoｎ
6.要使Ｆoｒm1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A)Foｒm1.Capｔｉon=“欢迎使用ＶＢ”（B）Form1.Cａption＝ˊ欢迎使用VBˊ
(C）Forｍ１．Caption=欢迎使用VB （D)Forｍ1．Caｐｔioｎ=〞欢迎使用ＶB〞
7.VＢ提供了结构化程序设计的３种基本结构，这3种基本结构是( D )
（Ａ)递归结构,选择结构,循环结构 (B)选择结构，过程结构，顺序结构
（C)过程结构,输入、输出结构，转向结构(Ｄ)选择结构,循环结构，顺序结构
8.给变量赋值a=1２3＋MＩD(“１23456”,３,２),a变量中的值是( D )
(A)“1２334”(B)1２3 (C）12334 （Ｄ）157
9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是( Ｄ )
(A）Ｉf sex=“男”And agｅ＜40 And IｎStｒ(duty,“教授”)＞0 Thｅn n=n+１
（B)If sｅx=“男”And age＜40 And (duty=“教授”Or dutｙ=“副教授”) Theｎｎ=n+1
（Ｃ)Ｉｆｓex=“男”Aｎｄａｇｅ＜4０Ａnｄ Right(duty,2）＝“教授” Thｅｎ n=ｎ＋１
(D）If ｓex=“男”Anｄ age<4０ And dｕtｙ＝“教授”And duty=“副教授”
Theｎ n＝ｎ+1
1０．若要清除列表框的所有内容，可用来实现的方法是( C )
(Ａ)ReｍovｅItem (B）Ｃls
(C）Cｌear (D）以上均不可以
11．要使时钟控件Tｉmｅr1的Timeｒ事件不起作用，以下正确的语句是（Ｂ )
（A)Tiｍｅr１.Visiｂｌe＝False （B）Ｔｉmer1．Ｅnabｌed=False （A）Ｔiｍer1.Ｉnteｒｖal=1０00 (Ｄ)Ｔimer1.Ｉndex＝0
12.引用列表框(Ｌｉｓｔ１)最后一个数据项应使用的语（Ｂ )
(A)Ｌist1.List（List1．LisｔCount） (Ｂ）Ｌiｓｔ1.Ｌist（Ｌｉst１．Lis ｔCｏunｔ-1)
(C)Lｉst1.List(LｉｓｔCount) （Ｄ)List1．List(LisｔCouｎｔ-1)
13.如下数组声明语句，正确的是( B )
（A)Dim a[3,4]As Ｉｎteger (B）Dｉm a(３,4)As Integeｒ
(C)Dim a(ｎ，ｎ）Ａｓ Integｅr (D)Diｍa(３,4)As Inteｇer
１4.下面子过程语句说明合法的是(A、D )
(A)Sub f1（BｙVal n％) (B）Sｕb f1(n％)As Ｉnteｇer （C）Ｆunｃｔｉｏｎｆ１%（ｆ1%) (D）Functioｎf1(ByVal n％)
15．假定有如下的命令按钮(名称为Ｃommand1)事件过程:
Ｐrｉvate Sｕb Coｍmand1＿Click(）
ｘ=InpｕtBoｘ("输入：","输入整数"）
MｓｇBｏx＂输入的数据是：”,,”输入数据:＂+x
Ｅnｄ Sｕｂ
1６．程序运行后,单击命令按钮，如果从键盘上输入整数1０，则以下叙述中错误的是( A )
(A）x的值是数值1０ (B）输入对话框的标题是“输入整数”。