下载文档原格式
二、选择题1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocus B、Load C、Click D、KeyDown2、滚动条控件(如下图)的Max属性所设置的是 A 。
A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句Select * Form student 中的*表示 B 。
A、所有记录B、所有字段C、所有表D、都不对4、以下选项中，不属于标签的属性是 C 。
A、EnabledB、CaptionC、Default D、Font5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。
A、CaptionB、NameC、Text D、Label6、设置一个单项选择按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。
A、CaptionB、NameC、Text D、Value7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ D 。
A、在标题项中输入&，然后打勾B、在索引项中打勾C、在有效项中打勾D、在复选项中打勾8、当执行以下过程时，在窗体上将显示 A 。
Private Sub Command1_Click( )Print "VB";Print "Hello! ";Print "VB"End SubA、VBHello!VBB、VBHello!VBC、VBD、VBHello! VBHello!VB9、语句Print "The answer is:";20/4-2的结果为 B 。
A、The answer is 20/4-2B、The answer is 3C、The answer is "20/4-2"D、非法语句10、以下哪个控件是容器控件 B 。
ID sjh th 16001 17002 18003 19004 20005 21006 22007 23008 24009 250010 260011 270012 280013 290014 300015 15111 16112 17113 18114 19115 20116 21117 22118 23119 241110 251111 261112 271113 281114 291115 15221 16222 17223 18224 19225 20226 21227 22228 23229 242210 252211 262212 272213 282214 292215 1533116332 17333 18334 19335 20336 21337 22338 23339 243310 253311 263312 273313 283314 293315 15441 16442 17443 18444 19445 20446 21447 22448 23449 244410 254411 264412 274413 284414 294415 15551 16552 17553 18554 19555 20556 21557 22558 23559 245510 255511 265512 275513 285514 295515 15661 16662 1766318664 19665 20666 21667 22668 23669 246610 256611 266612 276613 286614 296615 15771 16772 17773 18774 19775 20776 21777 22778 23779 247710 257711 267712 277713 287714 297715 15881 16882 17883 18884 19885 20886 21887 22888 23889 248810 258811 268812 278813 288814 298815 15991 16992 17993 18994 1999520996 21997 22998 23999 249910 259911 269912 279913 289914 299915tg下面正确的语句行是________。
全国计算机vb考试试题及答案一、单项选择题（每题2分，共20分）1. VB中，下列哪个选项不是基本数据类型？A. IntegerB. StringC. DoubleD. Object答案：D2. 在VB中，下列哪个关键字用于声明一个过程？A. FunctionB. SubC. DimD. Call答案：B3. 在VB中，下列哪个选项不是控制结构？A. If...Then...ElseB. For...NextC. While...WendD. Dim答案：D4. 在VB中，下列哪个选项不是数组的声明方式？A. Dim arr(10) As IntegerB. Dim arr() As IntegerC. ReDim arr(10)D. Dim arr As Integer答案：D5. 在VB中，下列哪个选项不是事件处理程序？A. ClickB. LoadC. UnloadD. Print答案：D6. 在VB中，下列哪个选项不是窗体的属性？A. NameB. CaptionC. SizeD. Text答案：D7. 在VB中，下列哪个选项不是控件的属性？A. TextB. BackColorC. FontD. Form答案：D8. 在VB中，下列哪个选项不是文件操作的函数？A. OpenB. CloseC. SeekD. Find答案：D9. 在VB中，下列哪个选项不是错误处理的语句？A. On ErrorB. ResumeC. Exit SubD. Err答案：C10. 在VB中，下列哪个选项不是字符串函数？A. LenB. LeftC. RightD. Sqr答案：D二、填空题（每题2分，共20分）1. 在VB中，使用________函数可以将文本转换为大写。
答案：UCase2. 在VB中，使用________函数可以获取当前系统日期。
答案：Date3. 在VB中，使用________函数可以获取当前系统时间。
VB填空题VB练习题一、单项选择题（1-251题）1.以下4种描述中，错误的是__ D __。
A. 常量在程序执行期间其值不会发生改变B. 根据数据类型不同，常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量C. 符号常量是用一个标识符来代表一个常数，好象是为常数取一个名字，但仍保持常数的性质D. 符号常量的使用和变量的使用没有差别2.下面合法的常量是___ D ____。
A. 1/2B. 'abcd'C. 1.2*5D. False3.Visual Basic中可以用类型说明符来标识变量的类型，其中表示货币型的是___ C ____。
A. %B. #C. @D. $4.下面___ B____是不合法的整常数。
A.100B.%O100C.&H100D.&O1005.以下关键字中，不能定义变量的是___A____。
A. DeclareB. DimC. PublicD. Private6.表达式16/4-2^5*8/4 MOD 5\2的值为___B____。
A. 14B. 4C. 20D. 27.用十六进制表示Visual Basic的整型常数时，前面要加上的符号是___A____。
A. &HB. &OC. HD. O8.Visual Basic日期型常量的定界符是__A_____。
A. ##B.‘’C. ()D. {}9.数学关系式3≤x<10表示成正确的VB表达式为___B____。
A. 3<=x<10B. 3<=x AND x<10C. x>=3 OR x<10D. 3<=x AND <1010.下面正确的赋值语句是___C____。
A. x+y=30B. pi*r*r=yC. y=x+30D.x=3y11. \，/，Mod，*四个算术运算符中，优先级别最低的是___C____。
A. \B. /C. ModD. *12.表达式ASC("F")的类型是__C_____。
vb考试试题及答案一、选择题1. VB中，用于声明变量的关键字是：A. DimB. DeclareC. ConstD. Option答案：A2. 在VB中，下列哪个选项不是合法的变量名？A. _myVarB. var2C. 123variableD. my$Var答案：C3. VB中，下列哪个选项是正确的条件语句？A. If condition ThenB. If condition Then ElseC. If condition Then Else IfD. If condition Then Else Else答案：A4. VB中，下列哪个函数用于计算字符串的长度？A. Len()B. Length()C. StrLen()D. Size()答案：A5. 在VB中，下列哪个选项是正确的循环结构？A. For i = 1 To 10B. Do While i < 10C. For Each i In arrD. All of the above答案：D二、填空题1. 在VB中，声明一个整型变量并赋值为100的语句是：________。
答案：Dim myVar As Integer = 1002. VB中，用于输出信息到立即窗口的函数是：________。
答案：Debug.Print3. VB中，用于暂停程序执行的函数是：________。
答案：Sleep4. VB中，用于获取当前日期的函数是：________。
答案：Date5. VB中，用于将字符串转换为整型的函数是：________。
答案：CInt三、简答题1. 简述VB中事件驱动编程的概念。
答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、系统消息等）触发，而不是由程序内部的逻辑顺序决定。
2. 描述VB中如何实现多线程编程。
答案：在VB中，可以使用Thread类或BackgroundWorker组件来实现多线程编程。
vb考试试题和答案**VB考试试题和答案**一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. IntC. DoubleD. All of the above**答案：D**2. VB中，哪个函数用于计算一个数的平方根？A. SqrB. PowC. LogD. Abs**答案：A**3. 下列哪个选项是VB中的保留字？A. MyB. MeC. DimD. All of the above**答案：D**4. 在VB中，下列哪个选项用于声明一个变量？A. ConstB. DimC. FunctionD. Sub**答案：B**5. VB中，哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox**答案：B**6. 在VB中，下列哪个选项用于循环遍历数组中的每个元素？A. For EachB. ForC. WhileD. Do**答案：A**7. VB中，哪个函数用于将字符串转换为大写？A. LCaseB. UCaseC. StrCompD. Trim**答案：B**8. 在VB中，哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp**答案：A**9. VB中，哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. BackColor**答案：A**10. 在VB中，下列哪个选项用于声明一个过程？A. FunctionB. SubC. ClassD. Module**答案：B**二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的关键字是________。
**答案：Integer**2. VB中，用于定义一个函数的关键字是________。
**答案：Function**3. VB中，用于定义一个子程序的关键字是________。
1.VB语言中，菜单分为下拉式菜单和弹出式菜单。
2.面向对象系统的三个基本特性是封装性、继承性和多态性。
3.设在窗体上有一通用对话框Commondialog1，为建立一个“打开”对话框，应把Action属性设置为1。
4.命令按钮的Enabled属性为True时，表示该控件有效，即能够响应用户的操作。
5.能够释放窗体Form1所占用的内存空间的语句是__unload form1_。
6.若有定义Dim x(-2 to 4) as Integer，则函数UBound(x)的值为4。
7.如果要从顺序文件中读数据，则打开方式应为input。
8.关键字varient用于定义变体类型数据。
9.XOR是逻辑异或运算符。
10.表示变量x既是5的倍数，也是7的倍数的逻辑表达式为X mod 5=0 and x mod 7=0。
11.在VB语言中，窗体文件的扩展名为*.frm。
12.向随机文件或二进制文件中写入数据所用的命令关键字为put#。
13.函数过程（或子程序过程）直接或间接地调用自身称为递归调用。
14.程序运行期间，用鼠标单击滚动条上滑块两侧的空白处时，滑块的移动量是滚动条控件的largechange属性。
15.设置数组下标的默认下界为1的语句是Option_base 1。
16.用关键字sub定义的过程称为子程序过程。
17.鼠标指针置于工具箱窗口中的某一个控件图标上时，就会在工具件是图片框。
18.文本框的默认属性是Text 。
19.与传统的程序设计语言相比,Visual Basic 最突出的特点是事件驱动编程机制。
20.VB 窗体设计器的主要功能是建立用户界面。
21.两个操作数取值相同为“假”，不同为“真”的运算符是__Xor__ 。
22.在程序中，要在图片框或图像框中加载图片，可用函数load picture 。
23.有一名为menuItem 的菜单项，为了在程序运行时使该菜单项失效，应使用的语句为menuItem Enable=False 。
一级vb考试试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 下列哪个是VB中的保留关键字？A. IfB. ThenC. ElseD. All of the above答案：D3. 在VB中，以下哪个函数用于计算数组中元素的和？A. SumB. CountC. AverageD. Max答案：A4. VB中的哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B5. 在VB中，以下哪个语句用于结束程序的执行？A. EndB. ExitC. StopD. All of the above答案：D6. VB中的哪个属性用于设置或返回一个控件的可见性？A. VisibleB. EnabledC. CaptionD. BackColor答案：A7. 在VB中，以下哪个事件用于响应鼠标单击操作？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A8. VB中的哪个函数用于将字符串转换为数字？A. StrB. ValC. CIntD. CDbl答案：B9. 在VB中，以下哪个控件用于创建下拉选择列表？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B10. VB中的哪个属性用于设置或返回一个控件的背景颜色？A. BackColorB. ForeColorC. TextColorD. BorderColor答案：A二、填空题（每题2分，共20分）1. VB中的________函数用于获取当前日期。
答案：Date2. 在VB中，________关键字用于定义一个过程。
答案：Sub3. VB中的________属性用于设置或返回一个控件的前景色。
vb考试题及答案一、选择题（每题2分，共20分）1. VB中的“Dim”关键字用于声明什么？A. 变量B. 常量C. 类型D. 过程答案：A2. 在VB中，以下哪个是合法的变量名？A. 2variableB. variable-nameC. variable$nameD. variable name答案：B3. VB中的“Sub”过程可以返回值吗？A. 是B. 否答案：B4. 在VB中，以下哪个不是基本数据类型？A. IntegerB. StringC. ObjectD. Date答案：C5. VB程序中，以下哪个语句用于结束程序？A. Exit SubB. End SubC. Exit ForD. End答案：D6. VB中，以下哪个是正确的条件语句？A. If (x > 10)B. If x > 10C. If x = 10 ThenD. If x = 10答案：C7. 在VB中，以下哪个是正确的循环结构？A. DoB. WhileC. ForD. All of the above答案：D8. VB中的“With”语句用于什么？A. 条件判断B. 循环控制C. 简化代码D. 错误处理答案：C9. 在VB中，以下哪个不是数组的声明方式？A. Dim arr(0 To 10) As IntegerB. Dim arr() As Integer = New Integer(10)C. Dim arr As Integer = New Integer(10)D. Dim arr(1) As Integer答案：D10. VB中，以下哪个是正确的事件处理程序声明？A. Sub Button1_Click()B. Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)C. Sub Button1_Click(ByVal e As EventArgs)D. Sub Button1_Click(ByVal sender As Object)答案：B二、填空题（每空2分，共20分）1. 在VB中，使用________关键字可以定义一个类。
一、填空题1、Visual Basic 对象可以分为两类，分别为 和 。
2、为了选择多个控件，可以按住 键，然后单击每个控件。
4、 浮点数由3部分组成，即符号、 和尾数。
5、下述语句段在运行时的显示结果是 。
Clsx=10.34 + 8 Print Len(x ）6、将代数式b a y x 22++转换成程序设计中的表达式为 . 7、 关系式x ≤—5或x ≥5所对应的布尔表达式是 。
9、下列程序的功能是：当x 〈50时，y=0.8×x ；当50≤x ≤100时，y=0.7×x ；当x 〉100时，没有意义。
请填空。
Private Sub Command1_Click （） Dim x As Singlex=InputBox("请输入x 的值！"） Case Is < 50 y=0。
8 * x Case 50 To 100 y=0。
7 * xPrint "输入的数据出界！” End Select Print x, y End Sub11、 以下程序段的作用是将26个小写字母逆序打印出来，请补充完整。
For i=122 To Print ； Next i12、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click(） x=0Do Until x=—1a=InputBox("请输入第一个数字a 的值") a=Val(a)b=InputBox （”请输入第二个数字b 的值") b=Val （b ）x=InputBox(”请输入第三个数字x 的值”） x=Val （x) a=a + b + x Loop Print a End Sub程序运行后，单击命令按钮，在对话框中分别输入5,4，8，5,8,-1,输出结果为 。
13、执行下面的程序段，x 的值为 。
真·超级·无敌·vb期末填空最终形态·完全体·零式·改必看题1.若有一个动态数组a有两个元素a(0)和a(1)，现要令数组a有三个元素a(0)、a(1)和(2)，则应当使用______语句。
【ReDim a(2)】2.下面程序的功能是从键盘输入1个大于100的整数m，计算并输出满足不等式的最大的n。
请填空。
------【0】【n-1】Private Sub Command1_Click()Dim s,m,n As Integerm=Val(InputBox("请输入一个大于100的整数"))n=______s=0Do While s<mn = n+1s = s+n*nLoopPrint "满足不等式的最大n是";______End Sub3.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click( )a$="National Computer Rank Examination"n=Len(a$)s=0For i=1 To nb$=Mid(a$,i,1)If b$="n" Thens=s+1End IfNext iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是______。
【4】4.以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。
请在______处填入适当的内容，将程序补充完整。
Private Sub Form_Click()Dim x As Single, amax As Single, amin As Singlex = InputBox("Enter a score")amax = xamin = xDo While______If x > amax Thenamax = xEnd IfIf ______ Thenamin = xEnd Ifx = InputBox("Enter a score")LoopPrint "Max="; amax, "Min="; aminEnd Sub------【x>=0】【xx或amin>=x】5.在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Text1.Text = "VB程序设计"End SubPrivate Sub Text1_Change()Picture1.Print "VB Programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是_______，而在图片框中显示的内容是_______。
【VB程序设计】【VB Programming】6.在窗体上画一个名称为Command1的命令按钮，编写如下事件过程Private Sub Command1＿ClickDim a As Stringa=_________For i=1 To 5Print Space(6-i);Mid$(a,6-i,2*i-1)NextEnd Sub程序运行后，单击命令按钮，要求在窗体上显示的输出结果为5456345672345678123456789请填空。
--【123456789】7.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的______属性设置为______。
【interval】【500】8.执行下面的程序段后，b的值为______。
[300]a = 300B = 20a = a + BB = a - Ba = a – B9.执行下面的程序段后，变量S的值___________。
[9]S=5For i=2.6 To 4.9 Step 0.6S=S+1Next i10.在窗体上画一个名称为Command1、标题为“计算”的命令按钮；画两个文本框，名称分别为Text1和Text2；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“操作数1”、“操作数2”、“运算结果”和空白；再建立一个含有4个单选按钮的控件数组，名称为Option1，标题分别为“+”、“-”、“*”和“/”。
程序运行后，在Text1、Text2中输入两个数值，选中一个单选按钮后单击命令按钮，相应计算结果显示在Label4中，程序运行情况如图所示。
请在______处填入适当的内容，将程序补充完整。
Private Sub Command1_Click()For i = 0 To 3If ______=True Thenopt = Option1(i).CaptionEnd IfNextSelect Case ______Case "+"Result = Val(Text1.Text) + Val(Text2.Text)Case "-"Result = Val(Text1.Text) - Val(Text2.Text)Case "*"Result = Val(Text1.Text) * Val(Text2.Text)Case "/"Result = Val(Text1.Text) / Val(Text2.Text)End Select______=ResultEnd Sub----[option1(i)][opt][label4]11.下面的程序用"冒泡"法将数组a中的10个整数按升序排列，请将程序补充完整。
Option Base 1Private Sub Command1_Click()Dim aa = Array(678, 45, 324, 528, 439, 387, 87, 875, 273, 823)For i=1 To 9For j=______If a(i)>=a(j)Thena1 = a(i)a(i) = a(j)a(j) = a1End IfNext jNext iFor i = 1 To 10Print a(i)Next iEnd Sub-----【i+1 to 10】12.在窗体上画一个命令按钮，然后编写如下程序：Function fun(ByVal num As Long) As LongDim k As Longk = 1num = Abs(num)Do While numk = k * (num Mod 10)num = num \ 10Loopfun = kEnd FunctionPrivate Sub Command1_Click()Dim n As LongDim r As Longn = InputBox("请输入一个数")n = CLng(n)r = fun(n)Print rEnd Sub程序运行后，单击命令按钮，在输入对话框中输入"345"，输出结果为______。
[60]13.以下程序在文本框Text1中输入任一字符串，并按相反的次序显示在文本框Text2中。
Private Sub Command1_Click()Dim N As String, D As StringN = Text1.TextM=______For i = M To 1 Step -1c = Mid(N, i, 1)D=D & ______Next i______=DEnd Sub—[Len(text1)][c][text2]14.在窗体上画一个名称为"Command1"的命令按钮。
然后编写如下事件过程Private Sub Command1_Click()Dim a As Stringa="123456789"For i=1 To 5Print Space(6-i);Mid$(a,______ ,2*i-1)Next iEnd Sub程序运行后，单击命令按钮，窗体上的输出结果是5456345672345678123456789请填空。
--[6-i]15.当用______方式打开文件时，如果对文件进行写操作，则写入的数据附加到原来文件的后面。
---[append]16.设有如下程序Private Sub Form＿Click()Dim a As Integer,b As Integera=20:b=50p1 a,bp2 a,bp3 a,bPrint "a=";a,"b=";bEnd SubSub p1(x As Integer,ByVal y As Integer)x=x+10y=y+20End SubSub p2(ByVal x As Integer,y As Integer)x=x+10y=y+20End SubSub p3(ByVal x As Integer,ByVal y As Integer)x=x+10y=y+20End Sub该程序运行后，单击窗体，则在窗体上显示的内容是：a=__________和 b=____________。
---[30][70]17.为了显示一个窗体，所使用的方法为______；为了隐藏一个窗体，所使用的方法为______。
【show】【Hide】18.以下语句输出结果是_______。
[12345.68]Print Int(12345.6789 * 100 + 0.5) / 10019.在窗体上画两个列表框，其名称分别为List1和List2，然后编写如下程序：Private Sub Form_ ______()List1.AddItem "语文"List1.AddItem "数学"List1.AddItem "物理"List1.AddItem "化学"List1.AddItem "英语"List1.AddItem "政治"End SubPrivate Sub List1_DblClick()List2.AddItem ______.TextList1.RemoveItem List1.ListIndexEnd SubPrivate sub List2_DblClick()List1.AddItem ______.TextList2.RemoveItem List2.ListIndexEnd Sub该程序的功能是：程序运行后在左侧列表框中显示各科目的名字，如果双击该列表框中的某个科目，则该科目从该表框中消失，并移到右列表框中；如果双击右侧列表框中的某个科目，则该科目从该列表框中消失，并移向左侧列表框中。
