VB习题库2004
2004vb试题和答案
华南理工大学《VB程序设计教程》统考试卷2004.6院系名：＿＿＿＿专业班级：＿＿＿＿姓名：＿＿＿学号：＿＿＿＿＿一．填充题（把确切的答案填入答卷，每题1分，10题共10分）1．将x四舍五入到百位（例如，若x=12374.52应舍入成12300），可使用表达式。
（Int(x / 100 + 0.5) * 100 ）。
2．要从字符串“Visual BASIC 6.0”中截取子字符串“BASIC”可使用函数。
（Mid(“Visual BASIC 6.0”,8,5) ）3．产生从整数a到整数b之间的随机整数可使用表达式。
（Int((b-a+1)*Rnd+a) ）。
4．下列表达式：True Or Not 5–3 <= 4的值为：。
（True）5．表示条件“x，y其中有一个小于z”的关系表达式或逻辑表达式为：。
（x<z Or y<z）6．表示条件“年份Year能被4整除，但不能被100整除”的关系表达式或逻辑表达式为：。
（Year Mod 4=0 And year Mod 400<>0）7．除了在设计阶段通过修改“Picture”属性装载图形在程序外，还可以使用函数装载图形。
（LoadPicture）8．在程序运行期间，用户可以用文本框接受输入的内容，其属性是。
（Text ）9．控件数组中的每一个控件都有惟一的下标，下标值由属性指定。
（Index ）10. 已知数组元素A(1)=4, A(2)=2, A(3)=1, A(4)=3，则A(A(1)+A(2)-A(4))的值为________。
( 1 )11．当文本框的Text属性被修改时，会发生________________事件。
(change)12.界面上有多个控件，要在程序中把光标设置在接受输入的控件上，应使用方法________________。
（SetFocus）13．当控件的________________属性置为False时，该控件不接受鼠标事件。
vb 2004年(春)上机部分
江苏省高等学校非计算机专业学生计算机基础知识和应用能力等级考试上机试卷（2004年春）二级Visual Basic语言（试卷代号VB01）（本试卷完成时间70分钟）【考试须知】1、考试结束后，文件必须存放在指定位置，否则适当扣分；考试盘中若无指定文件，则不予评分；2、程序代码书写应呈现锯齿形。
一、改错题（17分）【题目】找出10至100之间的互质数（即这些数中任意两个数的最大公约数为1）。
Option ExplicitOption Base 1Private Sub Command1_Click()Dim A() As Integer, I As Integer, J As Integer, Logic As BooleanDim K As IntegerReDim A(1)A(1) = 10For I = 11 To 100K = 1Logic = FalseCall Sub1(A, I, Logic)If Logic ThenK = K + 1ReDim Preserve A(K)A(K) = IEnd IfNext IFor I = 1 To UBound(A)Text1 = Text1 & Str(A(I))If I Mod 5 = 0 Then Text1 = Text1 & vbCrLfNext IEnd SubPrivate Sub Sub1(A() As Integer, N As Integer, F As Boolean)Dim I As Integer, J As Integer, Ub As IntegerUb = UBound(A)For I = 1 To UbFor J = 2 To A(I)If A(I) Mod J = 0 And N Mod J = 0 ThenExit ForEnd IfNext JF = TrueNext IEnd Sub改错题参考界面【要求】1、新建工程，输入上述代码，改正程序中的错误；2、改错题的界面应给出的参考界面相似，主要用来调试程序；3、改错时，不得增加或删除语句，但可适当调整语句位置；4、将窗体文件和工程文件分别命名为F1和P1，并保存到软盘A的根目录下。
2004-2005学年第一学期《VB程序设计》段考试题
2004-2005学年度第一学期03计算机《VB程序设计》段考试题一、填空题（每空2分，共30分）1、变量名的第一个字符必须是_________。
2、浮点类型数据包括单精度型和_________数据。
3、VB提供了列表框控件，当列表框中的项目较多、超过了列表框的长度时，系统会自动在列表框边上加一个______________。
4、下图表示的是一个_____________窗口，可从其中看出，所选对象是_____________，BackColor的含义是设置该对象的_____________。
5、组合框控件(ComboBox)将________________的功能结合在一起。
6、在属性窗口中为对象设置属性值，应在程序的_____________阶段进行。
7、下图中的图案表示工具箱中的两个控件，其中①是_____________控件，②是_____________控件。
8、VB的代码存贮在模块中。
在VB中提供了三种类型的模块：______、标准模块和类模块。
9、在VB中声明常量的关键字是__________。
10、随机生成一个1~6的随机整数的表达式是___________________。
11、如果要改变窗体frmmain的标题为“欢迎使用”，需要设置窗体的属性的语句是_____________________________。
12、结束整个程序的运行，所对应的语句为。
二、单项选择题（每题2分，共30分）1、VB采用（）的编程方法。
A．面向对象B．面向过程C．面向问题D．面向用户2、程序运行过程中始终保持不变的是（）。
A．数组B．表达式C．常量D．变量3、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（）。
A．工程资源管理器窗口B．工具箱窗口C．代码窗口D．属性窗口4、为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。
A．V alue B.Default C. Cancel D．Enabled5、以下选项中，不属于标签的属性是( )。
2010秋VB04上机答案
2010年（秋）上机 Visual Basic（VB04）答案一、改错【题目】本程序的功能是找出给定范围内，由不同数字组成的完全平方数。
所谓完全平方数是指其平方根为正整数的整数。
Option ExplicitPrivate Sub CmdFind_Click()Dim n As Long, i As IntegerFor n = 10000 To 60000If Int(Sqr(n)) = Sqr(n) And validate(n) ThenList1.AddItem n & "==>" & Sqr(n) & "^2"End IfNext nIf List1.ListCount = 0 Then List1.AddItem "无符合要求的数"End SubPrivate Function validate(ByVal n As Long) As Boolean 'err 无ByValDim k As Integer, num() As IntegerDim i As Integer, j As IntegerDok = k + 1ReDim Preserve num(k) 'err 无Preservenum(k) = n Mod 10n = n \ 10Loop Until n = 0 'err Until n < 0For i = 1 To UBound(num) - 1For j = i + 1 To UBound(num)If num(i) = num(j) Then Exit FunctionNext jNext ivalidate = TrueEnd Function二、编程题【题目】编写程序，生成试验数据的茎叶图，并显示不同区间数据的个数。
设试验数据取值在30～99之间（见图），其中在30～39之间有6个数31、39、39、31、39、31，则可表示为 3| 1 9 9 2 9 1；在40～49之间有2个数43、49,则可表示为4| 3 9；依次类推，由此得到的图形就称为数据的“茎叶图”。
2004VB( A)卷
2000中医本科/2001中药本科VB程序设计考试（A卷）姓名学号成绩一、选择题（每题1分，共16分）请将各题答案填写在下面的表格中，否则无效。
1．C语言、Java语言、Basic语言都是计算机的语言。
A. 高级B. 中级C. 机器D. 低级2．下面文件不是V isual Basic工程内的文件。
A. .vbpB. .frmC. .docD. . exe3．在窗体上利用属性可以设置窗体输出字符的字体。
A. FontUnderlineB. FontItalicC. FontNameD. FontSize4．运行Visual Basic程序时，系统首先触发窗体的事件。
A. ClickB. LoadC. UnloadD. Resize5．如果要在命令按钮上显示图片，必须先将属性设置为1，然后为picture属性加载一幅图片。
A. IndexB. EnableC. VisibleD. Style6．生成快捷菜单时，主菜单的属性须设置为False。
A. 可见B. 复选C. 有效D. 显示7. 下面变量名( )是正确的：A、3xB、a%BC、my nameD、a_bc8．在文本框中利用属性可以屏蔽用户输入的文本信息。
A. FontB. PasswordCharC. MultiLineD. MaxLength9．在控件中可以放置其他控件。
A. 文本框B. 组合框C. 图片框D. 标签10．图像框显示图片时，利用图像框的属性可以使图片依据图像框的大小显示。
A. StretchB. PictureC. AutosizeD. visible11．计时器控件的Interval 属性设置为100，则每秒钟产生个Timer事件。
A. 5B. 10C. 100D. 20012．表达式含多个运算符时，先完成。
A. 括号内运算B. 函数运算C. 算术运算D. 关系运算13．语句书写规则中，是错误的。
A.每条语句可以单独占一行，也可以一条语句分多行写。
计算机二级考试历年试卷--2004-11VB
二、语言基础选择题1．VB是面向（）的程序设计语言。
A．窗口 B．方法 C．对象 D．过程2．VB默认的工具栏是（）。
A．文件 B．数据库 C．格式 D．标准3．在VB中，当给引用的对象赋值时，应使用（）语句。
A．Input B．Set C．Public D．Integer4．下列变量中，正确的是（）。
A．?Clear B．Class#rooml C．ClassA D．8Class5．能产生[50，500]之间随机整数的函数表达式是（）。
A．Int(450*rnd)+50 B．Int(450*rnd) C．Int(451*rnd)+50 D．Int(451*rnd)6．表示学习成绩（score）在75分和90分之间的布尔表达式是（）。
A．score>=75 and score<=90 B．score>=75 or score<=90C．score<=75 and score>=90 D．score<=75 or score>=907．要使标签中的文本靠右显示，则应将其Alignment属性设置为（）。
A．0 B．1 C．2 D．38．下列控件中可以设置滚动条的是（）。
A．复选框 B．框架 C．文本框 D．标签框9．命令按钮不支持的事件是（）。
A．Click B．LostFocus C．DblClick D．MouseDown10．现有一菜单项Menu1，若想在程序运行的过程中选中该菜单项，即在该菜单项前面显示“√”，应执行下面的（）语句。
A．Menu1.Checked=False B．Menu1.Checked=TrueC．Menu1.Enabled=False D．Menu1.Enabled=True11．能使Form1窗体重现的代码是（）。
A．Form1.hide B．Form1.cls C．Form1.show D．me.cls12．下面各方法中，不能打开某一对象的属性窗口的是（）。
2004年(春)笔试试卷
2004年（春）二级考试笔试卷（VB）第二部分 Visual Basic 程序设计一、选择题21．在VB中，下列关于控件的属性或方法中，搭配错误的有________个。
1）Timer1.Interval 2)List1.Cls 3) Text1.Print4)List1.RemoveTtem 5)Vscroll1.Value 6) Picture1.PrintA. 0B. 1C. 2D. 322.下面所列的控件中，其值既能在程序设计时设定，又能在程序运行时通过赋值改变的是________。
A.List1.ListCountB.Text1.IndexC. Dir1.Pathbel1.Visible23.下面________语句，可以将列表框List1中的当前选定的列表项的值替换成”ABC”。
A.List1.AddItem”ABC’,List1.ListIndexB.List.Text=”ABC”C.List1.List(List.ListIndex)=”ABC”D.前三项均可24．函数CInt(-3.5),Int(-3,5),Fix(-3,5)的值分别是________。
A.-3 ,-4 , -3B.-4 , -4 ,-4C.-3 , -4 , -4D.-4, -3 , -325.设整形变量a、b 的当前取值分别为200与20，以下赋值与句中不能正确执行的是______。
A.Text1=a/b*aB. Text1 = a*a/bC. Text1 = “200”*a/bD. Text1 = A & b & a26.对正实数X 的第四位小数四舍五入的VB表达式是________。
A．0.001*Int(x+0.005) B.0.001*(1000*x+0.5)C.0.001*Int(1000*x+5)D.0.001*Int(1000*(x+0.0005))27.下列有关数组的说法中,不正确的是________。
2004年4月
2004年4月全国计算机等级考试二级VB语言笔试试题及答案一、选择题（(1)—(20)每小题2分，(21)—(30)每小题3分，共70分）下列各题A) 、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
(1) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Move 500，500End Sub程序运行后，单击命令按钮，执行的操作为A) 命令按钮移动到距窗体左边界、上边界各500的位置B) 窗体移动到距屏幕左边界、上边界各500的位置C) 命令按钮向左、上方向各移动500D) 窗体向左、上方向各移动500(2) 在窗体上有若干控件，其中有一个名称为Text1的文本框。
影响Text1的Tab顺序的属性是A) TabStop B)EnabledC) Visible D)TabIndex(3) 以下定义数组或给数组元素赋值的语句中，正确的是(4) 在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为A) For i=0 To List1.ListCount-1……NextB) For i=0 To ListCount-1……NextC) For i=1 To List1.listCount……NextD) For i=1 To ListCount……Next(5) 以下Case语句中错误的是A) Case 0 To 10 B) Case Is%26gt;10C) Case Is%26gt;10 And Is%26lt;50 D) Case 3,5,Is%26gt;10(6) 以下关于图片框控件的说法中，错误的是A) 可以通过Print方法在图片框中输出文本B) 清空图片框控件中图形的方法之一是加载一个空图形C) 图片框控件可以作为容器使用D) 用Stretch属性可以自动调整图片框中图形的大小(7) 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是A) Visual B) Basic C) 6 D) 11(8) 以下叙述中错误的是A) 下拉式菜单和弹出式菜单都用菜单编辑器建立B) 在多窗体程序中，每个窗体都可以建立自己的菜单系统C) 除分隔线外，所有菜单项都能接收Click事件D) 如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见(9) 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是A) 123.45 B) 12345.00 C) 12345 D)00123.45(10) 以下叙述中错误的是A) 一个工程可以包括多种类型的文件B) Visual Basic应用程序既能以编译方式执行，也能以解释方式执行C) 程序运行后，在内存中只能驻留一个窗体D) 对于事件驱动型应用程序，每次运行时的执行顺序可以不一样(11) 以下关于函数过程的叙述中，正确的是A) 函数过程形参的类型与函数返回值的类型没有关系B) 在函数过程中，过程的返回值可以有多个C) 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D) 如果不指明函数过程参数的类型，则该参数没有数据类型(12) 以下关于变量作用域的叙述中，正确的是A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用B) 全局变量必须在标准模块中声明C) 模块级变量只能用Private关键字声明D) Static类型变量的作用域是它所在的窗体或模块文件(13) 确定一个控件在窗体上的位置的属性是A) Width和Height B) Width或HeightC) Top和Left D) Top或Left(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A) Visual B) Basic C) Program D) 出错(15) 以下关系表达式中，其值为False的是A) "ABC">"AbC" B) "the"<>"they"C) "VISUAL"=UCase("Visual") D) "Integer">"Int"(16) 语句Print 5/4*6\5 Mod 2的输出结果是A) 0 B) 1 C) 2 D) 3(17) 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：Private Sub Command1_Click()strText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是A)空B) abcdef C) abc D) def(18) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = -5If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是A) -5 B) 25 C) 1 D) -1(19) 一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是A) 变量X、Y的作用域相同B) Y的作用域是Model1C) 在Form1中可以直接使用X D) 在Form2中可以直接使用X和Y(20) 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。
vb历年考题答案
第一章 ~ 第六章历届考题答案(2009-06-17 08:58:25)标签：教育分类：VB教学第一章历届考题答案【2003年4月】（1）D【2003年9月】（4）B （5）C【2004年4月】（10）C（1）【1】.bas【2005年9月】（11）B （13）C【2006年4月】（11）D （12）C【2006年9月】（12）C第二章历届考题答案【2002年9月】（2）A （3）C【2003年4月】（2）A【2003年9月】（1）C （2） A （3）B （9）C （11）A【2004年4月】（13）C【2004年9月】（2） C （11）D【2005年9月】（12）C【2006年4月】（13）B【2006年9月】（11）A第三章历届考题答案【2002年9月】（1）C第四章历届考题答案【2002年9月】（4）A （5） D （6）B （7）B （9）D（10）B （22）C【2003年4月】（3）D （4）B （5）B （6）A （25）C【2003年9月】（6）A （7）B【2004年4月】（7）C （12）B （15）A （16）B（4）【6】(Cos(a+b))^2/(3*x)+5【2004年9月】（12）A （14）B （15）D （16）A（1）【1】Shanghai【2005年4月】（12）B （13）B【2005年9月】（14）D （15）C【2006年4月】（14）A （15）B （16）D （17）B【2006年9月】（13）D （14）B （16）D （33）A（6）【6】X%>=0 AND X%<100【2007年4月】（11）B （12）D【2007年9月】（14）C第五章历届考题答案【2002年9月】（8）D【2003年4月】（7）C （8）C【2003年9月】（10）B【2004年4月】（1）B （9）B【2004年9月】（6）D （19）D【2005年4月】（14）C （16）C （17）D（6）【6】12345.68【2005年9月】（16）C （17）A【2006年4月】（18）A （19）A（6）【6】12,345.68【2007年4月】（24）C第六章历届考题答案【2002年9月】（11）D （12）D （13）D （14）C （16）B（1）【1】Change 【2】Value（3）【6】Change（6）【10】计算机【11】等级考试（8）【13】Interval（9）【14】List1_DblClick【15】List1.Text【2003年4月】（9）A （10）D（1）【1】组合框（4）【4】Picture1.Picture=Loadpicture("d:\pic\a.jpg")（5）【5】Timer【2003年9月】（8）D （15）B （16）A （26）D（3）【5】1000 【6】True 【7】Time（4）【8】BASIC（5）【9】0 【10】List1.ListIndex 【11】List1.ListCount 【2004年4月】（2）D （4）A （6）D （14）C （17）D（3）【4】Interval 【5】500（5）【7】Picture1.Picture=LoadPicture("c:\moon.jpg")【2004年9月】（1）B （3）A （7）D （13）C （27）A【2005年4月】（11）A （18）A （19）B （20）D（7）【7】VB程序设计【8】VB Programming【2005年9月】（18）B （19）B【2006年4月】（30）A【2006年9月】（17）B （21）C（7）【7】Change【2007年4月】（13）B （14）C （16）A （17）B【2007年9月】（11）B （12）D （13）C （15）A （16）B（18）A （19）C （23）A （24）B （26）B（6）【6】Combo1.List(Combo1.ListIndex)（7）【7】pos 【8】HScroll1.Value已投稿到：排行榜阅读(229)|评论(6)|收藏(0)|打印|举报第七章 Visual Basic控制结构历届考题答案(2009-06-08 15:15:38)标签：教育分类：VB教学【2002年9月】（15）A （17）B （18）B（5）【8】x>=0 【9】x<amin 或 x<=amin 或 amin>x 或 amin>=x 【2003年4月】（11）D （22）C （24）B（3）【3】9（6）【6】Rnd 【7】x mod 5 【8】x（8）【11】"123456789"【2003年9月】（19）A （20）A （21）B （22）C （27）C （29）C（1）【1】5.6 【2】5【2004年4月】（5）C （18）C （25）B （26）C（8）【12】*(1/i) 或 /i【2004年9月】（5）C （8）B （17）B （28）B（2）【2】3（3）【3】List1.AddItem i 【4】List1.ListCount-1 【5】List1.List(i)（4）【6】n 【7】1【2005年4月】（15）D （21）A （22）B （23）C （27）D （32）D（8）【9】10（9）【10】求1到8之间的整数的累加和【11】36【2005年9月】（20）A （21）D （22）A（7）【7】s & c 或 s + c 【8】-1（10）【14】Text1.Text 【15】List1.List(k)【2006年4月】（20）A （23）D【2006年9月】（15）B （18）B （19）C （20）D（8）【8】6 - i【2007年4月】（20）C （21）D （28）D （30）C（6）【6】0 【7】n-1【2007年9月】（20）A （32）C（9）【11】=10 【12】x第八章数组历届考题答案(2009-06-13 21:46:23)标签：教育分类：VB教学【2002年9月】（19）A （20）D （21）C（2）【3】Option1(i).Value 【4】opt 【5】Label4.Caption【2003年4月】（13）B （14）D （26）C【2003年9月】（25）C （30）D（6）【12】Max 【13】Max=arr1(i)【2004年4月】（3）A （21）B （29）D （30）A（6）【8】Index 【9】FontName 或 Font【2004年9月】（24）B （25）C （29）D（5）【8】t 【9】a(3) 【10】a(1)（6）【11】Label1(i).Caption 【12】Label2.Caption（7）【13】a(i,j) 【14】a(j,i) 【15】s【2005年4月】（25）B （28）B （30）A （31）C（10）【12】arr1(1) 【13】Min=arr1(i)【2005年9月】（23）A （24）D （25）C （26）A（9）【11】text1(0) 【12】1（或0）【13】sum-max-min【2006年4月】（21）B （22）C （24）A（7）【7】Max<arr(i) 【8】Min>arr(i)【2006年9月】（22）D （23）B （24）A（9）【9】10 【10】10 【11】A(10*(i-1)+j)【2007年4月】（15）B （19）D （33）A （35）A【2007年9月】（21）D （27）D （35）A第九章过程历届考题答案(2009-07-15 08:22:49)标签：杂谈分类：VB教学【2002年9月】（23）B （24）B （25）D（7）【12】200【2003年4月】（15）D （17）B （18）C （23）B （28）D（7）【9】30 【10】90（10）【15】5【2003年9月】（23）C （24）A【2004年4月】（11）A （24）A （28）C（7）【10】tmpLabel 【11】tmpCombo（9）【13】a ( ) 【14】UBound(b) 【15】n=n-1【2004年9月】（21）B （22）D （23）C （26）A （30）C【2005年4月】（29）B （35）A【2005年9月】（27）D （28）B（6）【6】30（8）【9】n-r 【10】t=1【2006年4月】（25）D （26）B （27）D （28）C （34）C（8）【9】-5 【10】5【2006年9月】（25）B （26）A （27）C【2007年4月】（23）D （31）B（9）【15】4【2007年9月】（28）C （29）D （30）B （31）D （34）B（10）【13】Text1.Text 【14】1 【15】SetFocus。
2004级VB期末试卷(带答案)
VB 程序设计试卷(2004级)一、单项选择题（每小题1分，共35分）1．下列叙述中，错误的是【1】。
BA) 启动Visual Basic后，屏幕只有一个窗体Form1 B) 工程文件的扩展名是.basC) 使用标准工具栏上的按钮可以打开工具箱窗口D) 标准模块由程序组成2．对象的组成的三个要素是【2】。
CA) 函数、过程、语句B) 窗体、控件、行为C) 属性、方法、事件D) 窗体、模块、控件3．Visual Basic中的DbClick、Change是对象的【3】。
AA) 事件B) 方法C) 属性D) 名称4．若要将窗体从内存中卸载，其实现的方法是___【4】____。
CA) 使用Show方法B) 使用Load语句C) 使用UnLoad语句D) 使用Hide方法5．设当前日期是2005年5月25日表达式，Print Day(Now)的输出结果是【5】。
BA) 2005 B) 25 C) 5/25/05 D) 56．在C:\pic文件夹下有一个图形文件，名为Wel.gif。
为了将该图形装入窗体Form1，应使用的正确语句是【6】。
BA) Form1.Picture="Wel.gif" B) Form1.Picture=LoadPicture("C:\Pic\Wel.gif")C) Form1.Picture=C:\Pic\Wel.gif D) Form1.Picture= LoadPicture (C:\Pic\Wel.gif)7．要让窗体不具有最大化功能，应该将窗体的【7】属性设置为False。
BA) Max B) MaxButton C) AutoRedraw D) BorderStyle8．VB变量名abc%的类型是【8】。
CA) 字符串类型B) 单精度类型C) 整型D) 双精度类型9．以下关系表达式中，其值为False的是【9】。
BA) "the"<>"they" B) "ABC">"AbC"C) "VISUAL"=UCase("Visual") D) "Integer">"Int"10．用于设置命令按钮是否为取消按钮的属性是【10】。
2004年VB期中考卷
浙江大学城市学院VB程序设计试卷（2003-2004/2期中）注: 请将答案写在答卷纸上一、是非题（10%）1、用DIM定义数值变量时，该数值变量自动赋初值为0。
2、语句PRINT X=1是非法语句。
3、InputBox函数的返回值是数值类型。
4、表达式中若有多种运算，计算机按算术运算→逻辑运算→关系运算的顺序求值。
5、全局变量用Global或Public关健字声明，且仅在通用声明段处可以定义。
6、使用Redim语句既可以改变数组的大小，也可以改变数组类型。
7、IF 与END IF 必须成对的使用，有一个IF就有一个END IF 与之相对应。
8、Do-----Loop While语句实现循环时，不管条件真假，首先无条件地执行一次循环。
9、如果用户不需要函数的返回值，可以用调用过程的相同方法调用函数。
10、过程中的静态变量与局部变量的区别是，静态变量可以被别的过程存取，而局部变量只在本过程有效。
二、单选题（15%）1、可作为Visual Basic变量名的是。
（A）show （B）Alphi_1（C）2E3 （D）4D+22、语句X=X+1表示。
（A）变量X的值与X+1的值相等（B）将变量X的值存到X+1中去（C）将变量X的增1后再赋给X （D）变量X的值为13、不正确的VB常量是。
（A）123! （B）&HABC&（C）&O18 （D）#1-1-03#4、变量X# 占字节内存容量。
（A）2 （B）4（C）6 （D）85、声明符号常量应该用关键字。
（A）Static （B）Const（C）Private （D）Variant6、将一数值X取整，且对小数部分进行四舍五入的式子是。
（A）INT(X+0.5) （B）Fix(X)（C）Sgn(X) （D）Fix(X)+17、下列表达式的值为True或False的是。
（A）A$+B$ （B）a&+b&（C）a#-b% （D）a#>b!8、表达式5 Mod 3+5\3的值等于。
vb程序设计考试题库及答案
vb程序设计考试题库及答案一、单项选择题（每题2分，共40分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. IntC. RealD. All of above答案：D2. VB中，哪个函数用于计算两个数的最大值？A. MinB. MaxC. AbsD. Sgn答案：B3. 在VB中，以下哪个是合法的变量名？A. 2variableB. variable2C. _variableD. All of above答案：D4. VB中，以下哪个是正确的循环结构？A. For EachB. For AllC. Do WhileD. All of above答案：D5. 在VB中，以下哪个是正确的条件语句？A. If...Then...ElseB. Switch...CaseC. Select...CaseD. All of above答案：D6. VB中，哪个函数用于计算一个数的绝对值？A. AbsB. RoundC. SqrD. Int答案：A7. 在VB中，以下哪个是合法的数组声明？A. Dim arr(10) As IntegerB. Dim arr() As Integer = New Integer(10)C. Both A and BD. None of the above答案：C8. VB中，哪个函数用于将字符串转换为大写？B. UCaseC. StrCompD. StrConv答案：B9. 在VB中，以下哪个是正确的事件处理程序的声明方式？A. Private Sub Form_Click()B. Public Sub Form_Click()C. Both A and BD. None of the above答案：A10. VB中，哪个函数用于计算一个数的平方根？A. SqrB. PowC. ExpD. Log11. 在VB中，以下哪个是正确的文件打开模式？A. Open For InputB. Open For AppendC. Open For RandomD. All of above答案：D12. VB中，哪个函数用于计算一个数的指数？A. SqrB. PowC. ExpD. Log答案：B13. 在VB中，以下哪个是正确的窗体属性？A. CaptionC. Both A and BD. None of the above答案：C14. VB中，哪个函数用于计算一个数的自然对数？A. SqrB. PowC. ExpD. Log答案：D15. 在VB中，以下哪个是正确的控件事件？A. ClickB. DoubleClickC. Both A and BD. None of the above答案：C16. VB中，哪个函数用于计算一个数的四舍五入？A. RoundB. IntC. FixD. Sgn答案：A17. 在VB中，以下哪个是正确的控件属性？A. NameB. CaptionC. Both A and BD. None of the above答案：C18. VB中，哪个函数用于计算一个数的符号？A. AbsB. SgnC. RoundD. Int答案：B19. 在VB中，以下哪个是正确的控件事件？A. KeyPressB. KeyDownC. Both A and BD. None of the above答案：C20. VB中，哪个函数用于计算一个数的固定整数部分？A. RoundB. IntC. FixD. Sgn答案：C二、填空题（每题2分，共20分）21. VB中，使用________函数可以将一个字符串转换为小写。
2004年9月VB
2004年9月全国计算机等级考试二级VB笔试试卷（含参考答案）一、选择题（(1)—(20)每小题2分，(21)—(30)每小题3分，共70分）(1) 设窗体上有一个文本框，名称为text1,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是：A)text1.maxlength=0 B)text1.enabled=flaseC)text1.visible=flase D)text1.width=0(2) 以下能在窗体Form1的标题栏中显示“VisualBasi c窗体"的语句是A) ="VisualBasic窗体"B) Form1.Title="VisualBasic窗体"C) Form1.Caption="VisualBasic窗体"D) Form1.Text="VisualBasic窗体”(3) 在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。
程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：以下能实现上述操作的程序段是A) Private Sub HScroll_Change()Text1.Text=HScroll1.ValueEnd SubB) Private Sub HScroll_Click()Text1.Text=HScroll1.ValueEnd SubC) Private Sub HScroll_Change()Text1.Text=HScroll.CaptionD) Private Sub HScroll_Click()Text1.Text=HScroll.CaptionEnd Sub(4) 设菜单中有一个菜单项为"Open"。
若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行"Open"命令，则在菜单编辑器中设置“Open"命令的方式是A) 把Caption属性设置为&OpenB) 把Caption属性设置为O&penC) 把Name属性设置为&OpenD) 把Name属性设置为O&pen(5) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=InputBox("Input")Select Case xCase 1,3Print "分支 1"Case Is >4Print "分支 2"Case ElsePrint "Else 分支 "End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是A）分支1 B）分支2 C） Else分支 D) 程序出错(6) 以下关于MsgBox的叙述中，错误的是A） MsgBox函数返回一个整数B) 通过MsgBox函数可以设置信息框中图标和按钮的类型C) MsgBox语句没有返回值D) MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量(7)在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是A）Timer1.InterVal=0.5 B) Timer1.Interval=5C) Timer.Interval=50 D) Timer1.Interval=500(8) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Static x As IntegerClsFor i=1 To 2y=y+xx=x+2NextPrint x,yEnd Sub程序运行后，连续三次单击Command1按钮后，窗体上显示的是A) 4 2 B) 12 18 C) 12 30 D) 4 6(9) 以下关于多重窗体程序的叙述中，错误的是A)用Hide方法不但可以隐藏窗体，而且能清除内存中的窗体B）在多重窗体程序中，各窗体的菜单是彼此独立的C）在多重窗体程序中，可以根据需要指定启动窗体D）对于多重窗体程序中，而且单独保存每个窗体(10)以下关于文件的叙述中，错误的是A）顺序文件中的记录一个接一个地顺序存放B）随机文件中记录的长度是随机的C）执行打开文件的命令后，自动生成一个文件指针D）LOF函数返回给文件分配的字节数(11) 以下叙述中错误的是A）事件过程是响应特定事件的一段程序B）不同的对象可以具有相同名称的方法C）对象的方法是执行指定操作的过程D）对象事件的名称可以由编程者指定(12) 以下合法的Visual Basic标识符是A) ForLoop B) Const C) 9abc D) a#x(13) 当一个复选框被选中时，它的Value属性的值是A) 3 B) 2 C) 1 D) 0(14) 表达式 5 Mod 3+3\5*2的值是A) 0 B) 2 C)4 D) 6(15) 设x=4,y=8,z=7，以下表达式的值是x<y And (Not y>z) Or z<xA) 1 B) -1 C) True D) False(16) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()a$="VisualBasic"Print String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是A） VVV B) Vis C) sic D) 11(17) 设有如下程序段：x=2For i=1 To 10 Step 2x=x+iNext运行以上程序后，x的值是A) 26 B) 27 C) 38 D) 57(18) 以下叙述中错误的是A) 在KeyPress事件过程中不能识别键盘的按下与释放B) 在KeyPress事件过程中不能识别回车键C) 在KeyDown和KeyUp事件过程中，将键盘输入的"A"和"a"视作相同的字母D) 在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符资料来源：东方教育网全国计算机等级考试频道(19) 执行如下两条语句，窗体上显示的是a=9.8596Print Format(a,"$00,00.00")A) 0,009.86 B) $9.86 C) 9.86 D) $0,009.86(20)在窗体上画一个名称为CommandDialog1的通用对话框，一个名称为Command1的命令按钮。
VB题库(带答案)
VB题库(带答案)VB练习题1.下面哪一个叙述为正确的？D（A）VB的编程非常简单，只要将窗体上的控件设置好，再将控件的属性按要求设置即可完成程序的编制。
（B）VB的特点中的可视化编程是指随时可使用打印预览看一下效果。
（C）VB的特点中的事件驱动机制是系统已经编制好的一些针对控件的程序，可以直接调用。
（D）VB系统提供了数据库管理功能。
2.下面哪一个叙述为错误的？D（A）VB的编程非常简单，因为系统提供了很多编制好的控件，可直接放到界面上使用。
（B）VB是面向对象的程序设计，并且具有结构化的程序设计语言。
（C）VB的特点中的事件驱动机制是系统可以感知一些动作，当该动作产生时自动去执行对应的事件过程。
（D）VB系统没有提供数据库管理功能。
3.下面哪一个叙述为正确的？B（A）VB源程序有工程文件、窗体文件、模块文件等，工程文件包含所有的文件，源程序备份只需要备份工程文件即可。
（B）VB源程序有工程文件、窗体文件、模块文件等，工程文件包含所有的文件，源程序备份需要备份所有相关文件。
（C）VB源程序有工程文件、窗体文件、模块文件等，源程序备份只需要备份窗体文件和模块文件即可。
（D）VB源程序如果有多个窗体文件，没有模块文件，源程序备份只需要备份窗体文件即可。
4.VB窗体设计器的主要功能是：A（A）建立用户界面（B）编写程序代码（C）画出图形控件（D）显示标准控件5下面哪一个叙述为正确的？A（A）在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序，只需要双击工程文件即可。
（B）在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序，只需要双击窗体文件即可。
（C）在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序，只需要双击模块文件即可。
（D）在安装有VB系统程序的计算机上，修改一个以前编制的VB源程序，双击源程序中的任何文件都不能打开源程序。
6.什么是对象？A（A）对象是具有特殊属性和行为方式的实体。
04年VB考卷
一、单项选择题（从下列各题四个备选答案中选出一个正确答案，并将其代号写在答题纸上。
多选或少选均不给分。
每小题2分，共40分。
）1．Visual Basic中的控件分为两类，一类是ActiveX控件，另一类是（）。
A)文本控件B)标准控件C)外部控件D)图形控件2．标准模块的扩展名是（）。
A)bas B)cls C)frm D)res3．在Visual Basic中，被称为对象的是A)窗体B)控件C)控件和窗体D)窗体、控件和它们的属性4．Visual Basic 6.0分为3种版本，不属于这3种版本的是A)学习版B) 旗舰版C)企业版D) 专业版5．确定控件位置的属性是A) Width和Height B)Width或LongC) Right和Left D)Top和Left6．在设计阶段，当双击窗体上的某个控件时，打开的窗口是A)工程资源管理器窗口B)对象窗口C)代码窗口D)属性窗口7．以下能在文本框Text1中显示“Vis ual "的语句是（）A)="Visual "B)Text="Visual"C)Text1.Caption="Visual "D)Text1.Text="Visual "8．下列可作为Visual Basic变量名的是（）。
A) A%A B) 6A C)*array D)cosB9．执行以下程序段a$="Visual Basic Programming"b$="BASIC"C$= LCase(Left(a, 7) & b) & Right(a, 12)后,变量C的值为（）。
A)visual basic Programming B)VISUAL C++ ProgrammingC)visual C++ Programming D)visual BASIC Programming10．以下关系表达式中，其值为True的是（）。
2004年9月全国计算机等级考试二级VB笔试试题
83
75
96
76
51
86
73
73
75
94
52
97
83
97
64
68
53
78
81
87
78
69
54
63
71
92
86
68
55
67
82
87
63
86
注：*表示专家有事外出未给应聘者打分
65
94Biblioteka 63386394
*
82
76
39
71
82
61
57
61
40
55
72
95
85
64
41
86
55
67
62
80
42
51
65
78
94
80
43
81
94
73
63
95
44
90
63
95
91
87
45
60
83
64
79
83
46
74
94
96
89
76
47
63
74
91
94
83
48
58
63
84
84
72
49
68
93
91
82
91
50
25
59
97
75
76
88
26
65
87
86
64
96
27
84
78
83
61
2004年9月全国计算机等级考试二级VB笔试试题-推荐下载
一、选择题 （(1)～(20)每小题2分，(21)～(30)每小题3分，共70分下列各题 A)、 B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
(1)设窗体上有一个文本框，名称为text1,程序运行后，要求该文本框只能显示信息，不能接受输入的信息，以下能实现该操作的语句是 A ．Text1.MaxLength=0 B ．Text1.Enabled=Flase C ．Text1.Visible=Flase D ．Text1.Width=0(2)以下能在窗体Form1的标题栏中显示“VisualBasic 窗体"的语句是 A ．="VisualBasic 窗体"B ．Form1.Title="VisualBasic 窗体"C ．Form1.Caption="VisualBasic 窗体"D ．Form1.Text="VisualBasic 窗体”(3)在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min 和Max 属性分别为0和100。
程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示。
以下能实现上述操作的程序段是 A ．Private Sub Hscroll1_Change() Text1.Text=HScroll1.Value End Sub B ．Private Sub Hscroll1_Click() Text1.Text=HScroll1.Value End Sub C ．Private Sub Hscroll1_Change() Text1.Text=Hscroll1.Caption End Sub D ．Private Sub Hscroll1_Click() Text1.Text=Hscroll1.Caption End Sub(4)设菜单中有一个菜单项为"Open"。
2004年(春)二级考试笔试卷参考答案(VB)
2004年（春）二级考试笔试卷参考答案（VB）（本试卷包括计算机基础知识部分和程序设计部分，考试时间共120分钟）（红色选项为答案部分）第一部分计算机基础知识(各语种相同)1．几十年来，集成电路技术的发展很快，根据摩尔定律（Moore Law），在过去几十年以及在可预测的未来几年，单块集成电路的集成度平均大约每（１）个月翻一番。
A. 1-6B.6-12C.12-24D.24-362．计算机中的数值信息分成整数和实数（浮点书）。
实数之所以能表示很大或很小的数，是由于使用了（２）。
A．阶码 B.补码 C.反码 D.较长的尾数3．至目前为止，已发布多种汉字信息的编码标准。
在下列叙述中，错误的是（３）。
A.无论采用那种编码标准（如GBK、UCS-4等），汉字的机内码都是采用16位二进制表示的。
B.中文版Windows98/2000操作系统都支持GB2312-80、GBK等多种汉字编码标准。
C.GB2312-80是我国颁布的第一个汉字信息编码的国家标准。
D.不同的汉字输入法，其可以输入的不同汉字个数可能有所不同。
4．在使用IE浏览网页的时候，网页上的图片一般不会下载并保存在Windows的某个文件夹中。
目前网页上使用的图片文件大多数为（４）格式文件。
A. BMPB.WMFC.TIFD.JPG5．波形声音的主要参数有取样频率、量化尾数、声道数目、压缩编码方式等。
若取样频率为44.1KHZ、量化位数为16位、声道数目为2、则2分钟声音的数据量大约为（５）（不进行压缩处理时）。
A. 0.4MBB.6MBC.11MBD.21MB6．下列有关视频信息在计算机中的表示与处理的叙述中，错误的是（６）。
A.多媒体计算机中所说的视频信息特指运动图像。
B.MPEG系列标准均是关于数字视频（及其伴音）压缩编码的国际标准。
C.MPEG-2标准主要用于数字电视。
D.DVD-Video采用MPEG-2标准对图像进行压缩。
7．下列关于目前PC机主板上的CMOS存储器的叙述中，错误的是（７）。
vb历年考题答案.doc
第一章历届考题答案【2003年4月】 (1) D【2003年9月】 (4) B(5) C【2004年4月】(10) 0(1) [1].bas【2005年9月】 (11) B (13) C【2006年4月】 (11) D(12) C【2006年9月】(12) C第二章历届考题答案[2002年9月】 (2) A(3) C[2003年4月】 (2) A[2003年9月】 (1) C(2) A(3) B(9) C (11) A[2004年4月】(13) C【2004年9月】 (2) C(11) D【2005年9月】(12) C[2006年4月】(13) B【2006年9月】 (11) A第三章历届考题答案[2002年9月】 (1) C第四章历届考题答案【2002年9月】(4) A (5) D (6) B(7) B (9) D(10) B(22) C【2003年4月】(3) D (4) B (5) B(6) A (25) C[2003年9月】(6) A (7) B【2004年4月】(7) C(12) B (15) A (16) B(4) [6]1 (Cos(a+b))"2/(3*x)+5 【2004年9月】(12) A (14) B (15) D(16) A(1) [1]Shangha i【2005年4月】 (12) B (13) B【2005年9月】 (14) D (15) C【2006年4月】(14) A(15) B (16) D (17) B第一章~第六章 标签：教育历届考题答案(2009-06-17 08:58:25)分类: VB 教学【2006年9月】 (13) I) (14) B(16) DX%>二0 AND (33) AX%<100(6) [6] 【2007年4月】 (11) B(12) D【2007年9月】(14) C[2003年4月】(9) A(10) I)(1) (4) (5) [11组合框[4] Picturel. Picture=Loadpicture ("d:\pic\a. jpg /z ) [5] Timer【2003年9月】(8) D(15) B (16) A(26) D(3) [5] 1000 [6] True[7] Time(4) [8] BASIC(5) [9] 0[10] Listl. Listindex 【11】Listl. ListCount【2004年4月】(2) D (4) A (6) D (14) C (17) D【2002年9月】 (8) D【2003年4月】 (7) C(8) C【2003年9月】 (10) B【2004年4月】 (1) B (9) B【2004年9月】 (6) D (19) D【2005年4月】(14) C(16) C (17) D(6) [6]12345. 68【2005年9月】 (16) C (17) A【2006年4月】(18) A(19) A(6) [6]12, 345. 68【2007年4月】(24) C第7弋章历届考题答案【2002年9月】 (11) D (12) D (13) D(6) (8) (9) [1 ] Change[6] Change [10]计算机 [13] Interval【14】 Listl_DblClick【15】 Listl. Text(14) C (16) B [2] Value【11】等级考试第五章历届考题答案 (1)[4] Interval [5] 500(5) [7] Picturel. Picture=LoadPictureC'c:\moon. jpg") 【2004年9月】 (1) B (3) A (7) D (13) C (27) A【2005年4月】(11) A(18) A(19) B(20) D(7) [7] VB 程序设计【8】VBProgramming【2005年9月】 (18) B(19) B【2006年4月】 (30) A【2006年9月】(17) B(21) C(7) [7] Change【2007年4月】 (13) B (14) C (16) A (17) B 【2007年9月】(11) B(12) D (13) C (15) A (16) B(18) A(19) C(23) A(24) B(26) B(6) [6] Combol. List(Combol. Listindex)(7) [7] pos [8] HScrol 11. Value已投稿到：排行榜阅读(229) |评论(6) |收藏(0) |打印|举报第七章 Visual Basic 控制结构 历届考题答案(2009-06-0815：15：38)标签：教育 分类：VB 教学(3) [3] 9【2002年9月】(15) A (17) B (18) Bamin>=x(5)【8]x>=0[9]x<amin 或 x<=amin 或 amin>x 或【2003年4月】(11) D(22) C (24) B(6) [6] Rnd [7] x mod 5 [8] x【2003年9月】(19) A(8)【11】 "123456789〃(20) A (21) B (22) C (27) C (29) C(1)【1】5.6 [2] 5 【2004年4月】(5) C (18) C (25) B (26) C(8) [12] *(l/i)或/i【2004 年 9 月】(5) C (8) B (17) B (28) B(2)【2】3(8)【8】6 - i(3)[3]Listl.AddTtem i[4]Listl. ListCount-1 [5]Li stl. Li st (i)(4) [6] n[7] 1【2005年4月】 (15) (21) A (22) B (23)C (27) I) (32) D(8) [9] 10(9) [10]求1到8之间的整数的累加和[11] 36【2005年9月】 (20)(21) D (22) A(7) [7] s & c 或 s + c [8] -1【2006年4月】 (20) 【2006年9月】 (15)(10)【14] Textl. Text【15】 Listl. List (k)(23) D(18) B (19) C (20) D【2007年4月】 (20) (21) D (28) D (30)(6) [6] 0 [7] n-1【2007年9月】 (20) (32) C (9) [11] =10 【12】历届考题答案(2009・06・13 21:46:23)[2002年9月】(19) A (20) D (21) C(2) [3] Optionl(i). Value [4] opt 【5】Label4.Caption[2003年4月】(13) B (14) D (26) C[2003年9月】(25) C (30) D第八章数组标签：教育分类：VB教学(6) [11] Label1 (i). Caption [12] Label2. Caption(7) 【13】 a(i, J) 【14] a(j, i)【15] s [2005年4月】(25) B(28) B(30) A(31) C(10) 【12】 arrl (1)[13] Min=arrl(i) 【2005年9月】(23) A(24) D (25) C(26) Ain[2006年4月】(9) 【11】 textl (0) 【12】1(或0)【13】 sum-max-m(21) B(22) C (24) A(7) [7] Max<arr(i)[8] Min>arr(i)[2006年9月】(22) D(23) B (24) A(9) [9] 10[10] 10【11】 A(10*(i-l)+j)[2007年4月】(15) B(19) D (33) A (35) A【2007年9月】 (21) D(27) D(35) A第九章过程历届考题 答案（200 9-07-15 08:22:49)标签：杂谈分类：VB 教学[2002年9月】(23) B(24) B (25) D(7) [12] 200[2003年4月】(15) D(17) B (18) C(23) B (28) D(7) [9] 30【10】90(10) [15： 1 5【2003年9月】 (23) C (24) A【2004年4月】(11) A(24) A (28) C(7) [10] tmpl.a bel 【11】 tmpCombo(9) [13] a ()[14] UBound(b) [15] n=n-l【2004年9月】 (21) B (22) D(23) C(26) A (30) C【2005年4月】 (29) B (35) A【2005年9月】(27) D(28) B(6) [6] 30⑻ [9] n~r【10】t 二1【2006年4月】(25) D (26) B (27) D(28) C(34) C【2004年4月】(3) A (21) B (29) D(30) A(6) 【8】 I ndex [9] FontName 或 Font【2004年9月】(24) B (25) C (29) D(5) 【8】 t[9] a(3)[10] a(l)(6) [12] Max [13] Max=arr 1 (i)(8) [9] -5 [10] 5【2006年9月】(25) B (26) A (27) C【2007年4月】(23) D (31) B(9)【15】 4【2007年9月】(28) C (29) D (30) B (31) D (34) B。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB习题库（2004年）1.1简单的动画演示。
一行文字“欢迎使用VB”在具有背景图案的窗体中上下移动。
移动方法有两种：单击“手动”按钮一次，移动50twip单位；单击“自动”按钮，连续移动；当内容超出窗体范围，进行反弹。
2.1编写一个对输入字符进行转换的程序。
转换规则为，将其中的大写字母转换成小写字母，小写字母转换成大写字母，空格不转换，其余转换成“*”。
要求每输入一个字符，马上就进行判断和转换。
2.4窗体无最大化按钮和最小化按钮，在窗体装入时，在窗体的标题栏显示“装入窗体”，并在窗体装入Windows墙纸作为背景；当用户单击窗体，在标题栏显示“单击”，在窗体显示“欢迎使用VB”；当用户双击窗体，在标题栏显示“鼠标双击”，去除窗体的背景图案，并显示“结束使用VB”。
程序运行界面依次如下。
2.5利用两个标签控件，显示具有浮雕效果的文字。
如下图。
2.7要求输入数字数据。
当输入结束时，对于输入正确的数据，显示正确信息；对输入的非数字数据显示错误信息、清除文本框中的内容，并使焦点重新回到文本框。
2.8建立一个允许剪切、复制和粘贴的简单便笺板程序。
要求：文本框初始为空白，程序运行中由用户输入正文，其中“剪切”、“复制”、“粘贴”按钮以图形形式显示，并且按钮的有效性应根据运行过程随状态而作相应调整，“结束”按钮以标准形式显示。
2.9用Print方法输出如图所示图形。
2.10移动图形示例，程序运行时在图形框装入图形，单击图形框使图形框起始点（左上角）移到窗体的中心，同时图形缩小50%。
4.1编一帐号和密码输入的检验程序。
对输入的帐号和密码规定如下：（1）帐号不超过6位数字，密码4位字符，在本题中，密码假定为“ssmu”。
（2）密码输入时在屏幕上不显示输入的字符，而以“*”代替。
（3）当输入不正确，如帐号为非数字字符，密码不正确等，显示有关信息，见下图。
若单击“重试”按钮，则清除原输入的内容，焦点定位在原输入的文本框，再输入，若单击“取消”按钮，则停止程序的运行。
4.2已知变量strC中存放了一个字符，判断该字符是字母、数字还是其他字符，并作相应的显示。
4.3已知输入某课程的百分制成绩mark，要求显示对应五级制的评定，评定条件如下：优mark>=90良80≤mark＜90等级＝中70≤mark＜80及格60≤mark＜70不及格mark＜604.4输入X、Y、Z三个数，比较它们的大小并排列输出，使得X>Y>Z。
4.7由计算机来当一年级的算术老师，要求给出一系列的1~10的操作数和运算符，学生输入该题的答案，计算机根据学生的答案判断正确与否，当结束时给出成绩。
4.8计算并输出1-100的奇数和。
4.9运用循环控制变量输出结果（如图）。
4.10将可打印的ASCII码制成表格输出，使每个字符与它的编码值对应起来，每行打印7个字符。
4.11用辗转相除法求两自然数m,n的最大公约数和最小公倍数。
4.12打印九九乘法表：（1）完整形式；（2）打上三角形式；（3）下三角形式。
4.13 求自然数e 的近似值并输出，要求其误差小于0.00001，近似公式为：∑∑=∞=+≈=++++++=ni i i i n e 10!11!1!1!31!21!1114.14 按每行8个数字依次输出100以内的素数。
4.15 百元买百鸡问题。
假定小鸡每只5角，公鸡每只2元，母鸡每只3元。
现在有100元钱要求卖100只鸡，编程列出所有可能的够鸡方案。
4.16 猴子吃桃子。
小猴在一天摘了若干个桃子，当天吃掉一半多一个；第二天接着吃了剩下的桃子的一半多一个；以后每天都吃尚存桃子的一半零一个，到第7天早上要吃时只剩下一个了，问小猴那天共摘下了多少个桃子？编程列出每天所剩余的桃子数。
4.17 有一根长度为321米的钢材料，要将它截取成两种规格的短料，规格a 、b 的长度分别为17米和27米，每种至少1段，问分隔成a ，b 各多少断后，剩余的残料r 最少？5.2 输入若干学生（学生总人数小于100）的成绩，计算平均分和高于平均分的人数。
5.3 建立含有4个命令按钮的控件数组，当单击某个命令按钮，分别显示不同的图形或结束操作。
5.4建立一个类似国际象棋的棋盘。
要求：（1）在设计时窗体上放一个Label控件，设置其Index属性为0，BackColor为黑色。
（2）程序运行时自动产生64个Label控件数组元素，BackColor黑白交替。
（3）当程序运行后单击某个棋格，改变BackColor颜色，即白变黑、黑变白；并在单击的棋格处显示其序号。
5.5利用自定义数组，编一模拟数据库记录输入、显示、查询的程序。
自定义一个学生记录类型，由姓名、专业、总分组成，声明一个存放最多100个学生纪录的数组；要求，按“新增”按钮，将文本框输入的学生信息加到数组中；按“前一个”或“后一个”按钮，显示当前元素的前或后的纪录；按“最高”按钮，则显示总分最高的显示纪录；任何时候在窗体上显示数组中输入的记录数和当前数组元素位置。
5.6输入一串字符，统计各字母出现的次数（大小写字母不区分），并对出现的字母显示其出现的个数。
5.7输入一系列的数据，输入结束将他们按分隔符分离后存放在数组中。
对输入的数据允许修改和自动识别非数字数据。
5.8对已知存放在数组中的6个随机数，用选择排序法按递增顺序排序并输出。
5.9对已知存放在数组中的6个随机数，用冒泡排序法按递增顺序排序并输出。
5.10（1）在一个递增有序的数组中插入一个输入数值，使得数组仍然递增有序，并输出结果。
（2）在一个递增有序的数组中插入一个输入数值，使得数组仍然递增有序，并输出结果。
6.6要求输入两个整数后计算并输出其最大公约数和最小公倍数，上述操作可通过单击窗体反复进行，直至单击“结束”按钮后结束本程序运行。
6.10计算fac(n)=n!的函数，要求输入n，可以输出计算结果（上述操作可以反复执行）。
6.11最大公约数的递归实现。
6.12如下两分形图分别由若干大小不等、形状相同的三角形构成。
用程序实现它（提示：采用递归算法）。
6.13编一函数，实现一个十进制整数转换成二至十六任意进制的数。
6.14编一加密和解密程序，即将输入的一行字符串的所有字母加密，加密后还可再进行解密。
6.15顺序查找根据查找的关键值与数组中的元素逐一比较，若相同，查找成功，若找不到，则查找失败。
.6.16用二分法查找数据。
6.17用插入排序法输入不多于20个数，使数组保持递增的序列。
7.1用单选框和复选框设置文本框的字体。
7.2框架用法，按图示对文本框进行字体和大小的设置。
7.3编写一个能对列表框进行项目添加、修改和删除操作的应用程序，如图所示。
7.4设计一个如图所示的应用程序，当“计算机”和“操作系统“位被选定时，他们所在的框架的其他控件不能使用。
组合框能够将输入的一个新的选择添加到下面的列表框中供下次选择。
如果单击ok按钮（command1）,则在列表框中显示用户所选择的配置。
7.5建立一个水平滚动条(Hscroll)，其max属性为100，min属性为0，smallchange属性为2，largechange属性为10，value属性初始值为50。
；另外一个文本框（Text1），它显示滑块当前位置所代表的值。
7.6设计一个调色板应用程序，使用三个滚动条作为三种基本颜色的输入工具，合成的颜色显示在右边的颜色区域中。
颜色区实际是一个文本框(TEXT1),用合成的颜色设置其BackColor属性。
当完成调色以后，用“设置前景颜色（Command1）”或“设置背景颜色（Command2）”按钮设置右边文本框（Text2）的颜色。
7.7用Slider控件设置文本框中的字体大小，如下图所示：7.8设计一个能够定时的闹钟，如下图所示。
用户在两个文本框（Text1和Text2）中设置定时时间，然后单击“定时”（Command1）按钮闹钟才开始生效。
两个文本框的MaxLength 属性为2，时钟控件名称为label1，“停止”和“结束”按钮的名称分别为Command2和Command3。
7.9用一个时钟控件控制蝴蝶在窗体内飞舞。
在窗体上定义一个时钟、一个命令和三个图像控件。
7.10设计一个进度条，用来指示一个大数组冗长的操作进度。
7.11设计一个进度条并配上动画，用来指示一个大数组冗长的操作进度。
7.12编制一个如图所示，具有两个选项卡的对话框。
7.13用两个文本框（Text1和Text2）显示鼠标器指针所指的位置。
如图所示：7.14设计一个最简单的画图程序。
程序运行时，按住鼠标右键移动画圆，按住鼠标左键移动画线。
7.17假设窗体上有图形框Picture1，装有某个图形，它能作为源对象被拖放到该窗体的某个地方，如图所示。
如果图形框被拖动到“取消拖放”标签上方，则取消拖放操作。
7.18设计一个如图所示的应用程序。
左边的图像框采用手工拖动模式，标签采用自动拖动模式。
图像框只能用鼠标左键拖动，拖到右边的图像框后消失，而且拖动时图像框中的图标作为拖动图标使用。
标签可以拖动，但拖到图像框后显示“Error”。
8.4综合8.1-8.4，用“打开”按钮显示文件打开对话框，在对话框内只允许显示文本文件，初始目录为C：\Windows。
当选定一个文本文件后，单击“打开”按钮，在标签上显示所选择的文件名称，若单击“取消”按钮，则显示“放弃操作”。
命令按钮“颜色...”，用于打开“颜色”对话框，通过“颜色”对话框设置标签前景颜色。
用“字体...”对话框设置文本框的字体，要求字体对话框内出现删除线、下划线、颜色元素控制。
用“打印...”按钮调用“打印”对话框，打印文本框信息。
8.5参照Windows的记事本，建立一个有菜单功能的文本编辑器。
一/1 创建一个“标准EXE ”类型的应用程序，在屏幕上显示“欢迎您使用Visual Basic ”，和“请输入您的姓名”，屏幕设计的界面如下图一/2 输出简单图形，如下图所示。
要求窗体不可改变大小，当单击“清除”按钮后，清除所显示的图形。
一/3 在窗体插入图片，文件名为Meeting.wmf ，窗体上以浮雕效果显示的字符串“请注意安静”，还有两个命令按钮，文件Point02.ico 表示左指向、文件Point04.ico 表示右指向按钮，字符串“请注意安静”，向左移动50twip ：单击右指向按钮，向右移动50twip 。
一/4 字号、按钮、随机函数练习。
在文本框输入一字符串，对字号进行放大和缩小，缩放比例由随机函数产生。
如图所示是经过放大操作后的界面状态。
要求：（1） 单击“放大”按钮，将文本框中的字符串放大（字体放大），放大的倍数通过随机表达式产生，范围在1~3倍。
（2） 同样，单击“缩小”按钮，进行缩小。