vb程序设计期末复习题及答案

合集下载

vb期末考试和答案

vb期末考试和答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个是正确的变量声明方式？A. Dim a$B. Dim a IntegerC. Dim a As StringD. Dim a 123答案：C2. VB中，以下哪个是正确的条件语句？A. If x > 0 Then Print "Positive"B. If x > 0 ThenPrint "Positive"End IfC. If x > 0 ThenPrint "Positive"End IfD. If x > 0 ThenPrint "Positive"ElsePrint "Negative"End If答案：D3. 在VB中，以下哪个是正确的循环结构？A. For i = 1 To 10Print iNext iB. For i = 1 To 10Print iEnd ForC. For i = 1 To 10Print iLoopD. For i = 1 To 10Print iEnd Loop答案：A4. VB中，以下哪个是正确的数组声明方式？A. Dim arr(10)B. Dim arr(10) As IntegerC. Dim arr As Integer(10)D. Dim arr(10) Integer答案：B5. 在VB中，以下哪个是正确的函数声明方式？A. Function Add(x As Integer, y As Integer) As IntegerB. Function Add(x, y) As IntegerC. Function Add(x As Integer, y As Integer)D. Function Add(x, y)答案：A6. VB中，以下哪个是正确的事件处理程序？A. Private Sub Form_Click()B. Private Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Me.ClickC. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Me.ClickD. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs)答案：B7. 在VB中，以下哪个是正确的窗体属性？A. Me.Width = 800B. Me.Height = 600C. Me.Caption = "My Form"D. All of the above答案：D8. VB中，以下哪个是正确的控件属性？A. Label1.Text = "Hello"B. Label1.Caption = "Hello"C. Label1.Value = "Hello"D. = "Hello"答案：A9. 在VB中，以下哪个是正确的文件操作语句？A. Open "C:\test.txt" For Input As #1B. Open "C:\test.txt" For Output As #1C. Open "C:\test.txt" For Append As #1D. All of the above答案：D10. VB中，以下哪个是正确的错误处理语句？A. On Error Resume NextB. On Error GoTo 0C. On Error GoTo -1D. All of the above答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量的关键字是______。

《Visual BASIC程序设计》期末考试选择题复习(180题)

1. Visual Basic集成开发环境中不包括下列哪些窗口( )。

A、工具箱窗口B、工程资源管理器窗口C、属性窗口D、命令窗口参考答案是：D2. 在设计应用程序时，通过( )窗口可以查看到应用程序工程中的所有组成部分。

A、代码窗口B、窗体设计窗口C、属性窗口D、工程资源管理器窗口参考答案是：D3. 在正常安装Visual Basic6.0后，可以通过多种方式启动Visual Basic。

以下方式中不能启动Visual Basic的是：( )。

A、通过“开始”菜单中的“程序”命令B、通过“我的电脑”找到vb6.exe，双击该文件名C、通过“开始”菜单中的“运行”命令D、进入DOS方式，执行vb6.exe文件参考答案是：D4. Visual Basic 6.0工程文件的扩展名是( )。

A、.vbpB、.frmC、.basD、.cls参考答案是：A5. Visual Basic6.0是面向( )的程序设计语言。

A、过程B、工程C、事件D、对象参考答案是：D6. 下列关于Visual Basic编程特点的叙述中，错误的是( )。

A、Visual Basic 是采用事件驱动编程机制的语言B、构成Visual Basic 程序的多个过程没有固定的执行顺序C、Visual Basic 程序既可以编译运行，也可以解释运行D、Visual Basic 程序不是结构化程序，不具备结构化程序的3 种基本结构参考答案是：D7. Visual Basic 6.0集成开发环境有三种工作状态，不属于三种工作状态之一的是( )。

A、设计状态B、编写代码状态C、运行状态D、中断状态参考答案是：B8. 在Visual Basic 6.0中要获取上下文相关帮助，只需将光标定位在相应位置，再按( )A、F1B、F2C、F3D、F4参考答案是：A9. Visual Basic 6.0集成开发环境的主窗口中不包括( )。

