VB程序填空复习题
VB填空选择150题
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程序设计复习题
江苏省计算机二级考试VB程序设计复习题一、填空题：（第一章Visual Basic程序设计概述）1、Visual Basic是一种面向_对象_的可视化程序设计语言，采取了__事件驱动__的编程机制。
2、在VB中工程文件的扩展名是_ Vbp ，窗体文件的扩展名是frm _，标准模块文件的扩展名是_ bas _。
3、执行“工程”菜单下的部件命令，可选择并添加ActiveX控件。
4、Visual Basic 6.0用于开发_ WINDOWS环境下的应用程序。
第二章简单的VB程序设计1、设置是否可以用Tab键来选取命令按钮，应该用_ Tabstop ___属性。
2、一个控件在窗体的位置由__ Left ___和_ top ___属性决定，其大小由__ height _和_ width _属性决定。
3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和_ enabled __属性为true，才能接受焦点。
4、设置控件背景颜色的属性名称是_ backcolor __。
5、所有控件都具有的共同属性是__ name __属性。
6、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是_ name和caption。
7、VB中的每个对象（控件）都有一组特征，这组特征称为_属性_，我们通过修改它可以控制对象的外观和操作。
8、通常情况下，VB中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_标准模块文件_文件，后者的扩展名为.Bas，通常由Basic语言编写，是一个可共用的子程序。
9、VB有三种工作模式，分别是设计（Design）模式、_运行模式__和中断（Break）模式。
第三章1、一般可以使用____ Const ______关键字声明常量。
2、_ Variant _类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。
3、变量的声明分为两种方法：_隐式声明__和__显示声明__。
VB经典填空题
《VB》经典填空题1、可以通过菜单中的命令退出Visual Basic,也可用快捷键。
2、快捷键CTRL+O的功能相当于执行菜单中的命令；或者相当于单击工具栏上的按钮。
3、工程文件的扩展名为，窗体文件的扩展名为。
4、属性窗口分为4个部分，这4个部分分别是、、、。
5、一个控件在窗体上的位置由和属性决定，其大小由和属性决定。
6、为了选择多个控件，可以按住键，然后单击每个控件。
7、在用Visual Basic 开发应用程序时，一般需要、、 3步。
8、在Visual Basic 中，字符串常量要用括起来，日期/时间型常量要用括起来。
9、为了使文本框同时具有水平和垂直滚动条，应先把属性设置为True,然后再把属性设置为3。
10、为了使标签覆盖背景，应把属性设置为1。
11、为了使标签中的内容居中显示,应把属性设置为2。
12、若要把C盘根目录下的图形文件ab.jpg装入图片框Picture1中，应使用的语句是：13、属性决定了标签内显示的内容。
14、假定在图片框Picture1中装入了一个图形文件，为了清除该图形（注意：清除图形，而不是删除图片框），应使用的语句是：15、当拖动滚动条中的滚动块时，将触发滚动条的事件。
16、为了使标签能自动调整大小以显示全部文本内容，应把标签的属性设置为True17、为了能自动放大或缩小图像框中的图形以与图像框的大小相适应，必须把该图像框的属性设置为18、窗体、图片框或图像框中的图形通过对象的属性设置。
19、计时器事件之间的间隔通过属性设置。
20、有时候需要暂时关闭计时器，可以通过设置属性来实现。
21、可以同时删除字符串前导和尾随空格的函数是。
22、当某一按钮的属性设置为False 时，该按钮不可见。
23、属性用于设置或返回文本框中的文本。
24、要使文本框中的文本以多行显示，应将其属性设置为true.25、若要使文本框具有水平滚动条，应将其属性的值设为1。
26、要使标签透明，可将其backstyle属性的值设为27、滚动条的属性表示滚动框在滚动条中的当前位置。
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第次考试复习题单选判断程序填空改错练习————————————————————————————————作者：————————————————————————————————日期：一、判断共19题（共计19分）第1题（1.0分）题号:684在窗体的form_load事件过程里定义的变量是局部变量。
第2题（1.0分）题号:380VB规定窗体文件的扩展名是 .vbp。
3题（1.0分）题号:681对于动态数组，在过程中可多次使用redim语句改变数组的大小。
第4题（1.0分）题号:285所有的控件在程序运行以后都是可见的。
第5题（1.0分）题号:677通常用show方法来显示通用对话框第6题（1.0分）题号:683控件数组中的各个元素由caption属性区分。
第7题（1.0分）题号:680通用对话框控件在运行的时候，是不可见的。
第8题（1.0分）题号:361设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2* A>C的值是 False。
第9题（1.0分）题号:313“菜单编辑器”中至少要填“名称”和“标题”这两个框，才能真确完成菜单栏的设计。
第10题（1.0分）题号:325VB若同一个工程有许多窗体，可以指定任一窗体为启始窗体。
第11题（1.0分）题号:335通过改变属性窗口中的Name属性，可以改变窗体上显示的标题。
第12题（1.0分）题号:324如果一个菜单项的Visible属性为False，则它的子菜单也不会显示。
第13题（1.0分）题号:678鼠标mousedown事件可以返回一个参数button用于判断用户按下的是鼠标的左键、右键、还是滑轮。
第14题（1.0分）题号:254有的对象属性既可在属性窗口中设定又可在程序代码中设定。
第15题（1.0分）题号:686时钟控件的interval属性的单位是毫秒。
第16题（1.0分）题号:248对象的可见性用enabled属性设置，可用性用visible属性设置。
《vb程序设计》期末复习题及答案
《vb程序设计》期末复习题及答案一、填空题1．创建一个VB应用程序三个主要的步骤是__________________、________________和_____________________。
2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的__________窗口中，把此文本框的_____________属性设置成空白。
3．Label和TextBox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用___________控件；若允许用户输入文本，则应使用_____________控件。
4．窗体的常用方法有__________、___________、___________和___________。
5．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK ，应当编写的语句是____________________________________。
6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。
Private Sub Cmdopen_ ________________________________End Sub7．Visual Basic 6种类型的表达式是______________、______________、______________、________________、_________________、____________________。
Visual Basic根据表达式的___________来确定表达式的类型。
8．表达式93 \ 7 Mod 2 ^ 2 的值是___________。
9．已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b And c<a+b的值是_________。
表达式c>a And Not b<c的值是___________。
程序设计语言VB填空题及答案
《程序设计语言VB》填空题1. Private Sub Command1_Click()a=3b=1For i=1 To 3f=a + ba=bb=fNext iPrint fEnd Sub以上程序段运行后，f的结果为。
2.设有如下通用过程：Public Sub fun(a() As Integer, x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim arr(5) As Integer, n As IntegerFor i = 1 To 5arr(i) = 2* iNextfun arr, nText1.Text = Str(n)End Sub程序运行后,单击命令按钮,则在文本框中显示的内容是。
3.阅读下列程序段Option ExplicitPrivate Sub Command1_Click()Dim str1 As StringDim str2 As Stringstr1 = "ABCDEFG"MySub str1, str2Print str2End SubPrivate Sub MySub(ByVal a As String, b As String) Dim c As StringDim i As IntegerFor i = Len(a) To 1 Step -1c = c+ Mid(a, i, 1)Nextb= cEnd Sub程序运行后，“print”语句的输出结果是___ _。
4.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = Int(Rnd) + 6If x ^ 2 > 25 Then y = x ^ 2 + 5x = Int(Rnd) + 4If x ^ 2 < 25 Then y = x ^ 2x = Int(Rnd) + 5If x ^ 2 = 25 Then y = x ^ 2 - 5Print yEnd Sub程序运行后，单击命令按钮，其输出结果为__ _。
VB试题(选择、填空)
一，选择题1、如果VB环境中缺少某个窗口，一般应从主菜单__C____的下拉菜单中找到相应的激活命令。
（1分）A、编辑B、文件C、视图D、调试2、启动Visual Basic后，VB为用户建立的第一个窗体是__B____。
（1分）A、FormB、Form1C、窗体1D、窗体3、不属于一个工程文件（*.vbp）里的文件是____A__。
（1分）A、*.txt文件B、*.bas文件C、*.cls文件D、*.frm文件4、与传统的程序设计语言相比较，Visual Basic最突出的特点是__C____。
（1分）A、结构化的程序设计B、数据处理C、面向对象的可视化编程D、中文支持5、文本框中的ScrollBars属性已设置为3-Both，但却没有水平和垂直滚动条的效果，原因可能是___B___。
（1分）A、文本框中没有内容B、文本框的MultiLine属性为FalseC、文本框的MaxLength属性为0D、文本框的Locked属性是True6、能够盛放其他控件，而且是最基本的对象是___A___。
（1分）A、窗体B、图像C、标签D、文本7、任何控件都具有的属性是____C__。
（1分）A、PictureB、CaptionC、NameD、AutoSize8、窗体上有一个标签Label1和一个命名按钮Command1，当程序运行时每单击一次命令按钮，标签就向右移动一定距离。
在Command1_Click()中能完成这个功能的命令为___D___。
（1分）A、Label1.Left = 100B、Label1.Left = Label1.Left - 100C、Label1.Move 100D、Label1.Move Label1.Left + 1009、要把一个Image控件对象设置成隐藏，应设置的属性是___A___。
（1分）A、VisibleB、EnabledC、DefaultD、Cancel10、以下___B___是正确的For …Next结构。
visual_Basic程序设计教程_课后习题答案及练习
"VB程序设计"综合复习资料第一章 Visual Basic程序设计概述一、填空题1、VisualBasic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。
2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名是____________。
3、执行“工程〞菜单下的__________命令，可选择并添加Active*控件。
4、Visual Basic 6.0用于开发__________环境下的应用程序。
二、选择题1、下面不是VB工作模式的是〔〕A．设计模式B．运行模式C．汇编模式D．中断模式2、可视化编程的最大优点是〔〕A．具有标准工具箱B．一个工程文件由假设干个窗体文件组成C．不需要编写大量代码来描述图形对象D．所见即所得3、以下不能翻开属性窗口的操作是〔〕A．执行“视图〞菜单中的“属性窗口〞命令B．按F4键C．按Ctrl+TD．单击工具栏上的“属性窗口〞按钮4、以下可以翻开立即窗口的操作是〔〕A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G5、Visual Basic的编程机制是〔〕A．可视化 B．面向对象 C．面向图形 D．事件驱动三、简答题1、代码窗口主要包括哪几局部？2、在工程资源管理器窗口中，主要列出了哪三类文件？3、窗体布局窗口的主要用途是什么？4、VB的根本特点是什么？5、怎样理解可视化设计？6、怎要理解事件驱动编程？第二章简单的VB程序设计一、填空题1、设置是否可以用Tab键来选取命令按钮，应该用______________属性。
2、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。
3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能承受焦点。
VB程序填空题
1、以下程序的功能是从键盘上随意输入一个数，判断这个数是正数、负数、仍是零，并输出判断结果。
程序中有三处错误，请改正。
程序以下：Private Sub Command1_Click()Dim a As SingleDim py As Stringa=Val(Text1)If a>0 Then py="正数"If a=0 Then py="零"If a<=0 Then py="负数"=aEnd Sub①_________________________ ② ___________________________ ③ _____________________2、完美程序，使其能输出：1-2+3-4+5-6+...+99-100的值。
程序以下：Private Sub Command1_Click()s=_____For i=1 To _____s=s+((-1)^(______))*iNext iPrint sEnd Sub3、已知一元二次方程的二次项系数、一次项系数、常数项分别为a、b、c，此中 a 不等于0。
编写程序，求方程的根，要求：假如方程无实数根，则输出“无实数根”，不然输出两个实数根。
程序以下：Private Sub Command1_Click()Dim a,b,c,d As SingleDim x1,x2 As Singlea=Valb=Valc=Vald=b^2-4*a*cIf d________ Thenx1=(-b+Sqr(d))/(2*a)x2=(-b-Sqr(d))/(2*a)=x1=x2_______=______End IfEnd Sub4、假以下边程序履行后输出的结果是132，请将程序增补完好：Private Sub Command1_Click()i = 12: s = 1Do While _________________s = s * ii = i - 1LoopMsgBox (s)END Sub5、下边的程序是求7! （ 7!=1*2*3...*6*7）的值，并在默认窗口输出这个值。
VB填空题
第一套1.有如下程序段：x=5y=6p=Not(x+y=11)该程序段运行后，P的值是 (1) 。
2.有如下程序段：x=5y=10z=12if x+y<=z Or y+z<=x Or x+z<=y then a=" False" else a=" True"该程序段运行后，a 的值为(1) 。
3.有如下程序段：s=0for i=1 to 5s=s+i*inext i该程序段运行后，s的值为(1) 。
4.程序填空随机产生10个1～100之间的正整数，按从小到大的次序排序并输出。
为了实现这一目标，完善下面的VB程序，在划线处填入合适的语句或表达式，完成程序设计（流程图参见图12-3）。
图12-3sub command1_click()const n=10dim i,j,t as integerdim a(1 to 10) as integerfor i=1 to 10______(1)__________next iFor i = 1 To n - 1For j = i+1 To nIf ______(2)______ Thenk = a(i): a(i) = a(j): a(j) = kEnd IfNext jNext iFor i = 1 To nList1.AddItem Str(a(i))Next iEnd sub答案：1.False2.”True”3.554.a(i)=int(rnd()*100)+1 a(i)>a(j)第二套1．有如下程序段：x=5y=6t=xx=yy=t该程序段运行后，y的值为 (1) 。
2．有如下程序段：x=5y=-20if not x>0 then x=y-3 else y=x+3该程序段运行后，x 的值为 (1) 。
3．有如下程序段：e=0:f=1for i=1 to 3e=e+ff=f+enext i该程序段运行后，f的值为 (1) 。
(完整word)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考试试题及答案
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填空题及答案
二、填空题：（每空1分，共20分） 程序代码基础部分：1．Visual Basic 中的变量按其作用分为__ 、__ 、__ 。
全局变量、模块变量（或窗体级变量）、局部变量（过程级变量）2．声明单精度常量PI 代表3.14159的语句为__ __ __ _。
Const PI!=3.14159或Const PI As Single = 3.14159 3．声明定长为10个字符变量Str v 的语句为： 。
Dim Strv as String*10 4．把条件为1≤X ≤5 写成Visual Basic 表达式为： 。
x>=1 and x<=5 5．把条件1≤X<12写成Visual Basic 关系表达式为__ 。
x>=1 and x<126．数学表达式（2 π r+e -5）lnx 对应的Visual Basic 表达式是：__ 。
（2*3.14*r+exp(-5))*Log （x ） 7．数学表达式c)-b)(s -a)(s -s(s 对应的Visual Basic 表达式是： __ 。
sqr （s*（s-a ）*（s-b ）*（s-c ））8．数学表达式ba x e r++-ln )2(8π对应的Visual Basic 表达式是： 。
（2*3.14*r+exp(-8)）*log(x)/(a+b)9．数学表达式5+(a+b)2对应的Visual Basic 表达式是 。
5+(a+b)^210．数学表达式2a （7+b ）对应的Visual Basic 表达式是 。
2*a*（7+b ）11．数学表达式C ×A B对应的Visual Basic 表达式是 。
C*A^B12．写出 Visual Basic 表达式 (Abs(a*b-c^3))^3 对应的数学表达式的形式 。
│ab-c 3│313．写出 Visual Basic 表达式 x^2+3*x*y/(2-y) 对应的数学表达式的形式 。
VB程序设计
《VB程序设计》综合复习资料一、填空题1.在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名是____________。
2.一个控件在窗体的位置由______和________属性决定，其大小由__________和_________属性决定。
3.变量的声明分为两种方法:__________和____________。
4.使用____________方法可在窗体中进行文本的输出,用____________方法可画圆，用____________方法可画直线。
5.类是具有相同性质的对象的_________.6.利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能接受焦点.7.文件按存取方式及其组成结构可分为________________文件、__________文件和______________文件。
8.在VB中,用___________________语句设定数组的下界，用_____________和__________________语句分别返回数组的上、下界。
9.在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”.运行程序时会自动生成5个随机数，分别显示在标签控件数组的各个标签中。
单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在Label2中。
请填空。
Private Sub Command1_Click（）Sum = 0For i=0 To 4Sum=Sum+____Next i_____=SumEnd Sub10.在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。
VB填空题题库
VB填空题题库1) 假定当前日期为2002年7月12日，星期六，则执行语句Print day(now)后，输出结果是______（提示：不能出现符号#）。
答案：122) 语句a%=3.14156:Print a%的输出结果是______。
答案：33) 以下循环的执行次数是_____。
K=0Do While k<=10k=k+1Loop答案：114) Fix(5.8)的值是______答案：55) 下列程序段的执行后输出的结果为_____。
I=4:A=5DoI=I+1:A=A+2Loop Until I>=7Print "A=";A答案：A=116) 表达式3/6*5的值是_______。
答案：2.57) 下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。
If a<b Thend=a:a=b:b=dEndIfIf a<c Thend=a:a=c:c=dEndIfIf_____Thend=b:b=c:c=dEndIfPrint a,b,c答案：b<c8) 在Select case 结构中应至少包含一个______子句。
答案：CASE9) 窗体的属性可在属性窗口中设置，也可在程序中用______语句动态设置。
答案：赋值10) 有如下Sub过程:Sub ind(a As Integer)Static x As Integerx = x+aPrint x;End Sub以下是调用它的事件过程，程序运行后，单击命令按钮Command1，输出结果为______。
Private Sub Command1_Click()Ind(2)End Sub答案：211) 逻辑常量值为TRUE或_______。
答案：FALSE12) 货币类型的数据小数点的位置是固定的，精确到小数点后_____位。
答案：413) 表达式（2+8*3）/2的值是______。
答案：1314) 以下程序用来判断一个整数X是否为偶数，并将其中的偶数在窗体上显示，请补充完该程序。
vb精选试题及答案
vb精选试题及答案一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明变量？A. DimB. ConstC. FunctionD. Sub答案：A2. VB中数组的默认下标是从哪个数字开始的？A. 0B. 1C. -1D. 2答案：B3. 在VB中，以下哪个函数用于计算字符串的长度？A. LenB. UBoundC. LBoundD. Sqr答案：A4. VB中，哪个属性用于获取或设置一个窗体的标题？A. CaptionB. TextC. TitleD. Label答案：A5. 在VB中，以下哪个事件用于响应鼠标单击窗体？A. ClickB. DblClickC. MouseDownD. MouseUp答案：A二、填空题（每题3分，共15分）1. 在VB中，声明一个整型变量的正确语法是________。
答案：Dim myVar As Integer2. VB中，用于定义一个过程的关键字是________。
答案：Sub 或 Function3. VB中，用于读取用户输入的函数是________。
答案：InputBox4. VB中，用于打开文件的语句是________。
答案：Open5. VB中，用于关闭文件的语句是________。
答案：Close三、简答题（每题5分，共10分）1. 请简述VB中的事件驱动编程是什么？答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、消息、信号等）触发。
在VB中，用户可以通过编写事件处理程序来响应这些事件。
2. VB中如何实现循环结构？答案：在VB中，可以使用For...Next循环、Do...Loop循环、While...Wend循环等结构来实现循环。
四、编程题（每题10分，共20分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。
答案：请参考以下代码：```vbDim sum As IntegerDim i As Integersum = 0For i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNext iMsgBox "1到100之间所有偶数的和是：" & sum```2. 编写一个VB程序，判断一个给定的年份是否为闰年。
VB考试试题及答案
二、选择题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 。
Visual_Basic程序设计·选择填空题[打印版]
![Visual_Basic程序设计·选择填空题[打印版]](https://img.taocdn.com/s3/m/edf298c59ec3d5bbfd0a74ff.png)
Visual Basic程序设计一、选择题1、在设计应用程序时，可以查看到应用程序工程所有组成部分的窗口是（D）。
A、窗体设计B、代码C、属性D、工程资源管理器窗口2、窗体的load事件的触发时机是（B）。
A、用户单击窗体时B、窗体被加载时C、窗体显示之后D、窗体卸载时3、与传统的程序设计语言相比，Visual Basic 最突出的特点是（C）。
A、结构化程序设计B、程序开发环境C、事件驱动编程机制D、程序调试技术4、VB6.0集成开发环境的主窗口中不包括（C）。
A、标题栏B、菜单栏C、状态栏D、工具栏5、如果对象的名称为Mytext ,而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（B）。
A、 text.MytextB、Mytext.TextC、Mytext.(Text)D、Mytext*Text6、下列可以激活属性窗口的操作是（D）。
A、用鼠标双击窗体的任何部位B、执行“工程“菜单中的”属性窗口“命令C、按Ctrl+F4D、按F47、假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是（A）。
A、单击窗体上没有控件的地方B、单击任一个控件C、不执行任何操作D、双击窗体的标题栏8、如果要在文本框键入字符时，只显示某个字符，如果（*），应设置文本框的（B）属性。
A 、Caption B、PasswordChar C、Text D、Char9、如果想要在文本框中的内容在运行时不能编辑，需要文本框的（A）属性设置为True.A Locked B、MultiLine C、TabStop D、Visible10 对于定时器（Tiner）控制，设置其定时是否开启的属性是（C）A、IndexB、TagC、EnabledD、Left11、要在窗口体Fornl 内显示“myfrm”使用的语句是（ C）A、Form.caption=“myfrm”B、Fornl.caption=“myfrm”C、forml.print“myfrm”D、form.print“myfrm”12、对象的性质和状态特征称为（C）A、事件B、方法C、属性D、类13、下列正确的赋值语句是（B）A、x+y=20B、y=x+20C、3x=yD、s=14、当使用上下文相关的帮助时，选择要帮助的内容，然后按（D）键，就可出现MSDN窗口直接显示所需的帮助信息A、HelpB、F10C、EseD、F115、将调试通过的工程经“文件”菜单的“生成.exe文件“编绎成名.exe后，将该可执行文件放到其它机器上不能运行的主要原因是（D）。
VB试题及答案
VB试题及答案（二）一、填空题1. 在Visual Basic6.0中，按变量作用域的不同可将变量分为全局变量和局部变量两种；声明静态变量的关键字为 Static ;2. 在Viual Basic6.0中，程序结构有顺序、选择、循环 3种结构。
3. 控制控件是否可见的属性为 Visible ；控制控件是否可用的属性为 Enabled ；控件的位置是由 Left 和 Top 属性来确定的；控件的大小是由 Width 和 Height 属性来确定；控件上所显示的文本是由 Caption 属性来设定的；4. 与鼠标有关的事件包括 Click 、 DblClick 、MouseDown 、 MouseUp MouseMove ，其中 Click 事件在单击控件时被激发， MouseDown 事件在鼠标键被按下时被激发， MouseUp 事件在鼠标被松开时被激发。
5. 与键盘有关的事件包括 KeyPress 、 KeyDown 、 KeyUp ，其中 KeyPress 事件在单击键盘键时被激发， KeyDown 事件在按下键盘键时被激发， KeyUp 事件在松开键盘键时被激发。
6. 向列表框和组合框中添加列表时，可使用 AddItem 方法；删除选定的列表，可使用 RemoveItem 方法；删除全部列表项，可使用 Clear 方法。
7. 定时器控件能够响应的唯一事件为 Timer ，并且该事件被激发的时间间隔由 Interval 属性来给定。
8. 弹出式菜单一般不直接显示在窗体上，因此菜单的 Visible 属性一般设为False。
要显示弹出式菜单可以用 PopupMenu 方法。
9. 工具栏一般显示在菜单栏下面，由命令按钮组成；状态栏一般显示在窗体的底部，由窗格（Panels）组成。
10. 在图片框绘图之前，除了要建立好坐标系之外，还必须设置好线条的类型、线条的宽度、绘图的模式、填充的样式和填充的颜色，其中线条类型由 DrawStyle 属性来设置，线条宽度 DrawWidth 属性来设置，绘图模式由 DrawMode 属性来设置，填充样式由 FillStyle 属性来设置。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
二级VB程序设计练习程序填空1．下面程序按每行10个数打印出30个介于-300到300间无重复的随机整数，并显示其中的最小值。
数组b(30)存放所产生的无重复的随机整数，运行结果如图所示。
Private Sub Command1_Click()Dim b(30), j As Integer, k As IntegerDim y As Integer, x As Single, min As IntegerFor j = 1 To 30lb:x = RndIf x > 0.5 Then y = 1 Else y = -1b(j) = y * Int(Rnd*301)k = 1Do While k<jIf b(j) = b(k) Then Goto lbk = k + 1LoopPrint b(j);If j Mod 10=0 Then PrintNext jmin = b(1)For j = 1 To 30If b(j) < min Then min=b(j)Next jPrint minEnd Sub2．下面程序用于对9位的准考证号进行校验。
参数mno存放准考证号，mjy存放产生的校验位，tag判断校验正确否，若校验正确tag置1，否则为0。
产生校验位的算法为：取准考证号右边的8位之和关于9的模作为校验值，准考证号最左边的一位为校验位。
Public Sub foe(ByVal mno As String, mjy As Integer, Tag As Integer)Dim msum As Integer, m As Stringmsum = 0for j=2 to 9m = Mid(mno, j, 1)msum = msum + Val(m)Next jmjy = msum mod 9If mjy =val(left(mno,1)) ThenTag = 1ElseTag = 0End IfEnd SubCommand1_Click事件用于调用foe子过程，对输入到文本框Text1的准考证号进行校验，如果校验正确，显示“正确”，否则显示“错误”，同时显示正确的校验码。
Private Sub Command1_Click()Dim nn As Integer, mtag As IntegerIf Len(Text1) <> 9 Or Not IsNumeric(Text1) ThenMsgBox "非法数据，请重新输入！"Text1 = ""Text1.SetFocusExit SubEnd IfCall foe(Text1, nn, mtag)If mtag ThenPrint "正确"ElsePrint “错误” ;nnEnd IfEnd Sub3．下面的程序按从小到大的顺序随机产生不超过20个介于100到400（包括100、400）的数，每次产生的一个数总大于它前面已产生的数，然后求产生的数的平均值。
数组b(20)用于存放所产生的随机数，运行结果如图所示。
Private Sub Command1_Click()Dim b(20), i As Integer, j As Integer, sum As Singlej = 1Dore:b(j) = Int (Rnd*301+100)If b(j) = 400 Or j = 20 ThenExit DoElseIf b(j) <= b(j - 1) ThenGoTo reEnd Ifj=j+1Loopsum = 0For i = 1 To jPrint b(i);Sum=sum+b(i)Next iPrint "aver=";sum/jEnd Sub4．新的身份证号由18位组成，最低位（右边）为校验位，其算法是：10-（前17位之和关于10的模）。
函数foe用于对18位的身份证进行校验。
参数mstr存放身份证号，md 为产生的校验位，若校验正确，函数返回“True”，否则返回“False”。
Public Function foe(ByVal mstr$, md%) As BooleanDim mp As String, msum As Integermsum = 0For i=1 To 17mp = Mid(mstr, i, 1)msum = msum + Val(mp)Next imd = 10 – msum mod 10If md = val(right(mstr,1)) Thenfoe = TrueElsefoe = FalseEnd IfEnd FunctionCommand1_Click事件用于调用foe子过程，对输入到文本框Text1的身份证号进行校验，如果校验正确，显示“True”，否则显示“False”和的校验码值。
Private Sub Command1_Click()Dim mm As IntegerIf Len(Text1) <> 18 Or Not IsNumeric(Text1) ThenMsgBox "非法数据，请重新输入！"Text1 = ""Text1.SetFocusExit SubEnd IfIf foe(Text1, mm) = True ThenPrint "True"ElsePrint “False”;mmEnd IfEnd Sub5．End Sub本程序随机产生N（15）个A到J的大写字母，按字母降序排序后，将连续出现的字用压缩形式显示。
例如，连续5个H字母显示为5*H，参见图例。
数组a()用于存放随机产生的字母。
Private Sub Command1_Click()Const N = 15Dim a(1 To N) As String * 1, cDim count%, i%, j%, k%For i = 1 To Na(i) = Chr(Int(Rnd*10+65 ))Print a(i);Next iPrintFor i = 1 To N - 1k = iFor j = i+1 To NIf a(j) > a(k) Then k=jNext jc = a(i): a(i) = a(k): a(k) = cNext iFor i = 1 To NPrint a(i); " ";Next iPrinti = 1Do While i <= Ncount = 1If i < N Then j = i + 1Do While a(i) = a(j)count = count+1If j < N Then j = j + 1 Else Exit DoLoopIf count = 1 Then Print a(i); " "; Else Print count; "*"; a(i); " ";i =i+countLoopEnd Sub6. 本程序的功能是在窗体随机产生10个长度为1~20之间的大写字母字符串，并同时显示最长字符串的字符数及内容，如图所示。
Private Sub Command1_Click()ClsDim st(1 To 10) As String, c As String * 1Dim i%, n%For i = 1 To 10___ _For j = 1 To nc = Chr(Int(Rnd * 26 + 65))st(i) = ___ ___Next jPrint st(i)Next imaxlen = 0maxstr = ""For i = 1 To 10If ____ _ Thenmaxlen = Len(st(i))maxstr = ______End IfNext i__ __End Sub7. 两素数的差为2，称此对素数为素数对，下列程序是成对显示100以内的素数对。
其中，函数isP 的功能是判断参数m是否为素数，若是返回True ，否则返回False 。
Public Function isP(m) As BooleanDim i%For i = 2 To Int(Sqr(m))If Then IsP = FalseNext iEnd FunctionPrivate Sub Command1_Click()Dim i%p1 = IsP(3) ' 第一个可能的素数For i =p2 = IsP(i)If Then Print i 2, i ' 相邻的两个是素数，则打印p1 = ' 处理下一个素数Next iEnd Sub8. 本程序的功能是求100以内的素数，结果分三列输出，如样例所示。
算法思想：从2开始，对每一个数判断是否是素数，若是就输出，否则就继续，直至到100。
Private Sub Command1_Click()Dim n As Integer, m As Integer, i As IntegerMe.ClsFor n = 2 To 100For m = 2 To n – 1If = 0 ThenEnd IfNext mIf ThenPrint n,i = i + 1If i Mod 3 = 0 ThenEnd IfNext nEnd Sub9. 子过程isH的功能是判断正整数n是否是回文数，若为回文数，则参数Tag返回True。
单击命令按钮，输出随机产生的10个[10，100]之间的回文数（数字左右对称的正整数称为回文数）。
Private Sub Command1_Click()Dim nn%, t As Boolean, i%For i = 1 To 10nn = Int(Rnd * 991 + 10)CallIf t Then Print nn; "是回文数"Next iEnd SubSub isH(ByVal n As Integer, )Dim length%, i%, s1$s1 = Trim(Str(n))tag =length =For i = 1 To length \ 2If Mid(s1, i, 1) <> Then tag = FalseNext iEnd Sub10. 本程序的功能是判断一个5位数的最后二位构成的数是否为素数。
在窗体的文本框Text1中输入一个5位数，判断该数的第4、5二位构成的数是否为素数，若是显示“是素数”否则为“非素数”。