VB试题及答案文档格式.docx

1、控件上所显示的文本是由 Caption 属性来设定的；4.与鼠标有关的事件包括 Click 、 DblClick 、 MouseDown 、 MouseUp MouseMove ，其中 事件在单击控件时被激发， MouseDown 事件在鼠标键被按下时被激发， MouseUp 事件在鼠标被松开时被激发。5.与键盘有关的事件包括 KeyPress KeyDown KeyUp 事件在单击键盘键时被激发， 事件在按下键盘键时被激发， 事件在松开键盘键时被激发。6.向列表框和组合框中添加列表时，可使用 AddItem 方法；删除选定的列表，可使用 RemoveItem删除全部列表项，可使用 Clear

2、 方法。7.定时器控件能够响应的唯一事件为 Timer ，并且该事件被激发的时间间隔由 Interval 属性来给定。8.弹出式菜单一般不直接显示在窗体上，因此菜单的 属性一般设为False。要显示弹出式菜单可以用 PopupMenu9.工具栏一般显示在 菜单栏 下面，由 命令按钮 组成；状态栏一般显示在窗体的 底部 ，由 窗格（Panels） 组成。10.在图片框绘图之前，除了要建立好坐标系之外，还必须设置好线条的类型、线条的宽度、绘图的模式、填充的样式和填充的颜色，其中线条类型由 DrawStyle 属性来设置，线条宽度 DrawWidth 属性来设置，绘图模式由 DrawMode 属性来

3、设置，填充样式由 FillStyle 属性来设置。11.要想让一个标准的窗体变为多文档窗体的子窗体，必须将标准窗体的 MDIChild 属性设为True。12.顺序文件可以通过 Write 语句或 Print 语句将数据写入文件，而读取文件中的数据可以使用 Line Input# 语句、 Input# Input 函数来实现。随机文件和二进制文件的读操作可以通过 Get 语句来实现，写操作可以通过 Put 语句来实现。13.在Visual Basic6.0中，程序共有 设计 运行 中断 3种工作模式。错误有 编译错误 实时错误 逻辑错误 3种类型。14.关键数据分为 主关键字 和外部关键字。其

4、中 是对数据表内一个记录进行唯一表示的信息，而 外部关键字 是把一个记录与另外某个数据表中的关键字联系起来的信息。二、选择题以下关键字中，不能定义变量的是（A）ADeclare BDim CPublic DPrivate下面变量不合法的是（C）A. a2（2） B. abcd C. a$x D. CDE以下事件中，命令按钮不能响应的事件为（C）AClick事件 BMouseDown事件CChange事件DGotFocus事件如果要使文本框控件带有水平滚动条（假设MultiLine已设为True），则ScrollBar属性必须设为（B）A0 B1 C2 D3在列表框、组合框中，当前被选中的列表项

5、由（C）返回。AList BListIndex CText DListCount 组合框所能响应的事件与下面哪个属性有关（D）。 DStyle当拖动滚动条的滚动框时，便会激发（A）事件AScroll BChange CDropDown DClick定时器控件唯一能够响应的事件为（B）BTimer事件DDblClick事件含有子菜单的菜单不能设置（B ）A访问键 B快捷键 C菜单标题 D菜单名称要使一个菜单项变为分隔线，必须将其标题属性设为（C ）A下划线 B& C上划线 D减号在设置MsgBox函数的参数值时，如果buttons值为5，则下面组合正确的是（A）AvbOKonly+vbRetry

6、Cancel （05）BvbOKCancel+vbYesNo （14）CvbAbortRetryIgnore+vbYesNoCancel （23）DvbRetryCancel （5）图片框和图像框都是通过以下哪个属性来设置显示的图片的（C）AMouseIcon BImage CPicture DIcon在图片框中所画图形的颜色与下面哪个属性有关（B）ADrawStyle BDrawMode CDrawWidth DScaleMode要想获得使用Open语句所打开的文件的大小可以使用（A）ALOF函数 BLen函数 C函数 DEOF函数15.下面哪个语句只能从顺序文件中读出英文字符，非英文字符不

7、能读出（B）AInput语句 BInput函数 CLine Input语句 DGet语句16. Data控件的很多属性，（ ）属性用于指定Data控件所要操作的一个表或一个查询。A.DatabaseName属性B.RecordsetType属性C.Exclusive属性D.RecordSource属性三、程序填空题1以下程序是为了在窗体上显示1234.100的和，请将程序填写完整。 Private Sub Form_Load（）Form1.AutoRedraw = TrueDim i As IntegerDim sum As Integersum = 0For i = 1 To 100sum

8、= sum +iNext iPrint sumEnd Sub2窗体的Load事件中有以下代码：Private Sub Form_Load（）Form1.AutoRedraw = TrueDim a As IntegerDim b As IntegerDim c As Integera = 300b = 45c = a * bDo While a b If a b Then a = a - b Else b = b - a End IfLoopPrint c / b运行程序后，程序的输出为 900 。3以下程序是一个密码检验程序，程序界面如图1所示。当在文本框中输入密码，然后单击【确定】按钮。这

9、是如果输入的密码为“1234”，则弹出如图2所示的消息框；如果输入的密码不为“1234”，则弹出如图3所示的消息框。在图3所示的消息框中，如果单击“确定”按钮，则重新输入密码；如果单击“取消”，则退出程序。图1 程序界面 图2 【密码正确】消息框 图3 【密码不正确】消息框Private Sub Command1_Click（）Dim Ret As Integer密码正确，弹出“密码正确”消息框If Text1.Text = 1234 ThenMsgBox 密码正确, vbOKOnly + vbInformation, 密码不正确，则弹出密码不正确消息框ElseRet = MsgBox（密码不

10、正确，请重新输入, vbOKCancel + vbCritical, _）根据所单击的按钮，执行不同的操作Select Case Ret单击”确定“按钮，重新输入密码Case 1Text1.Text = Text1.SetFocus单击”取消“按钮，退出程序Case 2Unload Form1End SelectEnd If4在某个工程中，已用【菜单编辑器】设计了4个菜单：【颜色】、【红色】、【蓝色】、【绿色】，其中【颜色】为一级菜单，其“名称”属性为mnuColor，“Visible”属性为True，菜单【红色】、【蓝色】、【绿色】为菜单【颜色】的子菜单。以下程序用来实现以下功能：（1）菜单

11、【颜色】不显示在窗体上，即让菜单【颜色】成为弹出式菜单。（2）在窗体上单击鼠标左键，弹出菜单【颜色】的子菜单。（3）在弹出的菜单中，单击某个菜单项，窗体的背景颜色变为相应的颜色。菜单【颜色】不可见mnucolor.Visible = FalsePrivate Sub Form_MouseDown（Button As Integer, Shift As Integer, X As Single, _Y As Single）单击鼠标左键，弹出弹出式菜单If Button = 2 mnucolorPrivate Sub mnucolor1_Click（）单击菜单【红色】，窗体的底色变为红色Form1.BackColor = vbRedPrivate Sub mnucolor2_Click（）单击菜单【蓝色】，窗体的底色变为蓝色Form1.BackColor = vbBluePrivate Sub mnucolor3_Click（）单击菜单【绿色】，窗体的底色变为绿色Form1.BackColor = vbGreen5以下程序用图像框控件来实现编辑图片的功能。Option ExplicitPrivate Const small As Single = 0.5Private Const large As Single = -1Private Sub cmd