A、标题栏B、菜单栏C、状态栏D、工具栏参考答案是：C10. 下列可以激活属性窗口的操作是( )。

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的值是___________;10．日期表达式 2/24/02 - 2/12/02 的值为___________;11．数学表达式sin2x+ 写成等价的Visual Basic表达式为_________________;12．设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从1到5,第二维下标从-2到6,则相应的数组声明语句为___________________________;13．事件就是在对象上所发生的事情,Visual Basic中的事件如___________、___________、______________等;一个对象响应的事件可以有_____个,用户不能建立新的事件;事件过程是指_____________________________________________;假设某一事件过程如下：Private Sub cmd1_Click="VB示例"End Sub则响应该过程的对象名是______________,事件名是_____________;14．对象的方法用于__________________;当方法不需要任何参数并且也没有返回值时,调用对象的方法的格式为________________,例如,对窗体Form1使用Show方法,应写成_________________;15．PictureBox控件可通过设置其__________属性为True使之可自动调整大小；而Image控件可通过设置其___________属性为True,使其加载的图片能自动调整大小以适应Image;16．在Visual Basic程序中实现复制文件“c:\”到d:盘根目录下的语句为_______________________________________;二、单项选择题1．下列控件中没有Caption属性的是A、标签B、文本框C、框架D、命令按纽2．除框架外,能对单选按纽分组的控件是 ;A、窗体B、标签C、图片框D、图像3．下列符号不能作为VB中变量名的是 ;A 、 ABCDEFG B、 P00000 C、 89YWDDF D、xyz4．下列不属于Visual Basic数据文件的是 ;A、顺序文件B、随机文件C、二进制文件D、数据库文件5．若要求从文本框中输入密码时在文本框中只显示号,则应用在此文本框的属性窗口中设置 ;A、Text属性值为B、Caption属性值为C、Password属性值为空D、PasswordChar属性值为6．表达式23^2+28/4+3^2的值为 ;A、64B、31C、49D、427．表达式mid"abcdefg",3,2的值是A、abcB、cdC、bcdD、abcde8．数学表达式Sin25°写成VB表达式是 ;A、Sin25B、Sin25C、Sin25°D、Sin251809．Sub过程与 Function过程最根本的区别是 ;A、Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以;B、Function过程可以有参数,Sub过程不可以;C、两种过程参数的传递方式不同;D、Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值;10．选拔身高T超过1.7米且体重W小于公斤的人,表示该条件的布尔表达式为A、T>= And W<=B、T<= Or W>=62.5C、T> And W<D、T>= Or W<11.下列对象不能响应 Click事件的是A、列表框B、图片框C、窗体D、计时器12．在Visual Basic中,按文件的访问方式不同,可以将文件分为A、顺序文件、随机文件和二进制文件B、文本文件和数据文件C、数据文件和可执行文件D、ASCⅡ文件和二进制文件13．将通用对话框CommonDialog的类型设置成“颜色”对话框,可调用该对话框的方法;A、ShowOpenB、ShowSaveC、ShowColorD、ShowFont三、指出下列句中的错误,修改或者说明原因;1．sum和都可以作为VB的变量名;2．变量名的长度最长可达1024个字符;3．下列程序运行结果：3,3Option ExplicitPrivate Sub Command1_ClickDim a,b As Integera =b == a= bEnd Sub4．程序可以改变定长字符串的内容和长度;5．Variant是一种特殊的数据类型,可以包含任何种类型的数据;6．下列程序运行结果为TruePrivate Sub Command1_Clicka = 1b = 2c = 3= c > a + b Or b - 1 > c - 1 And c + a > a Xor b < c - 2End Sub7．12/31/1999 - 12/20/1999的运算结果是12/11/19998．可以在窗体的通用部分声明静态变量;9．使用声明语句建立一个变量后,Visual Basic会自动对数值类型的变量赋初值0,变长的字符串被初始化为一个零长度的字符串"",定长字符串用空格填充,Variant变量被初始化为 Empty,布尔型的变量被初始化为False;10．事件过程通常由事件驱动执行,而Sub过程通过过程调用执行;11．将焦点主动设置到指定的控件或窗体上应采用SetFocus方法;12．当图像控件Image的Stretch属性为True时,Image控件能自动调整自己的尺寸与显示的图片匹配;四、读程序题,写出程序运行结果;1．Private Sub Form_ClickFor I = 1 To 9For j = 1 To 30 - 3 IPrint " ";Next jFor k = 1 To IPrint k;Next kFor k = I - 1 To 1 Step -1Print k;Next kPrintNext I2．Option ExplicitPrivate Sub Command1_Click Static S As IntegerDim i As IntegerS = 1For i = 1 To 5S = S iNext iPrint SEnd Sub3．For X = 5 To 1 Step -1For Y = 1 To 6 - XPrint TabY + 5; "";Next YNext X4．Private Sub Form_ActivatePrint "aa" & "bb",-5 6,Not 2 <= 3 Print "aa" & "bb"; -5 6; Not 2 <= 3 PrintPrint "30+60",Print 30 + 60"30+60"; 30 + 60End Sub5．X=1Do While X<=10If X Mod 7 =0 ThenY = X + 6Z = XEnd IfX = X + 2LoopPrint X,Y,Z五、编程题1．设计一个计算程序;该程序用户界面如图所示,由四个文本框：文本框1text1、文本框2text2、文本框3text3、文本框4text4,和三个按钮：命令按钮1command1、命令按钮2command2、命令按钮3command4组成;程序运行后,用户单击清除按钮,则清除文本框中显示的内容;单击计算按钮,如果成绩填写不完全,则给出提示信息,否则计算三科平均成绩;单击退出按钮则退出;2．设计程序;要求：从文本框Text1中接收输入的数据,当单击确定按钮command1时,如果该数据满足条件：除以3余2,除以5余3,除以7余4,则输出；否则将焦点定位在文本框Text1中,选中其中的文本;3．设计一个欢迎程序;该程序用户界面如图所示;要求程序运行后,用户选中粗体复选框时,标签Label1中的文字欢迎您的字体变成粗体,用户选中斜体复选框时,标签的字体变成斜体;若取消选中,则恢复原字体;单击结束,则退出;4．任意输入3个数,求大小排第二的那个数,写出程序代码;VB期末复习参考答案一、填空题1．创建应用程序界面设置属性编写代码2．属性、text3．Label TextBox4．Load方法 Show方法 Hide方法 Unload方法5．="GOOD WORK"6．Click、7．算术表达式字符串表达式关系表达式布尔表达式日期表达式对象表达式运算符8．19．True False10．1211．Sinx ^ 2 + Sqrx ^ 2 - y ^ 2 / 2 x12．Dim A1 To 5,-2 To 6 As String13．单击双击装载多响应某个事件后所执行的程序代码 cmd1 Click14．完成某种特定的功能对象名.方法名15．AutoSize Stretch16．FileCopy "c:\","d:\"二、单项选择题1．B 2．C 3．C 4．D 5．D 6．B 7．B8．D 9．D 10．C 11．D 12．A 13．C三、指出下列句中的错误,修改或者说明原因;1．不正确;变量名中不能包括小数点;2．变量名的长度最长可达255个字符;3． , 4因为a 不是整型变量;4．不正确;程序不可以改变字符的长度,这是VB规定;5．不完全正确;Variant是一种特殊的数据类型,除了定长字符串数据及用户定义类型外,可以包含任何种类型的数据,这是VB规定;6．False ;逻辑表达式计算结果;7．不正确;两个日期型数据相减,其结果是一个数值型数据;8．不正确;静态变量为局部变量,只能在过程中声明;9．正确;10．正确;11．正确;12．不正确;该属性设为Ture时,Image控件不能自动调整自己的尺寸与显示的图片匹配,而可以使图片自动扩展以适应控件的尺寸;四、读程序题,写出程序运行结果;1．程序运行后,单击窗体,输出结果为：11 2 11 2 3 2 11 2 3 4 3 2 11 2 3 4 5 4 3 2 11 2 3 4 5 6 5 4 3 2 11 2 3 4 5 6 7 6 5 4 3 2 11 2 3 4 5 6 7 8 7 6 5 4 3 2 11 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 12．程序运行后,单击按钮Command1,输出结果为：120;3.4.aabb -30 Falseaabb-30 False30+60 9030+60 905.11 13 9五、编程题1．Private Sub Command1_Click= ""= ""= ""= ""End SubPrivate Sub Command2_Clicka = Trimb = Trimc = TrimIf a = "" Or b = "" Or c = "" Then MsgBox "成绩填写不完全", vbCriticalElse= Vala + Valb + Valc / 3End IfEnd SubPrivate Sub Command3_ClickUnload MeEnd Sub2．Private Sub Command1_Clickx = ValIf x Mod 3 = 2 And x Mod 5 = 3 And x Mod 7 = 4 ThenPrint xElse= 0= LenEnd IfEnd Sub3．Private Sub Check1_ClickIf = 1 ThenElseEnd IfEnd SubPrivate Sub Check2_ClickIf = 1 ThenElseEnd IfEnd SubPrivate Sub Command1_ClickUnload MeEnd Sub4．a = ValInputBox"输入第一个数："b = ValInputBox"输入第二个数："c = ValInputBox"输入第三个数："If a < b Then t = a: a = b: b = tIf a < c Then t = a: a = c: c = tIf b < c Then t = b: b = c: c = tMsgBox "求大小排第二的数是：" & bVB期末考试试题 A卷一、填空题1、VB程序设计的主要特点是 1 和 2 ;2、在VB中,最主要的两种对象是 3 和 4 ;3、工程是构成应用程序文件的 5 ;4、方法是VB提供的一种 6 ,用来完成一定的操作;5、浮点类型数据包括单精度型和___7__数据;6、事件是窗体或控件对象识别的___8____;7、可用窗体的___9_ 方法在窗体中显示文字;8、复选框控件Value属性指示复选框处于____10___或禁止状态暗淡的中的某一种;9、在VB中,修改窗体的 11和 12 属性值,可改变窗体的大小;10、双击工具箱中的控件图标,可在窗体的 13 出现一个尺寸为缺省值的控件;11、在MsgBox函数中,如果缺省title参数,则使用 14 作为消息框的标题;12、设x＝,语句Print Formatx,“000.0”的输出结果是 15 ;13、在VB 中,数值型变量的初值为 16 ,Varant型变量的初值为 17 ,布尔型变量的初值为18 ;14、设置窗体的 19 属性,可在窗体上显示图片;15、程序运行工程中,清除MP图片框中的图片应使用语句 20 ;二、选择题1、菜单控件只包括一个事件,即 1 ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件;A、GotFocusB、LoadC、ClickD、KeyDown2、滚动条控件如图所示的Max属性所设置的是 2 ;A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句 Select Form student 中的表示 3 ;A、所有记录B、所有字段C、所有表D、都不对4、以下选项中,不属于标签的属性是 4 ;A、EnabledB、CaptionC、DefaultD、Font5、要求改命令按钮显示的文本,应当在属性窗口中改变的属性是 5 ;A、CaptionB、NameC、TextD、Label6、设置一个单选按钮OptionButton所代表选项的选中状态,应当在属性窗口中改变的属性是6 ;A、CaptionB、NameC、TextD、Value7、允许在菜单项的左边设置打勾标记,下面哪种论述是正确的 7 ;A、在标题项中输入&,然后打勾B、在索引项中打勾C、在有效项中打勾D、在复选项中打勾8、当执行以下过程时,在窗体上将显示 8 ;Private Sub Command1_ClickPrint "VB";Print "Hello ";Print "VB"End SubA、 VBHelloVBB、 VBHelloVBC、 VBD、 VBHello VB HelloVB9、语句Print "The answer is:";20/4-2的结果为 9 ;A、The answer is 20/4-2B、The answer is 3C、The answer is "20/4-2"D、非法语句10、下列哪个控件是容器控件 10 ;A、ImageB、PictureC、ComboBoxD、FileListBox11、若要将窗体从内存中卸载出去,其实现的方法是 11 ;12、以下选项中,不是 Visual Basic控件的是 12 ;A.窗体B.定时器C.单选框D.命令按钮13、双击窗体中的对象后,Visual Basic将显示的窗口是 13 ;A.代码窗口 B．工具箱 C．项目工程窗口 D．属性窗口14、可决定窗体的左上角是否有控制菜单的属性是 14 ;15、设有如下语句：Strl＝InputBox"输人","","练习"从键盘上输人字符“示例”后,Strl的值是 15 ;A．“输入” B．“” C．“练习” D．“示例”16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 16 ;A. Form1_Click C. Frm1_Click D. Me_Click17、窗体的hide属性的含义是 17 ;A.隐藏B.展现C.装入D.卸载18、若要设置定时器控件的定时时间,需设置的属性是 18 ;A．Enabled B．Value C．Interval D．Text19、能够改变复选框中背景颜色的属性是 19 ;A．Value B．FontColor C．BackColor D．Font20、窗体能响应的事件是 20 ;A．ActiveForm B．Load C．Drive D．Change三、判断题判断下列正确与否,正确的打√,错误的打ⅹ;1、三种方式的组合框都允许用户输入哪些不在列表框中的选项;2、图象框中的Stretch属性为true时,其作用是图形自动调整大小以适应图象控件;3、在菜单编辑器中使用“索引”时,可有一组菜单项具有相同的“名字”;4、通过改变属性窗口中的Name属性,来改变窗体的标题;5、创建VB应用程序的三个主要步骤是：1创建应用程序界面2设置控件3编写代码;6、变量是指在程序运行过程中其值可以改变的那些量,而值不能改变的是常量;7、已知P＝MsgBox“Howareyou",VbYesNo+VbQuestion,“Hello”,变量P是Integer数据类型;8、工程文件的扩展名是 .vbg ;9、VB允许设计和使用用户自己设计的控件;10、OptionButton控件没有DblCliek事件;11、同一条记录中的各数据具有相同的类型;12、使用Data控件可以直接显示数据库中的数据;13、ImageList 是一个图像容器控件,可用作工具栏的图像库;14、当用户单击工具栏按钮时,将触发工具栏按钮的ButtonClick事件;15、在VB的工程资源管理器中,如果从工程中移除已经保存过的文件,该文件仍然被物理删除真正删除;16、如果列表框的ListConut的属性为10,则列表框最后一项的ListIndex值为10;17、要是某个命令按钮不起作用,应将该按钮的Enabeld属性设置为False;18、使用数组定义语句：Dim D$10,则数组D中各元素的值为空;19、如果在一行中输入多条语句,各语句之间用使用；分隔;20、在代码窗口中输入某行代码并按回车键之后,如果代码变成红色,说明该行代码有语法错误;四、读程序题,写出程序运行结果1、 Private Sub Form_ClickStatic SUM As IntegerI = 1Do While I<=10SUM = SUM + II = I + 1LoopPrint SUMEnd Sub运行程序,第一次单击窗体：第二次单击窗体：2、 Private Sub Form_ClickPrint ""; Tab6; 2, Tab15; 5PrintFor I = 15 To 16Print I;For j = 2 To 6 Step 3Print Tab3 j; j I;Next jPrintNext IEnd Sub程序运行结果：五、编程题一窗体中有图片框Picture1和计时器Timer1两个控件,运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下脚移动,每次向左、向右移动100twip20分之一像素;请填空：Private Sub Form_load1 =loadPicture“c:\pic\”2 .Interval=200End SubPrivate Sub Timer1_TimerStatic x , y As Integerx=x+100y=y+1003End Sub二有一个单击按钮过程,其作用是产生50个60～100的随机数,统计其中被6整除余2的个数,并将这些数输出;请填空：Private Sub Command1_ClickDim x As Integer, N%Dim Counter As Integer1 TimerFor N=1 To 50X=Rnd 2If 3 =2 ThenPrint xCounter= 45Next NPrint CounterEnd Sub一 10分1 、 552、 110二、 10分2 515 30 7516 32 80五、编程题 20分一1、2、 Timer13、 x ,y二 1、 Randomize2、 Rnd41+603、 x Mod 64、 Counter＋15 End If一、单项选择题共10分1．在代码中引用一个控件时,应使用控件的B属性;A．Caption B．Name C．Text D．Index2．设变量x = 4,y = -1,a = 7,b = -8,下面表达式A的值为“假”;A．x+a <= b-y B． x > 0 AND y < 0C．a = b OR x>y D． x+y > a+b AND NOT y < b3．表达式IntRnd71+10产生的随机整数范围是C ;A．10,80 B．10,81 C．10,80 D．10,814．函数Sgn的返回值是C ;A．-1 B．0 C．1 D．以上都不对5．67890属于 D 类型数据;A．整型 B．单精度浮点数 C．货币型 D．长整型6．下列变量名中正确的是D;A．3S B．Print C．Select My Name D．Select_17．下列赋值语句 A 是有效的;A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 08．以下的控件或方法具有输入和输出双重功能的为B;A．Print B．Textbox C．Optionbutton D．Checkbox9．若要获得列表框中被选中的列表项的内容,可以通过访问D属性来实现;A．Name B．ListIndex C．ListCount D．Text10．下列代码的运行结果为B ;Private Sub command1_clickDim m10For k = 1 To 10mk = 11 - kNext kx = 5Print m2 + mxEnd SubA．2 B．3 C．4 D．5二、填空题10分1．写出整数n能同时被13和17整除的Basic表达n Mod 13=0 And n Mod 17=0式 ;2．代码窗口中有两个下拉列表框：左侧是对象列表框,右侧是过程列表框;3．写出在字符串”Visual Basic 6.0” 中截取”Visual” 的Basic表达式LEFT“Visual Basic 6.0”,6;4．函数Len“abcdef”的返回值是6 ;5．设a = 2,b = 5,c = -2,d = 100,则a > b >= c AND a < b >= d 的值为False ; 三、将下列数学表达式转换为VB 表达式;6分 1．a2+2ab+b2 ： a^2+2ab+b^2 2．8exln10 ：8expxlog10 3．2sin450cos450 ：2sin4cos46．在VB 中,用户定义常量使用 Const 语句,声明变量使用 Dim 语句; 1．在VB 中,扩展名为.vbp 的文件称为 A ; A 工程文件 B 窗体文件C 类模块文件D 标准模块文件2．在VB 集成开发环境的设计模式下,用鼠标双击窗体上的某个对象后,打开的窗口是 A ;A 代码窗口B 窗体设计窗口C 属性窗口D 工程资源管理器窗口 3．设有变量定义语句Dim a%,则变量a 的数据类型是 A ; A 整型 B 单精度类型 C 双精度类型D 字符串类型4．下列表达式中,值为False 的是 D ;A "AB"<"abc"B "ABC" = UCase"abc"C "ABCD"<"abc"D Mid"ABCD",3,1=Left"ABCD",35．函数InStr"ABCDEF", "CD"的值是 B ; A 2B 3C TrueD CDEF6．下列程序运行后,单击窗体,输出结果是 C ; Private Sub Form_ClickDim a As Integer, b As Integer a = 3 b = 5Print a + b; a & b End Sub A 8 8 B 35 35C 8 35D 35 87．下列程序运行后,单击窗体,输出结果是 B ; Private Sub Form_Click a = 3: b = 7a = a +b : b = a – b : a = a - b Print a; b End Sub A 4 3 B 7 3 C 3 7 D 10 78．下面程序段所表示的数学关系式是 C ; If a < b ThenIf d = c Then x = 1 Elsex = 2 End If A ⎩⎨⎧≠≥=<=)(2)c (1d c b a d b a x 且且B ⎩⎨⎧≠<=<=)(2)c (1d c b a d b a x 且且C ⎩⎨⎧≥=<=)(2)c (1b ad b a x 且D ⎩⎨⎧≠=<=)(2)c (1d c d b a x 且9．下列程序运行后,单击窗体,输出结果是 C ; Private Sub Form_Click s = 0: k = 1 Dos = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A 15 B 10 C 1 D 010．下列程序段的输出结果是 B ; For k = 4 To 2 Step -2 m = k Next kPrint m; k; A 2 2 B 2 0 C 2 1 D 0 011．用下面的语句定义数组,则数组中的元素个数是 D 个;Option Base 1Dim A-1 To 2,5 As IntegerA 5B 10C 15D 2012．下面程序段的输出结果是 C ; Dim a4 As Integer, s As Integer For k = 1 To 4 ak = 2 k Next kFor k = 1 To 4 Step 2 s = s + ak Print s; Next k A 8 B 20 C 2 8 D 2 6 12 2013．设有如下的用户自定义类型Private Type Stuname As String 10 age As Integer End Type则以下正确引用该类型成员的代码是 B ; A ="zhang" B Dim s As Stu= "zhang"C Dim s As Type Stu = "zhang"D Dim s As Type = "zhang" 14．用“ B ”关键字声明的变量称为全局变量; A PrivateB PublicC DimD Static15．在窗体上放置一个文本框,程序运行后,在文本框中输入abc,但显示的却是,可能的原因是该文本框的 D 属性值已经被设置为""; A FontB TextC NameD PasswordChar16．在VB 中,Print是对象的 B ;A 属性B 方法C 事件D 名称17．在VB 中,要判断复选框是否为选中状态,使用的属性是 D ;A CaptionB CheckedC SelectedD Value18．设列表框List1中共有3个列表项,如右图所示;则下列语句中,能够删除最后一个列表项的是 A ;A 2B "项目C"C List1. ListcountD List1. ListIndex19．组合框分为下拉式组合框、简单组合框和下拉式列表框,在“属性”窗口中这三种类型是由 A 属性设置的;A StyleB FillStyleC BackStyleD BorderStyle20．用户单击滚动条的空白处滑块与两端滚动箭头之间的区域时,Value属性所增加或减少的值,是由 D 属性决定的;A MinB MaxC SmallChangeD LargeChange21．将图片文件“”作为背景图片,装入当前窗体,正确的语句是 D ;A =B = LoadPictureC =""D = LoadPicture""22．要将两个单选按钮放置在同一个框架内,使它们成为一组,正确的操作是 A ;A 先放置一个框架,然后在框架中放置两个单选按钮B 先放置两个单选按钮,再放置一个框架,放置框架时覆盖在单选按钮上C 先放置两个单选按钮,再放置一个框架,然后将两个单选按钮拖动到框架内D 以上三种方法都正确23．计时器控件能够响应的事件是 D ;A LoadB ClickC ChangeD Timer24．要使命令按钮处于无效状态,可以设置按钮的 B 属性值为False;A CaptionB EnabledC StyleD Visible25．如果在一个工程中有多个窗体和模块,则VB默认的启动对象是 C ;A 第一个标准模块B 最后一个被添加的窗体C 设计时的第一个窗体D 最后一个被添加的标准模块26．在窗体上放置一个图像框,名称为Image1;程序运行时,要保持图像框大小不变,使框中的图片能够自动适应图像框的大小,可以执行语句 B ;A =TrueB =TrueC =FalseD =False27．使用“菜单编辑器”建立菜单项之间的分隔线时,在菜单项的“标题”中输入的符号是 A ;A 减号-B 下划线_C & D28．要将窗体Form1从内存中卸载,正确的语句是 D ;A B Load Form1C D UnLoad Form129．在窗体上单击时,会触发鼠标事件MouseDown,其事件过程的一般格式如下：Private Sub Form_MouseDownButton As Integer, Shift As Integer, X As Single, Y AsSingle …… End Sub此时,如果单击的是鼠标右键,则Button 参数的值是 B ; A 1 B 2 C 3 D 4 30．获取文件的长度字节数,可以使用的函数是 B ;A LENB LOFC EOFD LOG1．数学表达式yx y3改写为VB 表达式,形式是 1 ;答案 sqr3y /x+y 2．在VB 中,InputBox 函数返回值的数据类型是 2 ;答案：字符串类型或String 3．语句 Print Tab5;"ABC" 的功能是 3 ;答案：从第5列开始输出字符串“ABC ”4．下面程序段的功能是：在文本框Text1中输入一个数值x,如果满足5<x<10,那么输出“Yes ”,否则输出“No ”;请填空; x =Val 答案5 < x And x <10If 4 Then Print "Yes" Else Print "No"5．设a=1,b=2,c=3,语句 Print a < b Or b < c And c < a 的输出结果是 5 ;答案：True6．在窗体上放置一个标签,名称为Label1,使用语句 6 可以把标签的前景色设置为蓝色; = vbBlue 或 RGB0,0,255 或QBColor9 7．在窗体上放置一个图像框,名称为Image1,要使该图像框向下移动10个默认单位twip,正确的语句是 = 7 答案： + 10 8．使用“菜单编辑器”建立了一个主菜单,名称为menu1;要把它作为窗体Form1的快捷菜单也称为弹出式菜单弹出,使用的语句是：答案：PopupmenuForm1. 8 menu19．在窗体上放置一个通用对话框控件,名称为CommonDialog1;使用该控件建立“打开”文件对话框时,要求只能显示文本文件即扩展名为“.txt ”的文件,则正确的设置语句是CommonDialog1. 9 ="文本文件.txt|.txt"; 答案：Filter 10．设磁盘上已存在顺序文件“”,为了从文件中顺序读取数据而打开该文件,正确的语句是 Open "" For 10 As 1; 答案：Input 1．下列面程序运行后,单击窗体,输出结果是 1 ;答案：1 3 9Private Sub Form_Click s = 0For n=1 To 3 p = 1For k = 1 To n p = p k Next k s = s + p Print s; Next n End Sub2．下列程序运行后,单击窗体,输出结果是 2 ;答案：7Private Sub Form_Click m = 0For k = 1 To 4Select Case kCase 1, 2m = m + 1Case Is > 3m = m + 2Case 1 To 4m = m + 3End SelectNext kPrint mEnd Sub3．在窗体上放置一个文本框,名称为Text1;下列程序运行后,单击窗体,Text1中显示的内容是3 ; 答案：adePrivate Sub Form_Click= ""s = "aBd12Re"For k = 1 To Lensch = Mids, k, 1If ch >= "a" And ch <= "z" Then= + chEnd IfNext kEnd Sub4．下列程序运行后,单击窗体,输出结果是 4 ; 答案：11 24Option Base 1Private Sub Form_Clickx = Array3, 5, 4, 8, 2, 6, 11, 9, 7, 4p = x1: s=0For k = 2 To UBoundxIf xk > p Thenp = xks = s + pEnd IfNext kPrint p; sEnd Sub5．下列程序运行后,单击窗体,输出结果是 5 ; 答案：1 5 1Private Sub Form_ClickDim a1 To 3, 1 To 3For i = 1 To 3For k = 1 To 3If k = 1 Or i = k Thenai, k = 1Elseai, k = i + kEnd IfNext kNext iPrint a1, 1; a2, 3; a3, 3End Sub6．在窗体上放置一个命令按钮,名称为Command2,并编写如下代码;Private Sub Command2_ClickDim m As Integer, n As Integer, g As Integerm = 18: n = 12: g = 0Call sub1m, n, gPrint m; n; gEnd SubPublic Sub sub1ByVal a As Integer, ByVal b As Integer, c As IntegerIf a < b Then t = a: a = b: b = tDo While b <> 0r = a Mod ba = bb = rLoopc = aEnd Sub程序运行后,单击命令按钮,则输出结果是 6 ;答案：18 12 67．在窗体上放置一个命令按钮,名称为Command3,并编写如下代码;Private Sub Command3_ClickDim k As Integerk = 1Print fun1k;Print fun1k;Print fun1k;End SubFunction fun1a As Integer As IntegerStatic c As IntegerDim b As Integera = a + 2:b = b + 2:c = c + 2fun1 = a + b + cEnd Function程序运行后,单击命令按钮,则输出结果是 7 ;答案：7 11 158．在窗体上放置一个文本框,其名称为Text1,并编写如下代码;Dim s As StringPrivate Sub Text1_KeyPressKeyAscii As Integers = s + ChrKeyAsciiPrint s;End Sub程序运行后,在文本框中输入abc,则窗体上输出的内容是 8 ;答案：aababc1．在窗体上放置一个计时器和一个标签,计时器名称为Timer1,标签名称为Label1;下列程序的功能是：1在窗体加载事件中设置计时器每秒钟能够触发5次Timer事件；2每触发一次Timer事件能够将标签上的字号加大2,当字号超过当前窗体的宽度时,将字号恢复为8;程序中有一处．．错误,请更正;说明错误时可以使用每条语句前的编号;1 Private Sub Form_Load2 = 5 答案：2003 = True4 End Sub5 Private Sub Timer1_Timer6 = + 27 If > Then8 = 89 End If 10 End Sub2．下列程序的功能是计算1+3+5+…+99的和s;程序中有一处．．错误;请更正;说明错误时可以使用每条语句前的编号;1s = 0 2 k = 13 Do While k <= 994 k = k + 2 答案：将4、5调换顺序5 s = s + k6 Loop 7Print s1．在窗体上放置一个列表框,名称为List1；放置一个文本框,名称为Text1；放置一个命令按钮,名称为Command1,Caption 属性值为“统计3的倍数”;如右图所示;下列程序的功能是：（1）在窗体的Load 事件中,产生10个20~30含20和30之间的随机整数,并作为列表项逐个添加到列表框List1中;（2）单击命令按钮Command1时,能够统计列表框中是3的倍数的列表项的个数,并将统计结果显示在文本框Text1中; 请填空完善程序;Private Sub Form_ LoadDim x As Integere RandomizeFor k = 1 To 10 答案：IntRnd 11 + 20 或 Rnd10+20 x = 1 '产生一个20,30之间的随机整数 2 '将x 作为列表项添加到List1中 Next k 答案： x 或 strx End SubPrivate Sub Command1_ClickDim n As Integer ' n:存放是3的倍数的列表项的个数 For k = 3 答案：0 To – 1 或 0 To 9 If Valk 4 = 0 Then 答案： Mod 3 n = n + 1 End If Next k = n End Sub2．下列程序的功能是用近似公式 !1!31!21!111n e +++++≈ 求自然对数的底 e 的值,直到最后一项小于10-4时停止计算;请填空完善程序;Private Sub Form_ClickDim e As Single, n As Integer, p As Single'e: 累加和 p: 参加求和的当前项e = 1: n = 1: p = 1Do While 5 答案：p >= 1e-4e = e + pn = n + 1p = 6 答案：p / nLoopPrint "e的近似值="; eEnd Sub3．在下图所示的窗体上放置的主要控件及其主要的属性设置如下：下列程序的功能是单击命令按钮后,根据单选按钮的选中状态,将标签中的“示例文字”设置为相应的字体;请填空完善程序;Private Sub Command1_ClickDim fn As String ' fn:存放选中的字体If 7 Then 答案： = Truefn = "宋体"Elsefn = "隶书"End If8 = fn 答案：End Sub4．下列程序中用户自定义函数ave的功能是求一维数组中所有元素的平均值,并返回;单击窗体时,能够输入数组a的10个元素,并调用函数ave,求数组a中所有元素的平均值,并显示输出;请填空完善程序;Option Base 1Private Sub Form_ClickDim a10 As SingleFor i = 1 To 10ai = ValInputBox"输入一个数值"Next iPrint "平均值="; 9 '调用函数ave 答案：aveaEnd SubPublic Function aveb As Single As SingleDim s As SingleDim n As Integern = UBoundbFor k = 1 To ns = s + bkNext k10 答案：ave = s / nEnd FunctionVB期末范围题总汇1．求随机10个整数的最大值、最小值、平均值以及和；Dim a1 To 10Private Sub Command1_ClickRandomize"产生的随机数为："For i = 1 To 10ai = IntRnd 99 + 1ai;Next iEnd SubPrivate Sub Command2_ClickDim max, min, avemax = a1min = a1ave = a1For i = 2 To 10If ai > max Then max = aiIf ai < min Then min = aiave = ave + aiNext i"最大数为："; max"最小数为："; min"平均数为："; aveEnd Sub2.求水仙花数Private Sub Form_ClickDim a, b, c As Integer 'a个b十c百For a = 0 To 9For b = 0 To 9For c = 1 To 9If a ^ 3 + b ^ 3 + c ^ 3 = a + 10 b + 100 c Then MsgBox 100 c + 10 b + aNext bNext aEnd Sub3.百元买百鸡问题；Option ExplicitConst a = 5, b = 3, c = 1Private Sub Form_ActivateDim i As Integer, j As Integer, k As Integer, n As Integer For i = 1 To 100For j = 1 To 100For k = 1 To 100If i a + j b + k c = 100 Thenn = n + 1" 公鸡：" & i & " 母鸡：" & j & " 小鸡：" & kEnd IfNext: Next: NextMsgBox "共有组合：" & nEnd Sub求1000以内的所有完数一个按钮里调用的过程Private Sub Command1_ClickOutputWanNumber 1000End Sub4.'求完数的过程Private Sub Form_ClickDim i, j As IntegerFor i = 4 To 100temp = 1For j = 2 To i / 2If i Mod j = 0 Thentemp = temp + jEnd IfNext jIf temp = i ThenPrint iEnd If5.求各位数字之和input a:'输入任意数dob=a mod 10:'取a的末位数sum=sum+b:'求和a=a \ 10:'去掉末位数loop until a=0print "sum=";sum:'输出enddim n as stringinput nfor i = 1 to lennsum=sum+valmidn,i,1next iprint sum6.求最小公倍数Private Sub Form_Load= TrueDim n1%, m1%, m%, n%, r%n1 = InputBox"输入n1"m1 = InputBox"输入m1"If m1 > n1 Then '为了求最小公倍数,增加m,n变量m = m1: n = n1Elsem = n1: n = m1End IfDor = m Mod nIf r = 0 Then Exit Dom = nn = rLoopPrint n1; ","; m1; "的最大公约数为"; nPrint "最小公倍数=", m1 n1 / nEnd Sub7.求逆序数感觉题目类型太多8. 级数有限项求和问题题目类型太多9. 求质因子问题Private Sub Command1_ClickDim N As Integer, I As IntegerN = ValInputBox"请输入2的整数:"I = 2DoIf N Mod I = 0 ThenPrint I;N = N \ IElseI = I 1End IfLoop While N 1End Sub10. 字符统计Option Base1Option ExplicitPrivate Sub Command1_ClickDim i as integer,A26 as integer,n as integer Dim S as string1,Strl as stringStrl=Text1n=LenStrlFor i=1 To nS=MidStrl,i,1If UCaseS>=”A” And UCaseS<=”Z” Then AAscUCaseS-64+1End IfNext iFor i=1 To 26Chr64+i & “:” & AiNetx iEnd SubPrivate Sub Command_ClickEndEnd Sub第二大题1. 判定素数过程Function isprimeNum As Long As BooleanIf Num < 2 Then isprime = False: Exit FunctionDim i As LongFor i = 2 To SqrNumIf Num Mod i = 0 Thenisprime = FalseExit FunctionEnd IfNext iisprime = TrueEnd FunctionPrivate Sub Command1_ClickDim i As LongFor i = 1 To 1000If isprimei ThenPrint iEnd IfNext iEnd Sub2.求最大公约数过程；Function Max公约数A As Long, B As Long '求出两个数的最大公约数Dim X As Long, Y As Long, K As LongX = IIfA >= B, A, B 'x存入最大值Y = IIfA <= B, A, B 'y 存入最小值Do '辗转相除法K = X Mod Y: If K = 0 Then Exit DoX = Y: Y = KLoopMax公约数 = YEnd Function3.冒泡排序过程Private Sub Command1_ClickDim a9 As Integer。

vb期末考试题库及答案

vb期末考试题库及答案一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. StringC. Both A and BD. None of the above答案：C2. VB中，用于声明变量的关键字是？A. DimB. DeclareC. VarD. Let答案：A3. 在VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. +D. Concatenate答案：C4. 如果要声明一个整型变量并初始化为5，正确的语句是？A. Integer x = 5B. Dim x As Integer = 5C. Dim x = 5D. x = 5答案：B5. VB中，哪个控件用于显示文本，并且用户不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B6. 在VB中，以下哪个选项是正确的循环结构？A. For EachB. WhileC. Both A and BD. None of the above答案：C7. VB中，以下哪个语句用于结束当前程序的执行？A. EndB. ExitC. StopD. All of the above答案：D8. 在VB中，以下哪个选项是正确的条件判断语句？A. If...Then...ElseB. Switch...CaseC. Both A and BD. None of the above答案：C9. VB中，以下哪个函数用于获取当前系统日期？A. NowB. DateC. TodayD. Time答案：C10. 在VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Label答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个字符型变量可以使用关键字________。

答案：Dim2. VB中，数组的声明格式为________。

VB期末考试考卷及答案

VB期末考试考卷及答案一、选择题（每题1分，共5分）1. 在VB中，下列哪个函数用于返回字符串的长度？A. Len()B. Length()C. Size()D. Count()A. DimB. IntegerC. IntD. Var3. 在VB中，下列哪个语句用于退出当前循环？A. Exit ForB. BreakC. Exit DoD. ContinueA. OpenB. LoadC. CreateD. Read5. 在VB中，下列哪个事件在窗体加载时发生？A. LoadB. InitializeC. FormLoadD. FormOpen二、判断题（每题1分，共5分）1. VB中的变量必须先声明后使用。

（）2. 在VB中，Sub过程可以返回值。

（）3. VB中的数组下标从1开始。

（）4. 在VB中，可以使用Select Case语句进行多条件判断。

（）5. VB中的字符串可以用单引号(')表示。

（）三、填空题（每题1分，共5分）1. 在VB中，用于声明常量的关键字是______。

2. VB中的逻辑运算符包括______、______和______。

3. 在VB中，要实现两个变量的值交换，可以使用______变量作为中间变量。

4. 在VB中，______方法用于设置文本框的字体。

5. VB中的______事件在用户单击按钮时发生。

四、简答题（每题2分，共10分）1. 简述VB中事件的执行过程。

2. 请列举三种VB中的数据类型。

3. 简述如何使用Select Case语句进行多条件判断。

4. 请说明如何使用VB中的循环结构实现1到100的累加。

5. 简述如何使用VB中的文件操作函数读取文件内容。

五、应用题（每题2分，共10分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。

2. 编写一个VB程序，实现用户输入一个字符串，程序将其逆序输出。

3. 编写一个VB程序，使用循环结构输出九九乘法表。

《Visual BASIC程序设计》期末考试编程题复习及答案

第2章1.新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1，界面如图2-5所示，程序运行要求如下：1）单击“改变颜色”按钮，标签上的文字内容改为“颜色已经改变”，文字颜色改为红色。

“改变颜色”按钮代码：Label1.ForeColor = vbRedLabel1.Caption = "颜色已经改变"2）单击“改变字体”按钮，标签上的字体改为“黑体”。

“改变字体”按钮代码：Label1.FontName = "黑体"图2-5程序运行界面最后将工程文件、窗体文件分别以lx2-2.vbp、lx2-2.frm为文件名保存在D:\EX文件夹下。

2.设计一个留言薄。

新建一个工程，在窗体上创建2个标签，2个文本框，1个命令按钮，属性设置如图2-6所示，。

要求单击“提交”按钮后，上面的文本框内容复制到下面的文本框中，且下面文本框中的内容不能修改。

单击“清除”按钮则清除两个文本框中的内容。

“提交”按钮代码：Text2.Text = Text1.Text“清除”按钮代码：Text1.Text = ""Text2.Text = ""图2-6 程序界面最后将工程文件、窗体文件分别以lx2-4.vbp、lx2-4.frm为文件名保存在D:\EX文件夹下。

3.设计一个程序，程序界面如图2-7所示。

当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。

“显示”按钮代码：Text1.Text = "欢迎使用VB!"“清除”按钮代码：Text1.Text = ""“退出”按钮代码：End图2-7 程序运行界面最后将工程文件、窗体文件分别以lx2-5.vbp、lx2-5.frm为文件名保存在D:\EX文件夹下。

vb期末测试题及答案

vb期末测试题及答案一、单选题（每题2分，共20分）1. VB中，以下哪个是合法的变量名？A. 2variableB. Variable2C. Variable-2D. Variable 2答案：B2. 在VB中，以下哪个是正确的字符串连接运算符？A. +B. &&C. &D. ||答案：C3. VB中，以下哪个函数用于计算字符串的长度？A. LenB. LengthC. SizeD. Count答案：A4. 在VB中，以下哪个循环结构用于重复执行代码块，直到满足某个条件？A. For...NextB. Do...LoopC. While...WendD. If...Then答案：B5. VB中，以下哪个关键字用于声明常量？A. DimB. ConstC. StaticD. Public答案：B6. 在VB中，以下哪个是正确的数据类型用于存储日期？A. DateB. DateTimeC. StringD. Integer答案：B7. VB中，以下哪个是正确的子程序声明？A. Sub MySub()B. Function MySub()C. Procedure MySub()D. Method MySub()答案：A8. 在VB中，以下哪个是正确的数组声明？A. Dim arr(10)B. Dim arr() As IntegerC. Dim arr(10) As IntegerD. Dim arr As Integer(10)答案：C9. VB中，以下哪个是正确的条件语句？A. If...Then...ElseB. When...Then...ElseC. If...Then...End IfD. If...Then...Else...End答案：C10. 在VB中，以下哪个是正确的事件处理程序声明？A. Private Sub Form_Load()B. Public Sub Form_Load()C. Private Function Form_Load()D. Public Function Form_Load()答案：A二、填空题（每题2分，共20分）1. VB中，用于声明变量的关键字是________。

vb期末考试试题和答案

vb期末考试试题和答案**VB期末考试试题和答案**一、单选题（每题2分，共20分）1. 在Visual Basic中，以下哪个不是基本数据类型？A. IntegerB. DoubleC. StringD. Object答案：D2. 下列哪个选项是Visual Basic的事件驱动编程模型？A. 用户操作B. 程序流程C. 函数调用D. 循环执行答案：A3. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A4. 如果要声明一个变量用于存储字符串，应该使用以下哪个数据类型？A. IntegerB. StringC. DoubleD. Boolean答案：B5. 在Visual Basic中，哪个函数用于将字符串转换为小写？A. UCaseB. LCaseC. StrCompD. Trim答案：B6. Visual Basic中，以下哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B7. 在Visual Basic中，以下哪个语句用于结束程序的执行？A. EndB. ExitC. StopD. Return答案：A8. Visual Basic中，以下哪个控件用于创建下拉选择列表？A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案：B9. 在Visual Basic中，以下哪个关键字用于声明一个过程？A. SubB. FunctionC. PropertyD. Event答案：A10. Visual Basic中，以下哪个函数用于获取当前系统日期？A. NowB. DateC. TimeD. Timer答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个数组。

vb程序设计期末考试题及答案

vb程序设计期末考试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 如果变量x的值是5，那么表达式x + 3的值是多少？A. 2B. 8C. 3D. 5答案：B3. 在VB中，以下哪个关键字用于定义一个过程？A. FunctionB. SubC. IfD. For答案：B4. 下列哪个选项是VB中的保留字？A. MyB. DimC. EndD. Print答案：C5. 在VB中，哪个函数用于计算一个数的平方根？A. SqrB. AbsC. RoundD. Int答案：A6. 在VB中，以下哪个选项是正确的事件处理程序的声明方式？A. Private Sub Button1_Click()B. Public Sub Button1_Click()C. Dim Sub Button1_Click()D. Sub Button1_Click() As Integer答案：A7. 在VB中，以下哪个控件用于显示文本，但用户不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B8. 在VB中，以下哪个选项是正确的条件语句？A. If...Then...ElseB. Case...SelectC. For...NextD. While...Do答案：A9. 在VB中，以下哪个选项是正确的循环结构？A. For Each...NextB. Do While...LoopC. Both A and BD. None of the above答案：C10. 在VB中，以下哪个函数用于将字符串转换为整数？A. CIntB. CStrC. CDblD. CLng答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量i，可以使用关键字________。

《VB程序设计》期末考试试卷(A)附答案

******学院2009-2010学年第二学期《VB程序设计》期末考试试卷（A）附答案一、选择题（2分/题，共60分）（1）要设置窗体上各控件的属性，可以在＿＿＿中进行。

A“窗体布局”窗口B“工程资源管理器”窗口C“属性”窗口D“对象”窗口（2）下面程序段＿＿＿能够正确实现目的：如果x<y,则a=15,否则a=-15。

AIfx<yThena=15a=-15PrintaBifx<yThena=15:Printaa=-15:PrintaCIfx<yThena=15:PrintaElseA=-15:PrintaEndifDIfx<yThena=15a=-15PrintaEndif（3）VB窗体设计器的主要功能是＿＿＿。

A建立用户界面B编写源程序代码C画图D显示文字（4）文本框控件的值是＿＿＿属性。

ACaptionBValueCIndexDText（5）双击窗体中的对象后，VB将显示的窗口是＿＿＿。

A工具箱B“工程”窗口C“代码”窗口D“属性”窗口（6）下列程序段的执行结果是＿＿＿。

X=int(Rnd()+4)SelectcasexCase5Print“优秀”Case4Print“良好”Case3Print”通过”CaseelsePrint”不通过”EndselectA优秀B良好C通过D不通过（7）下列哪个不是窗体的属性＿＿＿。

ACaptionBTextCControlBoxDBorderStyle（8）设组合框Combo1中有3个项目,则以下能删除最后一项的语句是＿＿＿。

ACombo1.RemoveItemTextBCombo1.RemoveItem2CCombo1.RemoveItem3DCombo1.RemoveItemCombo1.Listcount（9）窗体BorderStyle属性的功能是＿＿＿。

A设置窗体的边框大小B设置窗体的边框样式，是否显示标题栏，是否可以调整大小等C决定是否显示窗体的控制菜单图标与状态控制按钮D决定窗体的最大化或最小化按钮是否有效（10）下列可作为VB的变量名的是＿＿＿。

VB程序设计期末复习资料

VB 程序设计期末复习题一、填空题1.在VB 6.0中,变量名最长可达个字符.答案：255解析：规定2.男性(sex)，年龄(age)在18—20岁之间，身高(size)在 1.65米以上，列出逻辑表达式。

答案：sex and age>=18 and age<=20 and size>=1.65解析：规定3.要使一个按钮设为默认按钮,应把此按钮的属性的值设为True.答案：Default解析：规定4.一个工程可以包括多种类型的文件,其中,扩展名为.vbp的文件表示文件. 答案：工程解析：规定5.VB表达式9^2 MOD 45 \2 *3 的值 .答案：4解析：表达式的计算，优先级6.如果要使用命令按钮表面显示文字"退出(X)"(在字符X之下加下划线),则其Caption属性设置为 .答案：退出(&X)解析：规定7.拖动滚动条中的滚动块将会产生Scroll和事件.答案：Change解析：规定8.在利用Visual Basic设计应用程序时，一般会遇到三类错误：语法错误、执行错误和。

答案：逻辑错误解析：规定9.Option Base 1的作用是确定数组的下界为 .答案：1解析：规定10.在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的属性的值设置为True.答案：MultiLine解析：规定11.表达式81\7 MOD 2^2 的值是 .答案：3解析：规定12.由For k=35 to 0 step 3:next k循环语句控制的循环次数是 .答案：0解析：规定13.把条件1<=X<12写成VB关系表达式为 .答案： x>=1 and x<12 或 x<12 and x>=1解析：规定15.如果要在单击按钮时执行一段代码,则应将这段代码写在事件过程中.答案：click解析：规定16.写出清除标签Label1的显示信息的语句为 .答案：Label1.caption="" 或 Label1="" 或 Label1.Caption=""解析：规定17.如果要指明mystring为固定15个字长的全局变量,应该在标准模块中用以下说明语句定义 .答案： public mystring as string*15解析：规定18.将焦点定位于命令按钮Command1之上的语句为 .答案：Command1.SetFocus 或 SetFocus解析：规定19.滚动条控件有水平滚动条和滚动条.答案：1). 垂直解析：规定20.把整型数1赋给一个逻辑型变量,则逻辑变量的值为 .答案：True解析：规定21.写出清除标签Label1的显示信息的语句为 .答案：Label1.caption="" 或 Label1="" 或 Label1.Caption=""解析：规定22.设置计时器对象触发事件的时间间隔用属性.答案：interval解析：规定23.VB中,变量的声明可分为两种方法: 数组和动态数组.答案：静态解析：规定24.大于X 的最小整数的VB表示形式为 .答案：Int(x)+1 或 Int(x) + 1解析：规定25.文本框中所显示的内容是它的属性的值.答案：Text解析：规定26.设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为 . 答案：False解析：规定27.设置计时器控件只能触发事件.答案：timer解析：规定28.文件按照存取方式及其组成结构可以分为顺序文件和 .答案：随机文件解析：规定28.声明单精度常量g(重力加速度)代表9.8可写成 .答案：const g=9.8 或 const g as single =9.8解析：规定29.在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer,则strVar、intVar与sngVar的数据类型分别是Variant、Variant和 .答案：Integer解析：规定30.如果在模块的声明段中有Option Base 0语句,则在该模块中使用Dim a(6, 3 To 5)声明的数组有个元素.答案：21解析：规定31.由For k=35 to 0 step 3:next k循环语句控制的循环次数是 .答案：0解析：初值超过终值32.表达式 1 and 0的值 .答案：False解析：规定33.一元两次方程ax2+bx+c=0有实根的条件为a≠0,并且b2-4ac≥0,列出逻辑表达式 .答案：a<>0 and b^2-4*a*c>=0解析：逻辑表达式的书写34.变量min@表示类型的变量.答案：货币型解析：数据类型35.想拥有"快捷键"这项功能,必须在"菜单编辑器"中增加一些特殊的设置,也就是在字母之前加上 .答案：&解析：规定二、程序填空1.以下程序段利用随机函数生成15个10-100之间的整数，然后用选择法将其从小到大排序。

vb期末考试试题及答案百度文库

vb期末考试试题及答案百度文库一、单项选择题（每题2分，共20分）1. VB中，哪个关键字用于声明变量？A. DimB. SetC. CallD. Function答案：A2. 下列哪个选项不是VB的数据类型？A. IntegerB. StringC. BooleanD. Array答案：D3. VB中，哪个函数用于计算字符串的长度？A. LenB. UBoundC. LBoundD. Sqr答案：A4. 在VB中，如何表示“不等于”？A. =B. ==C. <>D. !=答案：C5. VB中，哪个关键字用于循环结构？A. ForB. NextC. ToD. Loop答案：A6. VB中，哪个函数用于将字符串转换为大写？A. StrConvB. LCaseC. UCaseD. Trim答案：C7. VB中，哪个语句用于退出子程序？A. Exit SubB. End SubC. ReturnD. Exit Function答案：A8. VB中，哪个关键字用于声明函数？A. FunctionB. SubC. DimD. Const答案：A9. VB中，哪个关键字用于声明常量？A. DimB. ConstC. PrivateD. Public答案：B10. VB中，哪个函数用于获取当前日期？A. NowB. DateC. TimeD. Today答案：D二、填空题（每题3分，共15分）1. 在VB中，使用________关键字可以定义一个类。

答案：Class2. VB中，________函数用于获取当前时间。

答案：Time3. VB中，________关键字用于定义一个接口。

答案：Interface4. VB中，________关键字用于定义一个事件。

答案：Event5. VB中，________关键字用于定义一个属性。

答案：Property三、简答题（每题5分，共20分）1. 请简述VB中的事件驱动编程是什么？答案：事件驱动编程是一种编程范式，其中程序的执行流程由外部事件（如用户操作、消息、定时器等）触发，而不是按照预先定义的顺序执行。

大学vb期末考试题库及答案

大学vb期末考试题库及答案一、单项选择题（每题2分，共20分）1. VB中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. End答案：A2. 在VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. TotalD. +答案：D3. VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A4. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Height答案：A5. VB中，以下哪个事件用于响应鼠标单击事件？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A6. 在VB中，以下哪个关键字用于循环结构？A. ForB. IfC. WhileD. Select答案：A7. VB中，以下哪个函数用于获取当前日期？A. NowB. DateC. TimeD. Today答案：D8. 在VB中，以下哪个属性用于设置文本框的只读状态？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A9. VB中，以下哪个控件用于选择单个项目？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B10. 在VB中，以下哪个事件用于响应文本框内容改变事件？A. ChangeB. ClickC. KeyPressD. TextChanged答案：A二、填空题（每题2分，共20分）1. VB中，声明变量的关键字是________。

答案：Dim2. VB中，用于计算两个数的乘积的运算符是________。

答案：*3. VB中，用于显示消息框的函数是________。

答案：MsgBox4. VB中，用于设置控件的标题的属性是________。

VB程序设计期末复习资料

VB程序设计期末复习资料VB 程序设计期末复习题一、填空题1.在VB 6.0中,变量名最长可达个字符.答案：255解析：规定2.男性(sex)，年龄(age)在18—20岁之间，身高(size)在1.65米以上，列出逻辑表达式。

答案：逻辑错误9.Option Base 1的作用是确定数组的下界为 .答案：1解析：规定10.在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的属性的值设置为True.答案：MultiLine解析：规定11.表达式81\7 MOD 2^2 的值是 .答案：3解析：规定12.由For k=35 to 0 step 3:next k循环语句控制的循环次数是 .答案：0解析：规定13.把条件1<=X<12写成VB关系表达式为 .答案： x>=1 and x<12 或 x<12 and x>=1解析：规定15.如果要在单击按钮时执行一段代码,则应将这段代码写在事件过程中.答案：click解析：规定16.写出清除标签Label1的显示信息的语句为 .答案：Label1.caption="" 或 Label1="" 或 Label1.Caption=""解析：规定17.如果要指明mystring为固定15个字长的全局变量,应该在标准模块中用以下说明语句定义 .答案： public mystring as string*15解析：规定18.将焦点定位于命令按钮Command1之上的语句为 .答案：Command1.SetFocus 或 SetFocus19.滚动条控件有水平滚动条和滚动条.答案：1). 垂直解析：规定20.把整型数1赋给一个逻辑型变量,则逻辑变量的值为 .答案：True解析：规定21.写出清除标签Label1的显示信息的语句为 .答案：Label1.caption="" 或 Label1="" 或 Label1.Caption=""解析：规定22.设置计时器对象触发事件的时间间隔用属性.答案：interval解析：规定23.VB中,变量的声明可分为两种方法: 数组和动态数组.答案：静态解析：规定24.大于X 的最小整数的VB表示形式为 .答案：Int(x)+1 或 Int(x) + 1解析：规定25.文本框中所显示的内容是它的属性的值.答案：Text解析：规定26.设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为 . 答案：False解析：规定27.设置计时器控件只能触发事件.答案：timer解析：规定28.文件按照存取方式及其组成结构可以分为顺序文件和 .答案：随机文件解析：规定28.声明单精度常量g(重力加速度)代表9.8可写成 .答案：const g=9.8 或 const g as single =9.8解析：规定29.在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer,则strVar、intVar与sngVar的数据类型分别是Variant、Variant和 .答案：Integer解析：规定30.如果在模块的声明段中有Option Base 0语句,则在该模块中使用Dim a(6, 3 To 5)声明的数组有个元素.答案：21解析：规定31.由For k=35 to 0 step 3:next k循环语句控制的循环次数是 .答案：0解析：初值超过终值32.表达式 1 and 0的值 .答案：False解析：规定33.一元两次方程ax2+bx+c=0有实根的条件为a≠0,并且b2-4ac≥0,列出逻辑表达式 .答案：a<>0 and b^2-4*a*c>=0解析：逻辑表达式的书写34.变量min@表示类型的变量.答案：货币型解析：数据类型35.想拥有"快捷键"这项功能,必须在"菜单编辑器"中增加一些特殊的设置,也就是在字母之前加上 .解析：规定二、程序填空1.以下程序段利用随机函数生成15个10-100之间的整数，然后用选择法将其从小到大排序。

