vbvb期末考试实验答案
- 格式:doc
- 大小:83.00 KB
- 文档页数:10
VB(1)期末考试内容原题⾼⼆年级VB期末试卷⼀、单选题1、可以在窗体上输出数据的⽅法的是()A、PrintB、ClsC、ShowD、Hide2、下列说法中错误的是()A、对象是具有某些特性的具体事物的抽象B、在VB程序中,窗体(Form)不是对象C、属性是对象所具有的特征D、事件是发⽣在对象上且能被对象识别的动作3、数据:“abcde”是()数据A、整型B、长整型C、字符型D、⽇期型4、以下各项中,可以作为VB变量名的是()A、13B、 Stu23C、22abD、cj98.35、以下各项中,不能作为VB变量名的是()A、A52BB、ifC、Y_5D、Pi6、InputBox函数返回值的类型为()A、数值B、字符串C、变体D、数值或字符串(视输⼊的数据⽽定)7、表达式5 <> 2 Or 6<7的值是()A、TureB、FalseC、-1D、18、数学式sin30°写成VB表达式是()A、Sin30B、Sin(30)C、Sin(30°)D、Sin(30*3.14/180)9、决定控件上⽂字的字体、字形、⼤⼩、效果的属性是()A、TextB、CaptionC、NameD、Font10、设a、b、c为整型变量,其值分别为1、2、3,以下语句的输出结果是() Print a;b;cA.1 2 3B.2 3 1C.3 2 1D.2 3 211、Visual Basic程序中的注释所使⽤的字符是()A、'B、:C、\D、_12、若要求从⽂本框中输⼊密码时在⽂本框中只显⽰ * 号,则应在此⽂本框的属性窗⼝中设置()。
A、Text 属性值为 *B、Caption 属性值为 *C、Password 属性值为空D、Passwordchar 属性值为 *13、表达式“XYZ” + “487”的值是()A、“XYZ487”B、“XYZ”C、“487”D、“487XYZ”14、下⾯语句中,正确的是()A、If x<3*y And x>y Then y=x^3B、If x<3*y And x>y Then y=3xC、If x<3*y : x>3 Then y=x^3 C、If x<3*y : x>y Then y=x**315、下列程序段的执⾏结果为()X=2Y=5If X*Y<1 Then Y=Y-1 Else Y=-1Print Y-X>0A、TureB、FalseC、-1D、116、下列关于visual basic特点的描述,哪个是正确的()A、⾯向对象B、可视化C、事件驱动D、以上都是17、为了使标签中的内容靠右显⽰,应将alignment属性设置为()A、0B、1C、2D、3⼆、填空题(2分×9,共18分)1、布尔型数据只有________和________两个值。
2015级vb期末考试试题及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个是正确的整数类型?A. IntegerB. DoubleC. StringD. Boolean答案:A2. 下面哪个语句可以用于在Visual Basic中声明一个变量?A. DimB. DeclareC. ConstD. Sub答案:A3. 在Visual Basic中,哪个属性用于设置控件的可见性?A. VisibleB. EnableC. TextD. Caption答案:A4. Visual Basic中,哪个事件用于响应按钮点击?A. ClickB. DoubleClickC. MouseDownD. MouseUp答案:A5. 下列哪个是Visual Basic中的标准控件?A. TextBoxB. ButtonC. Both A and BD. None of the above答案:C6. Visual Basic中,哪个函数用于将字符串转换为数字?A. Str()B. Val()C. Int()D. CInt()答案:D7. 在Visual Basic中,哪个语句用于循环遍历数组?A. For EachB. ForC. WhileD. Do答案:B8. Visual Basic中,哪个语句用于结束程序的执行?A. EndB. ExitC. StopD. Quit答案:B9. 下列哪个是Visual Basic中的错误处理语句?A. TryB. CatchC. FinallyD. All of the above答案:D10. 在Visual Basic中,哪个函数用于获取当前日期?A. Now()B. Today()C. Date()D. CurrentDate()答案:C二、填空题(每空2分,共20分)1. 在Visual Basic中,______ 函数用于获取系统时间。
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程序,使用循环结构输出九九乘法表。
1.下列不是VB常量的是 B 。
A)3.14 B)′Name ′ C)#10/18/2007# D)True 2.确定控件在窗体上位置的属性是 C 。
A)Width 和Height B)Width 和Top C)Top 和Left D)Top 和Height3.数学表达式1≤X<10表示成正确的VB表达式为 B 。
A)1≤X<10 B)X>=1 And X<10C) X>=1 Or x<10 D) X>=1 And <104. 下面的__ B ___语句可以实现:先在窗体上输出大写字母A,然后在同一行的第10列输出小写字母b。
A)Print "A";Tab(9);"b" B)Print "A";Spc(8);"b"C)Print "A";Space(10);"b" D)Print "A";Tab(8);"b"5. 下列控件中,不能改变大小的控件是 D 。
A)TextBox B)Label C)Frame D)Timer 6.Visual Basic过程的编写是在 D 中进行的。
A)窗体窗口B)工程资源管理器窗口C)属性窗口D)代码编辑窗口7. 在Visual Basic中,声明全局变量应该用 D 关键字。
A)Dim B)Private C)Static D)Public 8. 在Visual Basic表达式中,运算符的运算顺序为 A 。
A)算术运算符—>字符串运算符—>关系运算符—>逻辑运算符B)逻辑运算符—>关系运算符—>字符串运算符—>算术运算符C)字符串运算符—>算术运算符—>关系运算符—>逻辑运算符D)关系运算符—>逻辑运算符—>算术运算符—>字符串运算符9. 下列属于非法调用的函数是 A 。
第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程序设计》期末复习题及答案一、填空题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期末考试试题及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个是正确的变量声明方式?A. int xB. Dim xC. var xD. Declare x答案:B2. 以下哪个控件不是Visual Basic中的标准控件?A. LabelB. TextBoxC. ButtonD. Slider答案:D3. Visual Basic中,哪个关键字用于定义一个类?A. ClassB. DefineC. TypeD. Structure答案:A4. 在Visual Basic中,以下哪个事件不是Button控件的事件?A. ClickB. DoubleClickC. MouseDownD. MouseMove答案:B5. 下列哪个语句是Visual Basic中用于循环的语句?A. IfB. ForC. WhileD. Switch答案:B6. 在Visual Basic中,以下哪个不是数组的属性?A. LengthB. CountC. RankD. LBound答案:B7. 如果要使用Visual Basic的文件系统对象(FileSystemObject),需要先引入哪个命名空间?A. System.IOB. Microsoft.VisualBasicC. System.Windows.FormsD. Microsoft.VisualBasic.FileSystem答案:D8. 在Visual Basic中,哪个属性用于设置控件是否可见?A. VisibleB. EnabledC. ActiveD. Focus答案:A9. Visual Basic中,哪个方法用于在程序中显示一个消息框?A. MessageBox.Show()B. MsgBox()C. ShowMessage()D. Alert()答案:B10. 在Visual Basic中,以下哪个不是集合的属性?A. ItemB. CountC. AddD. Remove答案:C二、简答题(每题5分,共10分)1. 简述Visual Basic中的事件和事件处理程序的概念。
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基础期末考试题库及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个是正确的数据类型?A. IntegerB. intC. StringD. str答案:A、C2. 下列哪个选项不是VB的控件?A. TextBoxB. ButtonC. LabelD. ComboBox答案:B3. VB中,用于声明一个变量的关键字是:A. DimB. DeclareC. FunctionD. Sub答案:A4. 在VB中,以下哪个是正确的函数用于将字符串转换为整数?A. StrToIntB. CIntC. ValD. Convert.ToInt32答案:B5. Visual Basic中,哪个属性用于设置文本框的文本?A. TextB. CaptionC. ValueD. Label答案:A6. 下列哪个是VB中用于循环的语句?A. IfB. ForC. WhileD. Select答案:B、C7. VB中,下列哪个关键字用于定义一个过程?A. FunctionB. SubC. ClassD. Module答案:B8. 在VB中,以下哪个是正确的事件处理程序?A. OnClickB. OnClickC. ClickD. OnClick答案:A、C9. VB中,下列哪个选项用于声明一个常量?A. ConstB. DimC. StaticD. Public答案:A10. 在VB中,以下哪个关键字用于定义一个类?A. ClassB. ModuleC. StructureD. Interface答案:A二、填空题(每题2分,共20分)1. 在VB中,使用________关键字来结束一个程序。
答案:End2. VB中,________关键字用于声明一个数组。
答案:Dim3. 使用________函数可以将一个数字转换为字符串。
答案:Str4. 在VB中,________关键字用于定义一个全局变量。
电子科技大学22春“计算机应用技术”《VB程序设计》期末考试高频考点版(带答案)一.综合考核(共50题)1.设有语句:x=InputBox(“输入数值”,“0”,“示例”)程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是()。
A.在box对话框标题栏中显示的是“示例”B.变量x的值是数值10C.变量x的值是字符串“10”D.0是默认值参考答案:C2.将命令按钮设为默认命令按钮,应设置为True的属性是()。
A.ValueB.EnabledC.DefaultD.Cancel参考答案:C3.Sub过程与Function函数的最根本区别是()。
A.两种过程参数的传递方式不同B.Sub过程是语句级调用,可以使用Call或直接使用过程名,但Function过程是在表达式中调用C.Sub过程无返回值,但Function过程有返回值D.Function过程可以有参数,而Sub过程不可以加aopenxu0306优惠参考答案:C4.刚建立一个新的标准工程后,不在工具箱中出现的控件是()。
A.通用对话框B.文本框C.图片框参考答案:B5.定义一个常量PI,可以使用下列语句中的()。
A.Set PI = 3.14159B.PI = 3.14159C.Const PI = 3.14159D.Const PI参考答案:C6.Load事件是在窗体被装入工作区时()触发的事件。
A.用户B.程序员C.手工D.自动参考答案:D7.下列列表框属性中哪一项不是数组()。
A.SelectedB.ListCountC.ListD.Index参考答案:B8.在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1,要求每一秒钟在文本框中显示一次当前的时间,程序为 Private Sub Timer1 TxtTime.text=Time End Sub 在横线上应填入的内容是()。
A.VisibleB.TimerC.IntervalD.Enabled9.ADO数据控件的RecordSoure属性是表示()。
VB期末考试试卷及答案一·选择题1。
Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是(B ) A属性、控件和方法B属性、事件和方法C窗体、控件和过程 D控件、过程和模块2。
所有控件都有一个共同的属性,这个属性是(C )A textB fontC nameD caption3。
下列叙述中错误的是(A )A 工程文件扩展名是。
vbgB 标准模块文件的扩展名是.basC 窗体模块的扩展名是.frmD 类模块的扩展名是.cls4. 当要编写一个新的Visual Basic程序时,所做的第一件事是(A )A 新建一个工程B 编写代码C 设置属性D 添加Active X控件5. 下面控件中,没有caption属性的是(B )A 框架B 组合框C 命令按钮D 复选按钮6。
在文件框中输入字符时,若只显示某个字符,如(*),应设置属性是(B )A MultiLineB PasswordCharC TextD selText7。
若要将窗体从内存中卸载出去,其实现的方法是( D )A ShowB HideC LoadD UnLoad8. 下列关于过程叙述不正确的是(D )A 过程的传值调用是将实参的具体值传值传递给形参B 过程的传址调用是将实参在内存的地址传递给形参C 过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的D 无论过程传值调用还是传地址调用,参数传递都是双向的9. 某人创建1个工程,其中的窗体名为Form1,之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是(C )A 在Form1的Load事件过程中加入语句Load Form2B 在Form2的Load事件过程中加入语句Form2.ShowC 在“过程属性”对话框中把“启动对象”设置为Form2D 在Form2的TabIndex属性设置为1,把Form1的TabIndex属性设置为210。
Vb 选择题精选版(试题加答案)一、选择题(1分×50=50分)1. 下面正确的赋值语句是__(1)_____。
A. X + Y = 10B. Y = π *R*RC. Y = X + 10D. 2y = X2. 当一个命令按钮的 (2) 属性设置为False 时,该按钮为灰白显示(不可用)。
A. VisibleB. EnabledC. BackcolorD. default3. 执行下列语句时,会出现出错提示的是 (3) 。
A. Print 32765+3B. Print 32768+3C. Print "56" + 56D. Print 5+7=144. 如果要在菜单的两个菜单命令项之间加一条分隔线,可在标题文本框中键入一个(4) 符号。
A.下划线B.@ C .连字符(-) D.&5. 下面哪一个是日期型常量 (5) 。
A ."02/25/2005" B. #January 1,1993#C. "02/25/2005#D. #02/25/2005"6. 要声明一个长度为8个字符的定长字符串变量str ,以下 (6) 语句是正确的。
(A )Dim str As String (B )Dim str As String (8)(C )Dim str As String [8] (D )Dim str As String *87. 在窗体的通用声明中可以用 (7) 语句定义变量。
A. Dim 、PrivateB. Dim 、StaticC.Dim 、Public D . Dim 、Public 、Private8. (8) 语句是专门用来为数组或对象集合中的每个元素重复执行一组语句而设置的。
A. Select-Case-End SelectB. Do-LoopC. For-NextD. For Each-Next9. 若希望在离开某过程后,还能保存该过程中局部变量的值,则应使用__(9)___关键字在该过程中定义局部变量。
第一套一、判断题1、Visual Basic程序开发的特点是面向对象的事件驱动。
(√)2、Print_Text是一个不合法的变量名。
(×)3、窗体的AutoRedraw属性实现了屏幕图像的重建。
(√)4、设置字体大小应使用Font属性(×)5、Sub过程可以实现嵌套调用(√)6、IIF函数中的三个参数都不能省略。
(√)7、块结构条件语句以End If结束,而单行结构条件语句没有End IF。
(√)8、当终值小于初值时,步长为负数。
(√)9、执行While-Wend循环时,如果一开始条件就不成立,则语句块一次也不会执行。
(√)10、关于数组的引用,在程序中,凡是简单变量可以出现的地方都可以出现数组元素的引用(√)二、单项选择题1.Print Format(123,”####”)执行之后的结果为【答案】BA)#123 B)123 C)123#D)####2.下面可以表示注释语句开头的为【答案】CA)Re B)R C)Rem D)dim3.下列选项中窗体载入事件为【答案】AA)Load事件B)Click事件C)DblClick事件D)Unload事件4.Timer控件可以使用下列哪种事件【答案】BA)Click事件B)Timer事件C)Dblclick事件D)Change事件5.在InputBox函数中哪一个参数是必须的【答案】AA)Prompt B)Buttons C)Title D)Context6.以下叙述中错误的是:【答案】CA)如果过程被定义为Static类型,则该过程中的局部变量都是Static类型B)Sub过程中不能嵌套定义Sub过程C)Sub过程可以嵌套调用Sub过程D)事件过程可以像通用过程一样由用户定义过程名7.要填加一个标准模块,可使用“_____”菜单中的“添加模块”命令。
【答案】CA)文件B)视图C)工程D)工具8.在块结构条件语句If-Then / Endif中【答案】B(A) 必须至少有一个Elseif语句(B ) 可以有任意多个ElseIf-Then语句(C) 如果没有Else语句,运行时将出现错误(D ) 给定的条件只能是关系表达式或逻辑表达式9.以下Case语句中错误的是【答案】A(A) Case 10 To 1 (B) Case Is>10(C)Case Is>10 , Is<50 (D) Case 3,5,Is>1010.对Do Until…Loop循环,正确的是(【答案】B)。
《VB程序设计》期末考试注意事项:(1)题型:选择题40道,判断题10道,每题2分,满分100分。
(2)答题时间:60分钟。
(3)请在规定时间内作答并提交。
1、VB程序设计语言是一种()。
[单选题] *A.汇编语言B.机器语言C.高级语言(正确答案)D.数据库语言2、VisualBasic最突出的特点是()。
[单选题] *A.结构化程序设计B.程序开发环境C.程序调试技术D.事件驱动编程机制(正确答案)3、VB中,.frm是()文件的扩展名。
[单选题] *A.工程文件B.可执行文件C.窗体文件(正确答案)D.标准模块文件4、VB中,.vbp是()文件的扩展名。
[单选题] *A. 工程文件(正确答案)B. 可执行文件C. 窗体文件D. 标准模块文件5、在设计窗体时,双击窗体的任何地方,可以打开的窗口是()。
[单选题] *A. 代码窗口(正确答案)B. 属性窗口C. 工程管理窗口D. 以上3个选项都不对6、VB是一种面向对象的程序设计语言,下面()不是面向对象包含的三要素。
[单选题] *A. 变量(正确答案)B. 事件C. 属性D. 方法7、不论任何控件,共同具有的是()属性。
[单选题] *A. TextB. CaptionC. BackColorD. Name(正确答案)8、要使Form1窗体的标题栏显示“欢迎使用Visual Basic 6.0! ”,以下()语句是正确的。
[单选题] *A. Form1.Caption =" 欢迎使用Visual Basic 6.0! "(正确答案)B. Form1.Caption =’欢迎使用Visual Basic 6.0! ’C. Form.Caption = " 欢迎使用Visual Basic 6.0! "D. Form.Caption = ’欢迎使用Visual Basic 6.0! ’9、有下面的程序代码:Command1.Caption ="确定",则Command1,Caption和"确定"分别代表()。
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中的事件驱动编程是什么?答案:事件驱动编程是一种编程范式,其中程序的执行流程由外部事件(如用户操作、消息、定时器等)触发,而不是按照预先定义的顺序执行。
下载10_1.exe请参考10_1.exe程序的运行结果,新建一个工程,完成"过程练习"程序的设计,并将工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_1目录下。
具体要求如下:1. 各题必须按要求用通用过程或函数过程进行编程。
2. "第一题":编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m>=n;m和n从键盘输入。
3. "第二题":编写一个求1+2+……+n的函数Sum(n),利用该函数计算1+(1+2)+(1+2+3)+……+(1+2+……+100)的和。
4. "第三题":编写一个三个数中求最大数的函数过程Max(x,y,z)。
随机产生7个∈[0,50]之间的整数,然后用这个函数过程分别求出前三个数的最大值、前五个数的最大值以及这七个数中的最大值。
5. "第四题":编写一个每行可以打印5个下标变量的打印数组的通用过程,。
随机产生一个∈[100,500]、有20个下标变量的数组,调用该通用过程打印出原始数据;再将该数组中的偶数组成一个新的数组,再调用该通用过程打印出偶数数组。
思考题:通用过程与函数过程的区别?提示:1. 各题必须按要求用通用过程或函数过程进行编程。
2. “第一题”:编写一个求n!的阶乘函数F(n),利用该函数计算二项式系数Cmn=m!/(n!*(m-n)!);其中m>=n;m和n从键盘输入。
阶乘自定义函数F(n)的编写参考上课讲义计算二项式系数Cmn可以通过调用F(n)函数完成:cmn=F(m)/(F(n)*F(m-n))3. “第二题”:编写一个求1+2+……+n的函数Sum(n),利用该函数计算1+(1+2)+(1+2+3)+……+(1+2+……+100)的和。
自定义函数Sum(n)的编写:Function Sum(n As Integer) As Long……'编写s=1+2+...+n的程序段Sum=s '将计算结果赋值给函数名End Function计算1+(1+2)+(1+2+3)+……+(1+2+……+100)的和就转化为计算Sum(1)+Sum(2)+Sum(3)+……+Sum(100)的编程。
参考计算1!+2!+……+10!的程序4. “第三题”:编写一个三个数中求最大数的函数过程Max(x,y,z)。
随机产生7个∈[0,50]之间的整数,然后用这个函数过程分别求出前三个数的最大值、前五个数的最大值以及这七个数中的最大值。
自定义函数Max(x,y,z)的编写:Function Max(x As Integer, y As Integer, z As Integer) As Integer……'编写x、y、z中找最大的程序段并将结果赋值给MaxEnd Function定义一个有7个数组元素的一维数组a,Dim a(1 To 7) As Integer,随机产生7个∈[0,50]之间的整数赋值给a(1)~a(7)。
前三个数的最大值:max1=Max(a(1),a(2),a(3))前五个数的最大值: max2=Max(max1,a(4),a(5))或max2=Max(Max(a(1),a(2),a(3)),a(4),a(5))七个数中的最大值:max3=Max(max2,a(6),a(7))5. “第四题”:编写一个每行可以打印5个下标变量的打印数组的通用过程,。
随机产生一个∈[100,500]、有20个下标变量的数组,调用该通用过程打印出原始数据;再将该数组中的偶数组成一个新的数组,再调用该通用过程打印出偶数数组。
打印数组的通用过程设计参考上课讲义在需要输出数组的时候调用该通用过程下载10_2.exe请参考10_2.exe程序的运行结果,新建一个工程,完成"调色板"程序的设计,该程序由红绿兰三原色进行调色,如果预览满意,单击"应用"按钮,将调好的颜色作为文本框中文字的颜色。
将完成后的工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_2目录下。
具体要求如下:1. 应用程序界面设计参考图示。
2. 要求水平滚动条和颜色成分输入文本框分别采用控件数组实现。
3. 要求操作任意一个滚动条,都会在相应的文本框中显示该颜色成分的当前取值,并且动态改变预览框中长方形的颜色。
[注意:滚动条最大值为255]4. 要求在任意一个颜色成分输入文本框中输入一个0-255的数据,相应的滚动条的滑块都会移到正确的位置上,并且预览框中长方形的颜色也随之而调整。
5. 单击"应用"按钮后将调好的颜色作为文本框中文字的颜色。
思考题:拖动滚动条时有没有触发滚动条的Change事件?提示:1. 应用程序界面设计参考图示。
程序界面右下角的预览框架里的长方形是形状控件Shape1(工具箱中的),将其FillStyle属性设置为0。
2. 要求水平滚动条和颜色成分输入文本框分别采用控件数组实现。
三个滚动条的Min设为0,Max设为255;三个文本框的Text属性设为空字串。
3. 要求操作任意一个滚动条,都会在相应的文本框中显示该颜色成分的当前取值,并且动态改变预览框中长方形的颜色。
颜色是利用Rgb(r,g,b)函数来表示,其中r,g,b是红、绿、兰颜色的饱和度,分别通过滚动条来控制。
Private Sub HScroll1_Change(Index As Integer)Text1(Index).Text = HScroll1(Index).ValueShape1.FillColor = RGB(HScroll1(0).Value, HScroll1(1).Value, HScroll1(2).Value)End Sub4. 要求在任意一个颜色成分输入文本框中输入一个0—255的数据,相应的滚动条的滑块都会移到正确的位置上,并且预览框中长方形的颜色也随之而调整。
设计文本框的Change事件:Private Sub Text1_Change(Index As Integer)HScroll1(Index).Value = Val(Text1(Index).Text)End Sub5. 单击“应用”按钮后将调好的颜色作为文本框中文字的颜色。
Text2.ForeColor = Shape1.FillColor下载10_3.exe说明:了解过程的递归。
请参考10_3.exe程序的运行结果,新建一个工程,完成"Fibonacci"程序的设计,并将工程文件以Design.Vbp、窗体文件以Design.frm保存到D:\10_3目录下。
具体要求如下:1.编写一个求斐波纳契(Fibonacci)数列某一项的函数过程。
已知:斐波纳契数列的第一项是0,第二项是1,以后各项都是前两项的和。
要求用递归算法求解[提示:f(n)=f(n-1)+f(n-2) ;f(1)=1;f(0)=0]2.从键盘上输入任意一个数n,调用编写的函数过程得到斐波纳契第n项值。
提示:1.编写一个求斐波纳契(Fibonacci)数列某一项的函数过程。
已知:斐波纳契数列的第一项是0,第二项是1,以后各项都是前两项的和。
要求用递归算法求解[提示:f(n)=f(n-1)+f(n-2) ;f(1)=1;f(0)=0]斐波纳契(Fibonacci)数列的递归函数过程F(n)如下:Function F(x As Integer) As LongIf x = 1 ThenF = 0ElseIf x = 2 ThenF = 1Elsef = f(x - 1) + f(x - 2)End IfEnd Function2.从键盘上输入任意一个数n,调用编写的函数过程得到斐波纳契第n项值。
可以直接调用F(n)求斐波纳契第n项值。
下载9_3.exe,9_3.frm , QBColor函数.Doc(参考文档)请参考9_3.exe 程序的运行结果,新建一个工程,完成一个带有预览效果的“综合字体设置”程序的设计,并将工程文件以Design.vbp ,窗体文件以Design.frm 保存到D:\9_3 目录下。
具体要求如下:1. 运行9_3.exe ,参照其界面,在窗体上部有1个带有垂直水平滚动条的文本框,在窗体下部有1个“字体设置”框架。
在此框架的右侧又有1个“预览”小框架,“预览”框架中是1个标签。
在“字体设置”框架的左侧有1个列表框和3个组合框,用于进行相应的字体设置。
2. 继续运行9_3.exe ,根据各个用于字体设置的列表框和组合框是否下拉和是否允许键盘输入来确定:它们分别是列表框(ListBox),还是组合框(Combo)?若是组合框,又属于哪种类型(Style)? 然后分别引入这4个控件,再一一设置其属性。
3. 打开9_3.frm ,在Form_Load() 事件中已经为各个列表框和组合框添加列表项编写了大部分代码。
其中“With ...... End With”语句用于简化对同一对象进行设置的代码,例如:Private Sub Form_Load()Command1.Caption = "OK"Command1.Visible = TrueCommand1.Top = 200Command1.Left = 5000Command1.Enabled = TrueEnd Sub可用“With ...... End With”语句简化如下,注意各个属性前的“.”不可缺。
Private Sub Form_Load()With Command1.Caption = "OK".Visible = True.Top = 200.Left = 5000.Enabled = TrueEnd WithEnd Sub因此,在Form_Load() 事件中,同学们只需在每个“With”语句后填写相应的控件名称,便可为各个列表框和组合框添加列表项。
在Form_Load()事件中,还需编写其它有关初始状况的代码。
4. 编写各个列表框和组合框事件过程的代码。
要求字体设置中的任何选择操作都在预览的"效果"标签中及时体现;(提示:颜色组合框中颜色排列顺序与Qbcolor(x) 函数一致,即x = .ListIndex,请参阅QBColor函数.doc)。
5. 单击"应用"按钮后,将字体预览中设置的字体效果全部运用到文本框中的文字上。
6. 按要求改名保存。