2011-1VB程序设计课程试卷
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集成环境后，发现没有显示“工具箱”窗口，应选择视图菜单的工具箱选项，使“工具箱”窗口显示。
(2011-2012-1)VB试卷B卷附参考答案
浙江科技学院考试试卷一、判断题（本大题共12小题，每小题1分，共12分）1.对象方法的调用格式为：对象.方法=方法值2.要对文本框中已有的内容进行编辑，按下键盘上的键，就是不起作用，原因是设置了Locked属性为False。
3.逻辑型变量的默认值为True。
4.If语句的条件表达式中只能使用关系或逻辑表达式。
5.在多窗体的应用程序中，各个窗体之间的切换可以使用窗体的Show方法和Hide方法。
6.窗体/模块级过程不能被本工程中的其他模块调用。
7.单选钮的Value属性为逻辑型属性，而检查框的Value属性为数值型属性。
8.菜单项控件只能识别一个事件，即Click事件。
9.在窗体的Load事件中若要使用Print方法在窗体上打印输出，就必须先将窗体的AutoRedraw属性设置为 True。
10.默认坐标系统的x轴正方向向右，y轴正方向向上。
11.驱动器列表框和目录列表框都具有Change事件，但文件列表框不具有Change事件。
12.一个程序的启动对象只能是一个窗体。
二、单选题（本大题共20小题，每小题1分，共20分）1.若有赋值语句a = 3.14159265，则表达式Fix(a * 1000 + 0.5) / 1000的值为（）。
（A）3 （B）3.141 （C）3.14 （D）3.1422.长整型对应的类型符为（）。
（A）! （B）% （C）& （D）#3.KeyPress事件不能识别（）。
（A）Enter回车键（B） 左方向键（C）BackSpace退格键（D）A字母键4.在VB中，使用Open语句打开要操作的文件，其中（）不属于文件的打开方式。
（A）Write （B）Input （C）Append （D）Output5.下列方法中，（）用来画点。
（A）Pset （B）Point （C）Line （D）Circle6.当使用对象的属性和方法时，若对象是（），则可以省略“对象.”。
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的函数，返回值为整数，应该使用语句________。
2011年VB试卷
石家庄铁道大学2011-2012学年第2学期2011 级本科班期末考试试卷(B)课程名称：Visual Basic 程序设计 任课教师： 考试时间： 120 分钟考试性质（学生填写）：正常考试（ ）缓考（ ）补考（ ）重修（ ）提前修读（ ）注意：所有答案写在答题纸上，写在试卷上无效！！一、单项选择题（每题1分，共30分）1.在下述选项中，属于Visual Basic 程序设计方法的是（ ）。
【A 】面向过程，顺序驱动 【B 】面向过程，事件驱动 【C 】面向对象，顺序驱动 【D 】面向对象，事件驱动 2.在设计阶段，双击窗体中的对象后，Visual Basic 将显示的窗口是（ ）。
【A 】属性窗口【B 】工程资源管理器窗口【C 】代码窗口 【D 】工具箱窗口3.如果窗体对象的名称为Form1，BackColor 是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为红色的语句正确的是（ ）。
【A 】Form1.BackColor=vbRed 【B 】BackColor=Red 【C 】Form1= vbRed【D 】Form1.ForeColor=Red 4.以下叙述中正确的是（ ）。
【A 】窗体的Name 属性指定窗体的名称，用来标识一个窗体 【B 】窗体的Name 属性值是显示在窗体标题栏中文本 【C 】可以在运行期间改变窗体的 Name 属性的值 【D 】窗体的 Name 属性值可以为空5.设在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。
要求单击Command1按钮时可把光标移到文本框中。
下面正确的语句是（ ）。
【A 】Text1.GotFocus 【B 】Command1.GotFocus 【C 】Text1.SetFocus 【D 】Command1.SetFocus6.设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是（ ）。
VB程序设计方法考试卷（A）
VB 程序设计方法考试卷（A ）姓名姓名 学号学号一、选择题（40%，每题2分）分） 1、以下关于文件的叙述中，错误的是（、以下关于文件的叙述中，错误的是（ ）。
A 、顺序文件中的记录一个接一个地存放、顺序文件中的记录一个接一个地存放B 、随机文件中记录的长度是随机的、随机文件中记录的长度是随机的C 、执行打开文件的命令后，自动生成一个文件指针、执行打开文件的命令后，自动生成一个文件指针D 、LOF 函数返回给文件分配的字节数函数返回给文件分配的字节数2、以下叙述中错误的是（、以下叙述中错误的是（ ）。
A 、事件过程是响应特定事件的一段程序、事件过程是响应特定事件的一段程序 B 、不同的对象可以具有相同名称的方法、不同的对象可以具有相同名称的方法C 、对象的方法是执行指定操作的过程、对象的方法是执行指定操作的过程D 、对象事件的名称可以由编程者指定、对象事件的名称可以由编程者指定3、以下合法的Visual Basic 标识符是（标识符是（ ）A 、Forloop B 、Const C 、9abc D 、a#x 4、当一个复选框被选中时，它的V alue 属性的值是( ) A 、3 B 、2 C 、1 D 、0 5、表达式5MOD3+3\5*2的值是（的值是（ ）A 、0 B 、2 C 、4 D 、6 6、设x=4,y=8,z=7,以下表达式x<y And (NOT y>z)OR z<x 的值是（的值是（ ）A 、1 B 、－1 C 、True D 、False 7、设窗体上有一个文本框，设窗体上有一个文本框，名称为名称为text1,程序运行后，程序运行后，要求该文本框不能接受键盘输入，要求该文本框不能接受键盘输入，要求该文本框不能接受键盘输入，但但能输出信息，以下属性设置正确的是（能输出信息，以下属性设置正确的是（ ）。
A 、text1.maxlength=0 B 、text1.enabled=false C 、text1.visible=0 D 、text1.with=0 8、以下能在窗体form1标题栏中显示“V isualBasic 窗体”的语句是（窗体”的语句是（ ）。
VB程序设计习题
A．0 B．-1 C．TRUE D．FALSE
4．函数String(n，"str")的功能是（B）
A．把数值型数据转换为字符串B．返回n个由字符串首字符组成的字符串
C．从字符串中取出n个字符D．从字符串中第n个字符的位置开始取子字符串
14．滚动条控件的LargeChange属性所设置的是（A）
A． 单击滚动条和滚动箭头之间的区域时，滚动条控件Value属性值的改变量
B． 滚动条中滚动块的最大移动位置C． 滚动条中滚动块的最大移动范围
D． 滚动条控件无该属性
15．设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是（D）
B． 在运行Windows帮助引擎时，控件能够显示帮助信息
C． 控件显示的对话框由控件的方法决定
D． 设计时在窗体上将该控件显示成一个图标，此图标的大小可以调整
二、写出下列程序的运行结果
１．如下程序运行后，分别输入100和200，然后单击命令按钮：
Private Sub Command1_Click()
5．运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的Text属性进行赋值从而改变了文本框的Text属性值时，将触发文本框的（D）事件
A．ClickB．DblclickC．GotfocusD．Change
6．下列表达式Int(-4.8) * 6 \ 3 ^ 2 + 11 Mod 3 * Fix(-4.8)的值为（C）
Private Sub Command1_Click( )
x=InputBox(“x=?”)
If x^2=9 Then y=x
程序设计语言VB习题(2011版)
第一部分常量、变量、表达式一、选择题1.下面合法的常量是。
A.1/2B.abcdC.1.2*5D.False2.下列是正确的VB常量。
A.D-6B.E-6C.5DD.5E-63.Integer类型的变量可存放的最大整数为A. 255B. 256C. 32768D.327674.下列是合法的变量名A. absB.-alC.“cdc”D.abe_105.下面表达式中，的值是整型（Integer或Long）。
①36+4/2 ②③123+Fix(6.61) ④57+5.5\2.5 ⑤356 & 21 ⑥“374”+256A. ①②④⑥B. ③④⑤⑥C. ②④⑤⑥D. ③⑥6.表达式16/4-2^5*8/4 MOD 5\2 的值为。
A.14B.4C.20D.27.下列哪一个是日期型常量A.“2/1/99”B.2/1/99C.#2/1/99#D.{2/1/99}8. 计算表达式Cint(-3.5)*Fix(-3.81)+Int(-4.1)*(5 mod 3)，其值是。
A.2B.1C.-1D.69.在下列4个表达式中，非法的表达式形式是。
A．A+B=C B．0=1 C．“ABC”+112 D．1/2=0.510.下列表达式中，能够正确计算的表达式有___ ____个。
①4096*2 ②Cint(5.6)*5461 ③6553*5+0.5*6 ④32768+12A. 4B. 3C. 2D. 111.表示“X>Y≥Z”，正确的VB逻辑表达式是。
A. X>Y and Y>=ZB. X>Y=>ZC. X>Y or Y≥ZD. X>Y and ≥z12.表达式23/5.8、23\5.8、23 mod 5.8的运算结果分别是 B 。
A.3、3.9655、3B.3.9655、3、5C.4、4、5D.3.9655、4、313．已知X<Y，A>B，则下列表达式中，结果为True的是。
VB程序设计考试(1)
VB程序设计考试（1）一、单选题（每题1分，共50题）1.Visual Basic 6．0集成环境的主窗口中不包括（ C ）。
正确A.标题栏B.菜单栏C.状态栏D.工具栏2.以下不属于Visual basic的工作模式的是（）模式。
正确答案：AA.编译B.设计C.运行D.中断3.如果文本框的Enabled属性被设置为False，则运行时（）。
正确答案：AA.文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上B.文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容C.文本框中的文本将变成灰色，用户仍然能改变文本框中的内容D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容4.控制名称都是系统的默认控件名，下列语句错误是（）。
正确答案：Dmand1.Caption=List1.Text;bel1.Caption=List1.List(1);C.List1.List(2)=List1.Text+Str(List1.ListIndex);D.Text1.Text=+Text1.Caption。
5.以下叙述中正确的是（）。
正确答案：A属性用来标识对象B.窗体Name属性值显示在标题栏中C.运行时对象Name属性可变D.对象的Name属性值可以为空6.Abc%，abc!，abc$，abc#分别声明abc是（）。
正确答案：AA.整型、单精度、字符串、双精度变量B.整型、整型、字符串、双精度变量C.单精度、整型、字符串、双精度变量D.整型、双精度、字符串、双精度变量7.Visual Basic的逻辑类型数据占（ A ）字节内存。
正确A.2B.4C.8D.168.如果逻辑与(AnD)运算的结果为真，与它所连接的两个条件必须是（ C ）。
正确A.前一个为真，后一个为假B.前一个为假，后一个也为假C.前一个为真，后一个也为真D.前一个为假，后一个为真9.设a=6，则执行 x=iif(a>5,-1,0)后，x 的值为（ D ）。
(2011-2012-1)VB试卷A卷 附参考答案
浙江科技学院考试试卷1.事件是对象响应的动作，每个对象都有唯一的事件，如命令按钮对应Click事件，时钟控件对应Timer事件。
2.在文本框中，通过SelStart属性能获得当前插入点所在的位置。
3.Visual Basic代码中不区分字母的大小写。
4.在Select Case情况语句中，各分支（即Case表达式）的先后顺序无关。
5.一个工程中最多能包含一个窗体和一个模块。
6.同一个工程中，所有的变量都不可以同名。
7.框架作为“容器”，可以用来为单选钮进行分组，框架中只能放置单选钮。
8.在VB中，每个菜单项就是一个控件。
9.对象的Left、Top属性是相对于其容器来说的，窗体是其它控件的容器，它本身没有Left、Top属性。
10.VB中，可以直接使用数值来制定颜色。
11.文件列表框的Filename属性可以返回用户选定的文件名（包含路径）。
12.数组不能作为函数过程或子过程的参数。
二.单选题（本大题共20小题，每小题1分，共20分）13.若有语句s = "1110520093#Tom"，则表达式Mid(s, InStr(s, "#") + 1)的值为（）。
（A）"Tom" （B）"#" （C）"#Tom" （D）"1110520093" 14.下列选项中，（）是合法的变量名。
（A）BOOK_1 （B）3stra （C）s*ta （D）VbCrlf15.下列哪个不属于鼠标事件（）。
（A）MouseMove （B）MouseDown（C）MouseClick （D）MouseUp16.下列哪个文件操作语句可以实现文件的移动（）。
（A）FileCopy （B）MkDir （C）Kill （D）Name … As …17.使用Circle方法在窗体上画完一段圆弧后，窗体的CurrentX和CurrentY属性的值会设置成（）。
VB程序设计试题及参考答案
VB程序设计试题及参考答案VB程序设计及参考答案⼀、单选题（共20分，每⼩题1分）1、要改变控件的宽度，应修改该控件的（）属性。
（A）TOP （B）width （C）Left （D）Height2、将命令按钮Command1设置为不可见，应修改该命令按钮的（）属性。
（A）Visible （B）Value （C）Caption（D）Enabled3、（）对象具有clear⽅法。
（A）图⽚框（B）窗体（C）复选框（D）列表框4、启动VB后，就意味着要建⽴⼀个新（）。
（A）窗体（B）⽂件（C）⼯程（D）程序5、下列（）对象不具有Clear⽅法。
（A）列表框（B）组合框（C）剪贴框（D）图⽚框6、组合框有三种风格，它们由Style属性所决定，其中为简单组合框时，Style 属性值应为（）（A）0 （B）1 （C）2 （D）37、下列可调整图⽚框的⼤⼩以适合图⽚的属性是（）（A）Stretch （B）autosize （C）picture （D）oledropmode 8、要想清除⽂本框中的内容则可利⽤（）进⾏。
（A）Caption （B）Text （C）Clear （D）Cls9、在⽂本框控件中将Text的内容全部显⽰为所定义的字符的属性是（）。
（A）Password （B）PasswordChar（C）需要编程来实现（D）以上都不是10、Visual Basic是⼀种⾯向对象的程序设计语⾔，所采⽤的编程机制是（）。
（A）从主程序开始执⾏（B）按过程顺序执⾏（C）事件驱动（D）按模块顺序执⾏11、下列四项中合法的变量名是（）。
（A）a-bc （B）a_bc （C）4abc （D）integer12、⽆论何种控件，共同具有的属性是（）（A）Text （B）Name （C）Caption （D）ForeColor13、有程序代码如下：Text1.Text = "Visual Basic程序设计"则Text1、Text ，和"Visual Basic程序设计"分别代表（）。
VB程序设计试题及答案(一)
VB程序设计试题及答案（一）一、单选题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)Caption4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中，其值为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=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。
2011VB程序设计样卷
《Visual Basic程序设计》（A卷）一、填空题(每空1分,共10分)1. NOT(5>6)的值是。
2. 根据存取方式，文件可分为 _②___ 文件和 __③___ 文件3. Dim A As Integer ,也可以写成 __④____4. Print Format (63.57,”000.000”) 的输出结果是 _⑤__5. k=a=b 第一个是__⑥____号, 第二个⑦__ 号6. Dim A(2,3) As String ,则数组A 最多能放 _⑧_ 个元素，各元素是 __⑨__ 类型。
7. 设 a,b,c是三角形的三条边长，写出能构成三角形的逻辑表达式____⑩____二、选择题(每空1分,共10分)1. 窗体文件的扩展名是_①__ 工程文件的扩展名是 _②___A. .vbpB. .logC. .frmD. .bas2.可以作为vb合法变量名的是 _③__A.*stB.stC.s!tD.5st3. 在面向对象的程序设计中，对象的性质和状态特征称为 _④___A.消息B.类C.属性D.事件4. FontBold=True表示将字体设为 __⑤____A.斜体B.粗体C.加中划线D.加下划线5. 属于外颜色属性的是 _⑥__A.HeightB. TopC.LeftD.BackColor6. 文本框的Text 属性返回值是 _⑦__ 类型, Autosize 属性是 _⑧____ 类型。
A.逻辑B.数值C.字符D.日期7. 将按钮的鼠标事件屏蔽，可将 __⑨___ 属性设为FalseA.CaptionB.TextC.EnableD.Visible8. 不能使用Print 方法的对象 _⑩___A.PrinterB.FormC.PictureboxD.Text三、程序填空(每空2分,共20分)1、计算 S=1+2+3+…+100S=0:N=0While__(1)__N=N+1__(2)_____WendPrint s2、计算 S=1+2+3+…+100s = 0For i = (3)(4)Next iPrint s3、建立并打印一个主对角线元素为1，其余元素为零的10行10列的二维数组。
2011上vb试卷(含答案)
（二级V isual Basic 6.0 程序设计）一、单项选择题（每题1分，共40分）1.计算机可以与象棋大师进行下棋比赛，这属于计算机在 1 方面的应用。
A) 人工智能B) 科学计算C) 数据处理D) 计算机辅助设计2.计算机运算器的主要功能是 2 。
A) 实现算术运算B) 实现逻辑运算C) 分析指令并进行译码D) 实现算术运算和逻辑运算3.计算机存储器中1KB表示的是 3 个字节。
A) 128 B) 256 C) 512 D) 10244.在计算机系统层次结构中，位于最内层的是 4 。
A) 硬件系统B) 软件系统C) 程序D) 数据5.Windows启动时将自动执行“程序”菜单中的“ 5 ”菜单项所包含的应用程序。
A) 程序B) 附件C) 启动D) 游戏6.计算机正在运行状态下，直接关闭电源可能产生的后果是 6 。
A) 破坏系统设置B) 造成数据丢失C) 造成下次启动故障D) 以上情况均有可能7.下列不属于．．．计算机病毒特征的是7 。
A) 破坏性B) 潜伏性C) 免疫性D) 传染性8.下列选项中，不属于．．．多媒体计算机硬件的是8 。
A) 音响设备B) 加密卡C) 音频卡D) 视频卡9.根据所覆盖的地理范围分类，“中国教育科研网”属于9 。
A) 广域网B) 城域网C) 局域网D) 企业网10.将高级语言编写的程序翻译成机器语言程序，采用的两种方式是10 。
A) 编译和汇编B) 编译和解释C) 编译和链接D) 解释和汇编11．下列选项中，11 不．是．合法的变量名。
Ａ) Date_4 Ｂ) Date4 Ｃ) Date Ｄ) Date01 12．Visual Basic工程文件和窗体文件的扩展名分别是12 。
A）Vbp和Pdf B）Vbp和FtpC）Vbp和Frm D）Vpp和Frm13．声明一个定长为10的字符串变量st，应使用的语句是13 。
Ａ) Dim st As 10 Ｂ) Dim st As String*10Ｃ) Dim st As string(10) Ｄ) Dim st(10) As string14．如果一个变量未经定义就直接使用，则该变量的类型是14 。
VB程序设计编程考试题及答案
VB程序设计编程考试题及答案1。
输入3个数，输出最大的数2。
有一元二次方程:aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根3。
输入一个百分制的成绩，若大于等于60，则用消息框弹出,显示“恭喜！成绩通过！”，若小于60，则弹出消息框，显示“抱歉！成绩没有通过！4。
输入学生的百分制成绩,转换输出为五级制成绩，90～100分转换为优秀，80～89转换为良好,70~79转换为中等，60~69转换为及格,0～60转换为不及格。
5。
随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。
例如，产生246，输出是642。
6。
输入两个整数，求它们的最大公约数。
7.分别统计1—100中,满足3的倍数、7的倍数的数各有多少。
8。
输入一串字符，统计其中字母A（不区分大小写)出现的次数。
9.我国目前有13亿人口，按人口年增长率0.8%计算，多少年后我国人口将超过26亿。
10。
小猴有桃若干，第一天吃掉一半多一个;第二天吃剩下桃子的一半多一个；以后每天都吃尚存桃子的一半多一个,到第7天只剩一个，问小猴原有桃多少？11.百元买百鸡问题。
假定小鸡每只5角，公鸡每只2元,母鸡每只3元，编程求解购鸡方案。
12。
编程求斐波那契数列前11项。
(斐波那契数列:F(0）=f（1)=1, F（n)=F（n—1）+F(n —2) n〉=2 ）13。
已知有序数组a（)，编程插入x（x的值为14）。
数组a中的元素分别为{12，6,4，89，75,63，100,20,31}。
14。
找出被3、5、7除,余数均为1的最小的5个正整数。
15利用随机函数产生50～100范围内的20个随机数，显示其中的最大值、最小值和平均值. 16。
编一函数，统计字符串中汉字的个数。
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，nb = 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.输入学生的百分制成绩，转换输出为五级制成绩，90～100分转换为优秀,80～89转换为良好,70~79转换为中等，60～69转换为及格，0～60转换为不及格。
vb程序设计试题及答案
vb程序设计试题及答案为了帮助大家更好地理解和掌握VB程序设计，下面将为大家提供一套VB程序设计试题及答案。
通过完成这些试题，相信能够对VB程序设计有更深入的了解和应用。
请注意，以下试题中给出的是简要描写，实际编写程序时请适当完善。
试题一：计算两个数字的和与差要求：编写一个VB程序，输入两个数字，然后输出它们的和与差。
答案：```vbPrivate Sub btnCalc_Click()Dim num1, num2, sum, diff As Integernum1 = Val(txtNum1.Text)num2 = Val(txtNum2.Text)sum = num1 + num2diff = num1 - num2lblSum.Caption = "和：" & sumlblDiff.Caption = "差：" & diffEnd Sub```试题二：学生成绩统计要求：编写一个VB程序，输入3位学生的成绩，然后计算并输出平均成绩和最高成绩。
答案：```vbPrivate Sub btnCalc_Click()Dim score1, score2, score3, average, max As Integerscore1 = Val(txtScore1.Text)score2 = Val(txtScore2.Text)score3 = Val(txtScore3.Text)average = (score1 + score2 + score3) / 3max = WorksheetFunction.Max(score1, score2, score3)lblAverage.Caption = "平均成绩：" & averagelblMax.Caption = "最高成绩：" & maxEnd Sub```试题三：简单计算器要求：编写一个VB程序，实现一个简单的计算器功能，包括加减乘除四则运算。
VB程序设计试题题库及答案
VB 程序设计笔试题题库选择题F 列常量中，是Integer 类型常量的是（ C ）。
A 、 123& B 、 -38844C 、 123%D 、 32768面选项中 （） 是字符连接运算符 . （ A ）A 、 &B 、 AndC 、 %D 、 Mod 下面关 于 VB 的 集成 开发 环境（ IDE ） 的叙 述中， 不正 确的 是 B IDE 是设计、调试、运行vas 序的工具。
用户不能随意关闭IDE 中的窗口。
" 窗体设计 " 窗口是用来设计应用程序界面（窗体）的。
打开/关闭各窗口的命令主要在IDE 的”视图"菜单中。
A 、 B 、 C 、 D 、表达式 15 Mod 4 + 13 \ 5 * 2 的值是 D A 、 B 、 C 、 D 、 赋值语句 A=123 +）。
A、 B 、Clen （ “程序设计”）=（C 52 6 10 7 0 2 4Mid$（“123456”,3,执2）行后，A= （ A ）。
A 、157B 、12334C 、123D 、"12334"在一个语句内写多条语句时, 用来分隔每条语句的符号是（ C ）.A 、,B 、;C 、:D 、、8将逻辑型数据转换成整型数据时，转换规则是( A 将True 转换为1 B 将True 转换为1 C 将True 转换为0 D 将True 转换为-19 表达式2+3*4八5-SIN(X+1)/2中最先进行的运算是 SIN 4八5 3*4x+1，将False 转换为0 ，将False 转换为-1 ，将False 转换为-1 ，将False 转换为0A 、B 、C 、D 、 )。
).10如果x=2 ，则表达式x+1>2 Or sin(x)>0.9 ( B )。
A不能计算B、TrueC、5D、False11随机产生[10，50] 之间整数的正确表达式是( A、Round( Rnd*50)B、Int(Rnd*40+10)C、Round( Rnd*51)D、10+Int(Rnd*41)12每建立一个窗体, 工程管理器窗口中就会增加一个A类模块文件B工程文件C窗体文件D程序模块文件13INT(100*RND(1)) 产生的随机整数的闭区间是( A、B、C、D、[1,100][0,99][0,100][1,99]And 3>x+3 的值)。
2011-1VB程序设计课程试卷-推荐下载
6．以下日期型常量合法的是______。
A．”03/25/89” B．#”03/25/89”#
C．#03/25/89#
D．#25/03/89#
7．表达式 12000+”129”&200 的值是______。
A．12129200 B．12000129200
C．12329
D．12000329
8．将文本框的______属性设置为 True 时,文本框可以输入或显示多行文本,且会在输入的内
A．Const a As Single=1.1
B．Const a As Integer=“12”
C．Const a As Integer=Sin(1) D．Const a = ”OK”
22．在程序中可以通过复选框和单选按纽的______属性值来判断它们的当前状态。
Байду номын сангаас
A．Caption B．Value C．Checked D．Selected
C．Caption 和 Picture 属性
D．Caption 和 Graphics 属性
17．设 A=2,B=-2,则表达式 a/2+1 > b+5 or b*(-2) =6 的值是______。
对全部高中资料试卷电气设备，在安装过程中以及安装结束后进行高中资料试卷调整试验；通电检查所有设备高中资料电试力卷保相护互装作置用调与试相技互术关，系电通，力1根保过据护管生高线0产中不工资仅艺料可高试以中卷解资配决料置吊试技顶卷术层要是配求指置，机不对组规电在范气进高设行中备继资进电料行保试空护卷载高问与中题带资22负料，荷试而下卷且高总可中体保资配障料置各试时类卷，管调需路控要习试在题验最到；大位对限。设度在备内管进来路行确敷调保设整机过使组程其高1在中正资，常料要工试加况卷强下安看2与全22过，22度并22工且22作尽2下可护1都能关可地于以缩管正小路常故高工障中作高资；中料对资试于料卷继试连电卷接保破管护坏口进范处行围理整，高核或中对者资定对料值某试，些卷审异弯核常扁与高度校中固对资定图料盒纸试位，卷置编工.写况保复进护杂行层设自防备动腐与处跨装理接置，地高尤线中其弯资要曲料避半试免径卷错标调误高试高等方中，案资要，料求编5试技写、卷术重电保交要气护底设设装。备备4置管高调、动线中试电作敷资高气，设料中课并3技试资件且、术卷料拒管中试试调绝路包验卷试动敷含方技作设线案术，技槽以来术、及避管系免架统不等启必多动要项方高方案中式；资，对料为整试解套卷决启突高动然中过停语程机文中。电高因气中此课资，件料电中试力管卷高壁电中薄气资、设料接备试口进卷不行保严调护等试装问工置题作调，并试合且技理进术利行，用过要管关求线运电敷行力设高保技中护术资装。料置线试做缆卷到敷技准设术确原指灵则导活：。。在对对分于于线调差盒试动处过保，程护当中装不高置同中高电资中压料资回试料路卷试交技卷叉术调时问试，题技应，术采作是用为指金调发属试电隔人机板员一进，变行需压隔要器开在组处事在理前发；掌生同握内一图部线纸故槽资障内料时，、，强设需电备要回制进路造行须厂外同家部时出电切具源断高高习中中题资资电料料源试试，卷卷线试切缆验除敷报从设告而完与采毕相用，关高要技中进术资行资料检料试查，卷和并主检且要测了保处解护理现装。场置设。备高中资料试卷布置情况与有关高中资料试卷电气系统接线等情况，然后根据规范与规程规定，制定设备调试高中资料试卷方案。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2011-1-VB程序设计课程试卷一、单选题(每题1分,共30分)1．一只白色的足球被踢进球门,则白色、足球、踢、进球门是______。
A．属性、对象、方法、事件B．属性、对象、事件、方法C．对象、属性、方法、事件D．对象、属性、事件、方法2．要对选定的多个控件调整格式,如对齐、调整间距、统一尺寸等,应使用______菜单。
A．格式B．编辑C．视图D．工具3．要在窗体上显示图片,需设置窗体的______属性。
A．Caption B．Icon C．Picture D．Name4．将命令按钮的______属性设置为False后,运行时该命令按钮呈灰色不可用。
A．ControlBox B．WindowStateC．Visible D．Enabled5．下列表达式中,值为True的是______。
A．Mid(“ABCD”,2,2)>Left(“ABCD”,2) B．Not(Sqr(4)-3>=-2)C．14/2\3<10 MOD 4 D．Ucase(“abcd”)>=“abcd”6．以下日期型常量合法的是______。
A．”03/25/89”B．#”03/25/89”#C．#03/25/89# D．#25/03/89#7．表达式12000+”129”&200的值是______。
A．12129200 B．12000129200C．12329 D．120003298．将文本框的______属性设置为True时,文本框可以输入或显示多行文本,且会在输入的内容超出文本框的宽度时自动换行。
A．MultiLine B．Enabled C．ScrollBars D．Max9．任何控件都具有______属性。
A.Text B．Caption C．Name D．ForeColor10．若要将滚动条的最小值设为0,最大值设为255,应对其______属性进行设置。
A．Left和Top B．Width和HeightC．SmallChange和LargeChange D．Min和Max11．窗体上有一个文本框控件Textl,若已存在三个整型变量a、b、C,且三个变量的值分别为5、7、12。
以下的______可以使文本框中显示的内容为：5+7=12。
A．Texll.Text=a+b=CB．Textl.Text=“a+b=C”C．Textl.Text=a&”+”&b&”=“＆cD．Textl.Text=“a”&”+”&”b”&”=“&”c”12．下列控件中, ______控件没有Caption属性。
A．命令按钮B．标签C．选项按钮D．文本框13．程序运行时,若要使某一控件不可见,应将其______属性设为False。
A．Enabled B．Caption C．Visible D．Default14．在设计阶段,双击窗体Forml的空白处,打开代码窗口,显示______事件过程模板。
A．Forml_ Click B．Forml_LoadC．Form_Load D．Form_Click15．一个控件在窗体上的位置由Top和Left属性决定,其大小由Height和______属性决定。
A．Right B.Text C．Caption D．Width16．如果要在命令按钮上显示图形文件,应设置命令按钮的______。
A．Style和Graphics属性B．Style和Picture属性C．Caption和Picture属性D．Caption和Graphics属性17．设A=2,B=-2,则表达式a/2+1 > b+5 or b*(-2) =6的值是______。
A．False B．True C．3 D．618．执行函数Chr(Asc(Mid(“Basic”,2,1))-32)的结果是______。
A．”A”B．”B”C．”a”D．”b”19．用消息框显示如下消息：“程序即将被关闭!”,使用以下______语句可以实现(其中n为Integer型)。
A．MsgBox=“程序即将被关闭!”B．InputBox(“程序即将被关闭!”)C．n=MsgBox(“程序即将被关闭!”)D．Call MsgBox”程序即将被关闭!”20．下面程序段中,循环体被执行的次数是______次。
For i=7 to 102 Step 3Print i;Next iA．96 B．95 C．32 D．3121．下列符号常量的声明中, ______是不合法的。
A．Const a As Single=1.1 B．Const a As Integer=“12”C．Const a As Integer=Sin(1) D．Const a = ”OK”22．在程序中可以通过复选框和单选按纽的______属性值来判断它们的当前状态。
A．Caption B．Value C．Checked D．Selected23．以下控件可以作为其他控件容器的是______。
A．PictureBox和Image B．Frame和PictureBoxC．ListBox和Frame D．TextBox和Image24．不可以显示输出文本信息的控件是______。
A．Image B．TextBox C．Label D．ComboBox25．要清除已经在图片框Picturel中打印的字符串而不清除其中的图象,应使用语句______。
A．Picturel.ClsB．Picturel.Picture=LoadPicture(““)C．Picturel.print ““D．Picturel.Picture=““26．定时器的Interval属性以______为单位指定Timer事件之间的时间间隔。
A．分B．秒C．毫秒D．微秒27．下列叙述不正确的是______。
A．注释语句是非执行语句,仅对程序的有关内容起注释作用,不被解释或编译B．注释语句可放在代码中的任意位置C．注释语句不能放在续行符的后面D．代码中加入注释语句的目的是提高程序的可读性28．针对语句If I=1 Then J=l,下列说法正确的是______。
A．I=1为关系表达式,J=1为赋值语句B．I=1为赋值语句,J=1为关系表达式C．I=1和J=l均为赋值语句D．I=1和J=1均为关系表达式29．在一个语句行内写多条语句时,语句之间应该用______分隔。
A．逗号B．分号C．顿号D．冒号30．在过程中有语句For I=N1 To N2 Step N3,在该循环体内有下列四条语句,其中______会影响循环执行的次数。
①N1=N1+l ②N2= N2+N3 ③I=I+N3 ④N3=2*N3A．①②B．①②③C．③D．①②③④二、简单填空(每空2分,共30分)1．visual Basic是一种面向对象的程序设计语言。
2．窗体文件的扩展名为.frm。
3．工程文件的扩展名为.vbp。
4．在标准模块中用Public语句说明的变量是全局变量。
5．若窗体上有列表框Listl,则Listl.List(Listl.ListIndex)的值等于Listl的Text属性值。
6．A和B不同时为零的逻辑表达式是A XOR B。
7．在VB中不论常量还是变量,如果不加说明,系统均按变体型或V ariant数据处理。
8．算数表达式对应的VB表达式是(a*b+c)/((abs(d)+1)*(e+f))+1。
9．\、/、mod、*四个算术运算符中,优先级最低的是mod。
10．欲使某窗体从屏幕上消失,但仍驻留在内存中,应使用窗体的Hide方法。
11．设置文本框的Passwodchar属性,可以使在文本框中键入字符时,只显示某个特定的字符，如“*”。
12．决定控件上文字的字体、字形、大小、效果的属性是Font属性。
13．表达式2 ^ 3+5 Mod 2-4的值为5。
14．执行语句”Print Format(5459.478,”##, ##0.00”)”,正确的结果是5,459.48。
15．将任意一个两位整数N的个位数与十位数对换得到新数的VB表达式是(N Mod10)*10+N\10。
三、程序分析填空(每空3分,共30分)1．设x As Integer,St As string,F1ag As Boolean执行下列语句后,x结果为122。
St = "123"F1ag = Truex = F1ag + St2．下列程序段的执行结果为1 2 False。
x=1y=2z=x=yPrint x;y;z3．下列程序段的执行结果为I=2。
Private Sub Form_Click()Dim a As Integer, i As Integera = 75If a > 60 Then i = 1If a > 70 Then i = 2If a > 80 Then i = 3If a > 90 Then i = 4Print "I="; iEnd Sub4．下列程序段的执行结果为False。
Private Sub Form_Click()x = 2: Y = 1If x * Y < 1 Then Y = x - 1 Else Y = -1Print Y - x > 0End Sub5．下列程序段的执行结果为bcdcde。
a = "abcd"b = "bcde"e = Right(a, 3)f = Mid(b, 2, 3)If e < f Then Print e + f Else Print f + e6．下列程序段的执行结果为4。
i = 0For g = 10 To 19 Step 3i = i + 1Next gPrint i7．下列程序段的执行结果为i=7 a=11。
Private Sub Form_Click()i = 4: a = 5Doi = i + 1a = a + 2Loop Until i >= 7Print "i="; i,Print "a="; aEnd Sub8．下列程序段的执行结果为10 5。
Private Sub Form_Click()a = 0:b = 1Doa = a + bb = b + 1Loop While a < 10Print a; bEnd Sub9．下列程序段的执行结果为2 4。
Private Sub Form_Click()Dim i As Integer, J As IntegerDim a As Integer, b As Integera = 0b = 0For i = -1 To -2 Step -1For J = 1 To 2b = b + 1Nexta = a + 1NextPrint a; bEnd Sub10．运行以下的程序,单击按钮Commandl,在输入框中依次输入100,36,70,窗体上第三行输出的内容是good。