VB考试题及答案

21 MsgBox()的正确语法是（ D ）。
A、 MsgBox(标题 [，提示信息] [，按钮类型])
B、 MsgBox(提示信息[，标题] [，按钮类型])
C、MsgBox(标题 [，按钮类型] [，提示信息])
D、 MsgBox(提示信息 [，按钮类型] [，标题])
B、将True转换为 1 ，将False转换为 -1
C、将True转换为 0 ，将False转换为 -1
D、将True转换为 -1 ，将False转换为 0
9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D).
A、SIN
B、4^5
C、3*4
D、x+1
10 如果x=2，则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值（ B ）。
A、不能计算
B、 True
C、5
D、False
11 随机产生 [10，50] 之间整数的正确表达式是（ D ）。
B、a#x 和 Pi
C、ForLoop 和 Total
D、Const 和 DoWhile
18 函数Len(Str(Val("123.4")))的值为(B).
A、5
B、6
C、8
D、11
19 Int(198.555*100+0.5)/100的值为B
A、199.6
A、157
B、12334
C、123
D、"12334"
7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C).
A、,

VB程序设计-期末测试卷含答案 (一)

VB程序设计-期末测试卷含答案 (一)作为学习VB程序设计的学生，在期末测试卷中我们不仅需要理解学过的知识点，还要能够运用所学知识进行程序设计。

