电大VB程序设计形成性考核3答案.doc

判断题：（共20题 每题2分）1、事件过程是由用户或系统事件触发的,所以在程序中不能调用事件过程。 参考答案：错误2、某数组声明为字符型数组，它们的初始值为False。 参考答案：错误3、标签控件是专门用来显示信息的，所以不能响应鼠标的单击事件。 参考答案：错误4、窗体的Move方法不光可以移动窗体，而且可以改变窗体的大小，同时也会改变窗体的有关属性。 参考答案：错误 5、窗体的Enabeled属性为False时，窗体上的按钮、文本框等控件就不会对用户的操作作出反应。 参考答案：正确6、使用Dim语句声明了一个变量以后，还可以使用Redim语句把此变量重新声明为其他的类型。 参考答案：正确7、一个使用Static语句声明的过程级静态变量，能在该过程的多次调用之间保持它的值，并且其他的过程也可以使用这个变量的值。 参考答案：错误8、同一个过程中不能声明同名的变量；在过程中不能声明与同一模块的模块级变量同名的静态过程级变量。 参考答案：正确9、一个变量在刚被声明尚未被赋值之间没有值。 参考答案：错误10、可以声明过程级自定义数据类型。 参考答案：正确11、因为应用程序级和模块级范围不同，所以可以在同一个窗体模块中声明同名的应用程序级变量和模块级变量。 参考答案：正确12、If与End if必须成对的使用，有一个if就有一个End if 与之对应。 参考答案：正确13、在For循环的循环语句块中，可以使用Next关键字提前结束循环。 参考答案：正确14、声明一个过程时有几个形参，则在调用该过程时就必须提供几个实参。 参考答案：错误15、因为Function过程有返回值，所以只能用在表达式中，不能使用Call语句调用。 参考答案：正确16、文本框只能显示单行文本，要显示多行文本应该使用列表框控件。 参考答案：错误17、标签控件所显示的文本只能在设计时设置，在运行时不能改变。 参考答案：错误18、当定时器控件的Interval属性值为0时，会连续不断的发送Timer事件。 参考答案：错误19、滚动条控件也可作为用户输入数据的一种方式。 参考答案：正确20、当定时器控件的Interval属性值设置为0时，会连续不断地激发Timer事件。 参考答案：错误单选题：（共30道试题，每题1分）1、要在窗体的标题内显示“myfrm”,使用的语句是（ ） AForm1.Printmyfrm BForm.Printmyfrm CForm.caption=myfrm DForm1.caption=myfrm 参考答案：D2、无论何种控件，共同具有的属性是（ ） AText BName CCaption DForeColor 参考答案：B3、按照变量的作用域可将变量划分为（ ） A公有、私有、系统 B全局变量、模块级变量、过程级变量 C动态、常数、静态 DPublic、 Private、 Protected 参考答案：B4、确定一个控件在窗体上位置的属性是（ ） AWidth或Height BWidth和Height CTop或Left DTop和Left 参考答案：D5、下列关于变量的说法不正确的是（ ）。 A局部变量是指那些在过程中用Dim语句或Static语句声明的变量 B局部变量的作用域仅限于声明它的过程 C静态局部变量是在过程中用Static语句声明的 D局部变量在声明它的过程执行完毕后就被释放了 参考答案：D6、要绘制多种形状的图形，需要设置Shape控件的（ ）属性 ABorderstyle BShape CFillStyle DStyle 参考答案：B7、当Winsock控件处于关闭状态时，其State属性的值是（ ） A0 B1 C2 D6 参考答案：A8、目录列表框的Path属性的作用是（ ） A显示当前驱动器或指定驱动器上的路径 B显示当前驱动器或指定驱动器上的某目录下的文件名 C显示根目录下的文件名 D只显示当前路径下的文件 参考答案：A9、下列数据对象模型中采用OLE DB访问数据库的是（ ）。 ADAC BADO CRDC DRDC和ADO 参考答案：B10、使用ADO数据模型时，使Recordset和 Connection对象建立连接的属性是（ ）。 ACommandType BActiveConnection COpen DExecute 参考答案：B11、对于窗体，保存文件时后缀名为（ ） A.frm B.fm C.fmr D.frmm 参考答案：A12、以下说法错误的是（ ） AVisual Basic是一种可视化编程工具 BVisual Basic是面向对象的编程语言 CVisual Basic是结构化程序设计语言 DVisual Basic采用事件驱动编程机制 参考答案：C 13、相对于传统编程语言，Visual Basic最突出的特点是（ ） A可视化编程工具 B面向对象的程序设计 C结构化程序设计 D事件驱动编程机制 参考答案：B14、对于窗体，下面（ ）属性在程序运行时其属性设置起作用 AMaxButton BBorderStyle CName DLeft 参考答案：D15、要使Print方法在Form_load事件中起作用，要对窗体的（ ）属性进行设置。 ABackColor BForeColor CAutoRedraw DCaption 参考答案：C16、若要使标签控件显示时不覆盖其背景内容，要对（ ）属性设置。 ABackColor BBorderStyle CForeColor DBackStyle 参考答案：D17、若要使命令按钮不可操作，要对（ ）属性设置。 AEnabled BVisible CBackColor DCaption 参考答案：A18、文本框没有（ ）属性。 AEnabled BVisible CBackColor DCaption 参考答案：D19、不论何对象，都具有（ ）属性。 AText BName CForeColor DCaption 参考答案：B20、要使某控件在运行时不可显示，应对（ ）属性进行设置。 AEnabled BVisible CBackColor DCaption 参考答案：B21、要使窗体在运行时没有最大化按钮，只要对（ ）属性设置即可。 AMaxButton BBorderStyle CWidth DMinButton 参考答案：A22、当运行程序时，系统自动执行启动窗体的（ ）事件过程。 ALoad BClick CUnLoad DMinButton 参考答案：A23、改变控件在窗体中的左右位置应修改该控件的（ ）属性。 ATop BLeft CWidth DRight 参考答案：B24、函数Int(Rnd*100)是在（ ）范围内的整数。 A(0,10) B(1,100) C0和(0,100 ) D(1,99) 参考答案：C25、如果X是一个正实数，对X的第3位小数四舍五入的表达式是（ ）。 A0.01*Int(X+0.005) B0.01*Int(100*(X+0.005) C0.01*Int(100*(X+0.05) D0.01*Int(X+0.05) 参考答案：B26、已知变量A、B、C中C最小，则判断A、B、C可否构成三角形的逻辑表达式为（ ）。 AA=B And B=C And C0 BA+CB And B+CA And C0 C(A+BC Or A-B0 DA+BC And A-B C And C0 参考答案：B27、下面（ ）是算术运算符。 AImp BMod CNot DLike 参考答案：B28、以下不是VB变量名命名规则的是：（ ） A变量名的第一个字符必须是字母、汉字、下划线和数字 B变量名不包含小数点 C组成变量名的字符数不得超过255个字符 D变量名在同一范围内必须是唯一的 参考答案：A29、公用变量声明的语句是（ ）。 AStatic Count As Boolean BDim Count As Integer CPublic Count As String * 6 DOption Explicit 参考答案：C30、下列哪个语句是错误的VB语句（ ） AText1.Text = 你好！ BText1.Text = 你好！ : Text1.BackColor = Red CText1.Text = 你好！ ; Text1.BackColor = Red DOption Explicit 参考答案：C单选题：（共6道试题，每题5分）1、 阅读程序，程序运行时单击窗体后，在窗体中显示c,k的值分别为（ ）Private Sub Form_Click()Dim c As Integer, j As Integer, k As Integerk = 0c = 1For j = 1 To 6 If j 4 Then c = c + 5 Exit For Else k = k + 1End IfNext jPrint c, kEnd Sub A4,4 B6, 6 C4，6 D6，4 参考答案：D2、阅读程序，程序运行时在文本框Text1中显示值为（ ）Private Sub Command1_Click()Dim s As DoubleDim i As Integer s = 5 i = 1 Do While i 9 i = i + 2 s = s + i Loop Text1.Text = sEnd Sub A26 B27 C28 D29 参考答案：D3、阅读程序，写出程序运行时单击窗体后，窗体Form1上的结果为（ ）Private Sub Form_Click() Dim A(1 To 4) As String Dim c As Integer Dim j As Integer A(1) = 2 A(2) = 4 A(3) = 6 A(3) = 8 c = 1 For j = 1 To 4 c = c + Val(A(j) Next j Print cEnd Sub A16 B15 C18 D20 参考答案：B4、 阅读程序，写出程序运行时，单击Command1后，文本框Text1、 Text2和 Text3的输出结果为（ ）Private Sub Command1_Click() Dim n As Integer, y As Integer, x As Integer a = 1Do While a 20 n = n + 1 b = a + b a = a * (a + 1) Loop Text1.Text = n Text2.Text = a Text3.Text = bEnd Sub A3，42，9 B3，40，10 C4，42，9 D3，42，8 参考答案：A5、 阅读程序，写出程序运行时，单击Command