本文将为大家详细介绍一份VB程序设计-期末测试卷含答案，帮助大家更好地备考。

一、基础知识题1.请简单介绍VB程序设计语言，并举例说明其应用场景。

答：VB程序设计属于面向对象编程技术体系，专门用于Microsoft Windows操作系统的开发。

VB的目标是开发出可视化的数据库应用程序，具体包括广泛的GUI(AppWin)，以及对绝大多数数据库的支持。

2.请简述VB程序设计中的数据类型，同时说明它们的区别。

答：在VB程序设计过程中，共有六种数据类型，分别是Byte、Boolean、Integer、Long、Single和Double。

Byte 和 Integer 分别代表字节和整数。

Boolean类型专门用于逻辑判断，只有True或False两种情况。

Long类型在处理大数字时会比Integer类型更加稳定。

而Single和Double类型都是浮点型数据，不同之处在于Double 类型可以表示更大范围和更高精度的浮点数。

3.请简述VB程序设计中的变量和常量。

答：在VB程序设计中，使用变量和常量进行数值存储和管理。

变量是数据存储位置的符号名称，它用于表示程序运行时结果的值，可以在程序运行时被改变。

而常量是包含在程序代码中的固定数值，一旦定义就无法被更改。

二、编程题1.请编写一个可以计算出a,b两个数乘积的程序。

答：Dim a,b,result As Doublea = InputBox("请输入第一个数：")b = InputBox("请输入第二个数：")result = a * bMsgBox ("乘积为：") &result2.请编写一个可以计算圆面积和圆周长的程序。

答：Dim radius As DoubleDim area, perimeter As Doubleradius = InputBox("请输入圆的半径：")area = 3.14 * radius * radiusperimeter = 2 * 3.14 * radiusMsgBox ("圆的面积为：") &area &"，圆的周长为：" &perimeter3.请编写一个可以计算阶乘的程序。

VB程序设计复习题答案

VB程序设计复习题1．Visual Basic是一种___D___的可视化程序设计语言。

A．面向机器 B．面向过程 C．面向问题 D．面向对象2．Visual Basic主窗口中不包括____B_____。

A．标题栏 B．状态栏 C．工具栏 D．菜单栏3．程序运行中用鼠标双击当前窗体时，会触发窗体的_____C____ 事件。

A．Load B．Unload C．DblClick D．KeyPress4．假设窗体上已有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先要执行的操作是____A______。

A．单击窗体上没有控件的地方 B．单击任一个控件C．双击任一个控件 D．双击窗体上没有控件的地方5、要设置窗体上各控件的属性，可在 ____C___ 中进行。

A．窗体布局窗口 B．工程资源管理器窗口C．属性窗口 D．窗体窗口6．设变量A的值为-2，则___A___函数的执行结果与其他三个不一样。

A．Val("A") B．Int(A) C．Fix(A) D．-Abs(A)7．要在窗体Forml的标题栏上显示"统计程序"，可用___B___语句。

A．="统计程序" B．Form1.Caption="统计程序"C. Forml.Caption=统计程序 D．=统计程序8．函数String(n, "str")的功能是 B 。

A．把数值型数据转换为字符串B．返回由n个字符组成的字符串C．从字符串中取出n个字符D．从字符串中第n个字符的位置开始取子字符串9、定义变量如下：Dim MyVarMyVar =”come see me “若在立即窗口中显示MyVar的值，下面正确的是（ A ）A．Debug.Print MyVar B、? MyVar C．Printer.Print MyVar D、Print MyVar 10．设置复选框或单选按钮标题对齐方式的属性是（ D ）A．Align B．value C．Sorted D. Alignment11、滚动条控件的LargeChange属性所设置的是（ A ）A．单击滚动条和滚动箭头之间的区域时，滚动条控件value属性值的改变量B．滚动条中滚动块的最大移动位置C．滚动条中滚动块的最大移动范围D．滚动条控件无该属性12、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是（ D ）A．Caption B．Name C．Text D．value13、在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序：Private Sub Command1_Click( )a=Text1.textb=Text2.textC=Lcase(a)D=Ucase(b)Print C;DEnd Sub程序运行后，在文本框Text1、Text2中分别输入AbC和Efg，结果是（ A ）A．abcEFG B．abcefg C．ABCefg D．ABCEFG14．假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为（ A ）A．Label1.BackStyle=0 B．Label1.BackStyle=1Label1.BorderStyle=0 Label1.BorderStyle=1C．Label1.BackStyle=True D．Label1.BackStyle=FalseLabel1.BorderStyle=True Label1.BorderStyle=False15．当拖动滚动条中的滚动块时，将触发滚动条的事件是（ D ）A．Move B．Change C．SetFocus D．Scoll16．比较图片框（PictureBox）和图像框（Image）的使用，正确的描述是（ C ）A．两类控件都可以设置AutoSize属性，以保证装入的图形可以自动改变大小B．两类控件都可以设置Stretch属性，使得图形根据物件的实际大小进行拉伸调整，保证显示图形的所有部分C．当图片框（PictureBox）的AutoSize属性为FaLse时，只在装入图元文件（*.wmf）时，图形才能自动调整大小以适应图片框的尺寸D．当图像框（Image）的Stretch属性为True时，图像框会自动改变大小以适应图形的大小，使图形充满图像框17．当利用Line方法进行绘图时，以下正确的说法是（ B ）A．有7种不同的线型，而且不管线宽多少都可以绘制虚线/点划线/点线B．使用Line(100,100)-(1000,1200)和Line(100,100)-Step(900,1100)将绘制两条相同位置的直线C．可利用Line方法添加矩形，如Line(300,300)-(2000,2000),BFD．可利用Line方法添加矩形，如Line(300,300)-(2300,2300),B+F18．下面语句中错误的是（ B ）A． Redim Preserve Matrix(10,Ubound(Matrix,2)+1)B． Redim Preserve Matrix(Ubound(Matrix,1)+1,10)C． Redim Preserve DynArray(Ubound(DynArray)+1)D． Redim DynArray(Ubound(DynArray)+1)19．可以唯一标识控件数组中的每一个控件的属性是（ C ）A．Name B．Caption C．Index D．Enabled20、下面（ D ）不是VB的文件类控件A．DriveListBox控件 B．DirListBox控件C．FileListBox控件 D、MsgBox21、关于Open语句不正确的叙述是（ D ）（A）Open语句可以打开顺序文件（B）Open语句可以打开随机文件（C）Open语句可以打开二进制文件（D）Open语句可以打开一个窗体22、下列语句所声明的数组的元素个数为（ A ）Dim Ary(3 To 6,-2 To 2)（A）20 （B）16 （C）24 （D）2523、下面对控件数组叙述正确的是（ A ）（A）在窗体上添加第二个相同类型的控件时，VB不会提示创建一个控件数组（B）控件数组使用Index属性来标识控件元素，其范围必须从0开始（C）控件数组使用的资源比用几个单独同类型的控件占用的资源要多（D）如果有一个命令按钮数组，各个按钮都有自己的Click事件过程24、在框架Frame1和图片框Piture1中各有一组复选框CheckBox，其作用是（ D ）（A）两组复选框中只有一个能被选中（B）因有两组复选框，无一可被选中（C）两组复选框中各有一个能被选中（D）两组复选框中各有多个被选中25、要从For...Next循环中中退出循环，使用的语句是 (B)（A）Exit Do （B）Exit For （C）Continue （D）Stop二、多项选择题1、要清除文本框Textl中的内容，使其内容为空字符串，可以采用（ AC）。

vb期末考试题库及答案

vb期末考试题库及答案一、选择题（每题2分，共20分）1. 在VB中，用于声明变量的关键字是：A. DimB. ConstC. FunctionD. Sub答案：A2. 下列哪个选项是VB中合法的变量名？A. 123abcB. _abc123C. 2abcD. abc-def答案：B3. VB中，用于循环结构的关键字是：A. IfB. ForC. WhileD. Select答案：B4. VB中，用于条件判断的关键字是：A. IfB. ElseC. CaseD. Do答案：A5. 在VB中，哪个函数用于计算字符串的长度？A. LenB. UCaseC. LCaseD. Trim答案：A6. VB中，用于定义过程的关键字是：A. FunctionB. SubC. DimD. Const答案：B7. 在VB中，用于数组声明的关键字是：A. DimB. ArrayC. ReDimD. Option答案：A8. VB中，用于退出循环的关键字是：A. ExitB. ReturnC. BreakD. Continue答案：A9. 在VB中，哪个函数用于将字符串转换为大写？A. UCaseB. LCaseC. StrCompD. Trim答案：A10. VB中，用于定义类模块的关键字是：A. ClassB. ModuleC. InterfaceD. Function答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量并赋值为10，可以使用语句：Dim num As Integer; num = _______。

答案：102. VB中，使用________函数可以将一个数字转换为字符串。

答案：CStr3. 在VB中，使用________关键字可以定义一个常量。

答案：Const4. VB中，使用________函数可以获取当前系统时间。

答案：Now5. 在VB中，使用________函数可以连接两个字符串。

VB期末考试试题及答案

VB期末考试试题及答案VB期末考试试题及答案一、填空题1、VB程序设计的主要特点是可视化设计和事件编程。

2、在VB中，最主要的两种对象是窗体（form）和控件。

3、工程是构成应用程序文件的集合。

4、方法是VB提供的一种特殊子程序，用来完成一定的操作。

5、浮点类型数据包括单精度型和___双精度__数据。

6、事件是窗体或控件对象识别的__动作____。

7、可用窗体的__print_ 方法在窗体中显示文字。

8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。

9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。

10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。

11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。

12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。

13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值为空，布尔型变量的初值为FALSE 。

14、设置窗体的picture 属性，可在窗体上显示图片。

15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。

二、选择题1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。

A、GotFocusB、LoadC、Click D、KeyDown2、滚动条控件(如图所示)的Max属性所设置的是 A 。

A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句Select * Form student 中的*表示 B 。

A、所有记录B、所有字段C、所有表D、都不对4、以下选项中，不属于标签的属性是 C 。

vb期末考试试题(含答案)

《Visual Basic 程序设计》期末考试B卷(附3页答题纸，所有答案写在答题纸上，答题纸单独装订)一、填空题（每空0.5分，共10分）1、 Visual Basic应用程序的窗体文件的扩展名是（）。

2、在属性窗口，属性的显示方式有按（）顺序和按分类顺序。

3、 VB的控件是具有自己的（）、（）和（）的对象。

4、每当一个窗体称为活动窗体时，触发（）事件。

5、 Int(-3.5)的值是（）。

6、表达式（）产生10~90之间的随机整数（包括10和90）。

7、表达式（）表示x是5或者7的倍数。

8、下面程序段显示（）个”*”For i = 1 To 5For j = 2 To iPrint "*";Next jNext i9、获得数组的上界通过（）函数，要获得列表框list数组的元素总个数通过（）属性。

10、Visual Basic变量作用域分为（）、（）、全局变量。

11、在过程中定义的变量，如果想在离开该过程后，还能保存过程中局部变量的值，则应该使用（）关键字在过程中定义局部变量。

12、窗体frm中的全局整型变量x的声明位置在（）段，定义语句为（），在其他模块中存取式书写形式为（）。

13、假定有一个通用对话框控件CommonDialog1，除了用CommonDialog1.Action=1显示打开对话框之外，还可以用（）方法显示。

14、若已经建立了form1、form2两个窗体，默认启动窗体是form1，在程序中若要显示form2窗体，则执行（）语句。

二、选择题（每小题2分，共20分）1、 VB6.0集成开发环境中不能完成的功能是（）。

A、输入编辑源程序B、编译生成可执行程序C、调试运行程序D、自动改正程序中的错误2、有程序代码如下：text1.text=”text1.text”则text1、text、”text1.text”分别代表（）。

A、对象，值，属性B、对象，方法，属性C、对象，属性，值D、属性，对象，值3、要使命令按钮可见而不可操作，要对（）属性进行设置。

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

《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的值是___________。

10．日期表达式 #2/24/02# - #2/12/02# 的值为___________。

11．数学表达式sin2x+ 写成等价的Visual Basic表达式为_________________。

12．设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从1到5，第二维下标从-2到6，则相应的数组声明语句为___________________________。

13．事件就是在对象上所发生的事情，Visual Basic中的事件如___________、___________、______________等。

一个对象响应的事件可以有_____个，用户不能建立新的事件。

事件过程是指_____________________________________________。

假设某一事件过程如下：Private Sub cmd1_Click()="VB示例"End Sub则响应该过程的对象名是______________，事件名是_____________。

14．对象的方法用于__________________。

当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为________________，例如，对窗体Form1使用Show方法，应写成_________________。

15．PictureBox控件可通过设置其__________属性为True使之可自动调整大小；而Image控件可通过设置其___________属性为True，使其加载的图片能自动调整大小以适应Image。

16．在Visual Basic程序中实现复制文件“c:\”到d:盘根目录下的语句为_______________________________________。

二、单项选择题1．下列控件中没有Caption属性的是（）A、标签B、文本框C、框架D、命令按纽2．除框架外，能对单选按纽分组的控件是（）。

A、窗体B、标签C、图片框D、图像3．下列符号不能作为VB中变量名的是（）。

A 、 ABCDEFG B、 P00000 C、 89YWDDF D、xyz4．下列不属于Visual Basic数据文件的是（）。

A、顺序文件B、随机文件C、二进制文件D、数据库文件5．若要求从文本框中输入密码时在文本框中只显示*号，则应用在此文本框的属性窗口中设置（）。

A、Text属性值为*B、Caption属性值为*C、Password属性值为空D、PasswordChar属性值为*6．表达式2*3^2+2*8/4+3^2的值为（）。

A、64B、31C、49D、427．表达式mid("abcdefg",3,2)的值是（）A、abcB、cdC、bcdD、abcde8．数学表达式Sin25°写成VB表达式是（）。

A、Sin25B、Sin（25）C、Sin（25°）D、Sin（25*180）9．Sub过程与 Function过程最根本的区别是（）。

A、Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以。

B、Function过程可以有参数，Sub过程不可以。

C、两种过程参数的传递方式不同。

D、Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值。

10．选拔身高T超过米且体重W小于公斤的人，表示该条件的布尔表达式为（）A、T>= And W<=B、T<= Or W>=C、T> And W<D、T>= Or W<11.下列对象不能响应 Click事件的是（）A、列表框B、图片框C、窗体D、计时器12．在Visual Basic中，按文件的访问方式不同，可以将文件分为（）A、顺序文件、随机文件和二进制文件B、文本文件和数据文件C、数据文件和可执行文件D、ASCⅡ文件和二进制文件13．将通用对话框CommonDialog的类型设置成“颜色”对话框，可调用该对话框的（）方法。

A、ShowOpenB、ShowSaveC、ShowColorD、ShowFont三、指出下列句中的错误，修改或者说明原因。

1．sum和都可以作为VB的变量名。

2．变量名的长度最长可达1024个字符。

3．下列程序运行结果：3，3Option ExplicitPrivate Sub Command1_Click()Dim a，b As Integera =b == a= bEnd Sub4．程序可以改变定长字符串的内容和长度。

5．Variant是一种特殊的数据类型，可以包含任何种类型的数据。

6．下列程序运行结果为TruePrivate Sub Command1_Click()b = 2c = 3= c > a + b Or b - 1 > c - 1 And c + a > a Xor b < c - 2End Sub7．#12/31/1999# - #12/20/1999#的运算结果是#12/11/1999#8．可以在窗体的通用部分声明静态变量。

9．使用声明语句建立一个变量后，Visual Basic会自动对数值类型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串""，定长字符串用空格填充，Variant变量被初始化为 Empty，布尔型的变量被初始化为False。

10．事件过程通常由事件驱动执行，而Sub过程通过过程调用执行。

11．将焦点主动设置到指定的控件或窗体上应采用SetFocus方法。

12．当图像控件（Image）的Stretch属性为True时，Image控件能自动调整自己的尺寸与显示的图片匹配。

四、读程序题，写出程序运行结果。

1．Private Sub Form_Click()For I = 1 To 9For j = 1 To 30 - 3 * IPrint " ";Next jFor k = 1 To IPrint k;Next kFor k = I - 1 To 1 Step -1Print k;Next kPrintNext IEnd SubOption ExplicitPrivate Sub Command1_Click()Static S As IntegerDim i As IntegerS = 1For i = 1 To 5S = S * iNext iPrint SEnd Sub3．For X = 5 To 1 Step -1For Y = 1 To 6 - XPrint Tab(Y + 5); "*";Next YPrintNext X4．Private Sub Form_Activate()Print "aa" & "bb",-5 * 6,Not 2 <= 3 Print "aa" & "bb"; -5 * 6; Not 2 <= 3 PrintPrint "30+60",Print 30 + 60？"30+60"; 30 + 60End SubX=1Do While X<=10If X Mod 7 =0 ThenY = X + 6ElseZ = XEnd IfX = X + 2LoopPrint X,Y,Z五、编程题1．设计一个计算程序。

该程序用户界面如图所示，由四个文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三个按钮：命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command4）组成。

程序运行后，用户单击清除按钮，则清除文本框中显示的内容。

单击计算按钮，如果成绩填写不完全，则给出提示信息，否则计算三科平均成绩。

单击退出按钮则退出。

2．设计程序。

要求：从文本框Text1中接收输入的数据，当单击确定按钮（command1）时，如果该数据满足条件：除以3余2，除以5余3，除以7余4，则输出；否则将焦点定位在文本框Text1中，选中其中的文本。

3．设计一个欢迎程序。

该程序用户界面如图所示。

要求程序运行后，用户选中粗体复选框时，标签（Label1）中的文字（欢迎您！）的字体变成粗体，用户选中斜体复选框时，标签的字体变成斜体。

若取消选中，则恢复原字体。

单击结束，则退出。

4．任意输入3个数，求大小排第二的那个数，写出程序代码。

《VB》期末复习参考答案一、填空题1．创建应用程序界面设置属性编写代码2．属性、text3．Label TextBox4．Load方法 Show方法 Hide方法 Unload方法5．="GOOD WORK"6．Click()、7．算术表达式字符串表达式关系表达式布尔表达式日期表达式对象表达式运算符8．19．True False10．1211．Sin(x) ^ 2 + Sqr(x ^ 2 - y ^ 2) / (2 * x)12．Dim A(1 To 5，-2 To 6) As String13．单击双击装载多响应某个事件后所执行的程序代码 cmd1 Click14．完成某种特定的功能对象名.方法名15．AutoSize Stretch16．FileCopy "c:\"，"d:\"二、单项选择题1．B 2．C 3．C 4．D 5．D 6．B 7．B8．D 9．D 10．C 11．D 12．A 13．C三、指出下列句中的错误，修改或者说明原因。