电大VB程序设计形成性考核4答案

1、判断题：（共20题 每题2分）1、如果一个菜单项的Visibal属性值为False，则该菜单及它的子菜单都不会显示。 参考答案：正确2、双精度数据类型的数据在机器内部用8个字节存储。 参考答案：正确3、语句Print “123”+45的输出结果是“12345” 。 参考答案：错误4、当命令按钮的Style属性值为1Graphical时，不可以用Caption属性设置标题的文字，可以用Picture属性给命令按钮添加图形。 参考答案：错误5、编译后形成的可执行应用程序文件是可以脱离开系统独立执行的。 参考答案：正确6、在盘驱动器列表框Drive1的Change事件过程中，代码Dir1.Path=

2、Drive1.Drive的作用是：当Drive1的驱动器改变时，Dir1的目录列表随同驱动器相应变化。 参考答案：正确7、设计菜单中每一个菜单项分别是一个控件。每一个控件都有自己的名字。 参考答案：正确 8、通过改变属性窗口中的name属性，可以改变窗体上显示的标题。 参考答案：错误9、二进制文件与随机文件的主要区别是：二进制文件与随机文件类似，必须限制固定长度，可用喜欢的方式来存取文件。 参考答案：错误10、for.next语句中的初值必须大于终值。 参考答案：错误11、系统提供的诸如sqr( )等函数不属于过程。 参考答案：正确12、在vb中，可通过函数now返回计算机系统的日期和时间。

3、参考答案：正确13、vb允许设计和使用用户自己设计的控件。 参考答案：正确14、vb提供的单选按钮的value属性，true表示选中，false表示未选中。 参考答案：正确15、在表达式中，运算符两端的数据类型要求一致。 参考答案：错误16、在vb中，文件菜单的“删除工程”的作用是将当前vb工程在硬盘中删除。 参考答案：错误17、vb支持弹出菜单，所谓“弹出菜单”是指单击鼠标后打开的菜单。 参考答案：正确18、事件过程与sub过程，它们相同点都是事件的驱动，而不同的只是事件过程由控件属性决定，而sub过程是由户自定义。 正确 错误 参考答案：错误19、有的对象既可以在属性窗口中设定又可以在程序

4、代码中设定。 正确 错误 参考答案：正确20、一个目标程序所需的所有文件的集合称为工程。 正确 错误 参考答案：正确单选题：（共30道试题，每题1分）1、以下哪些不是文本框（TextBox）的属性（ ） AScrollBars BMultiLine CName DCaption 参考答案：D2、当多文档MDI操作时，父窗体为所有子窗体提供工作空间，当子窗体最小化时，它的图标显示在（ ） A状态栏 B父窗体中 CDblClick DMouseMove 参考答案：A3、在代码中引用一个控件时，应使用控件的（ ）属性。 ACaption BName CText DIndex 参考答案：B4、设变量x

5、 = 4，y = -1，a = 7，b = -8,下面表达式（ ）的值为“假”。 Ax+a 0 AND y y Dx+y a+b AND NOT (y 2*b or a=c and bc or cd A1 Btrue Cfalse D1 参考答案：C24、实现字符的unicode编码方式与ANSI编码方式相互转换的函数是（ ） Astr Bstrconv Ctrim Dmid 参考答案：C25、假定picture1和text1分别为图片框和文本框的名称，下列不正确的语句是（ ） Aprint25 Bpicture1.print 25 Ctext1.print25 Ddebug.print 25

6、 参考答案：C26、语句输出结果是（ ） A5 B25 C0 D1 参考答案：B27、以下语句的输出结果是（ ）a=sqr（3）print format（a，$#.#） A$1.732 B$1.732 C$1.732 D$0001.732 参考答案：B28、inputbox函数返回值的类型为（ ） A数值 B字符串 C变体 D数值或字符串（视输入的数据而定） 参考答案：D29、为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是（ ） Acontrolbox Bminbutton Cenabled Dmaxbutton 参考答案：D30、决定窗体有无控制菜单的属性是（ )

7、Acontrolbox Bminbutton Cenabled Dmaxbutton 参考答案：A单选题：（共6道试题，每题5分）1、 阅读程序，写出程序运行时，单击窗体后，Form1上的输出结果为（ ）Private Sub Form_Click()Dim I as integer,j as integerDim c as integerc=0For i = 1 To 3For j=1 to 3 c=c+1Next jNext IPrint cEnd Sub A8 B9 C7 D6 参考答案：B2、阅读程序，写出程序运行时，输出结果为（ ）Private Sub Command1_Click

8、()a = 1: b = 2: c = 3a = b: b = c: c = aPrint cEnd Sub A3 B2 C5 D4 参考答案：B3、 阅读程序，写出程序运行时，输出结果为（ ）Private Sub Command1_Click()Dim sum As Integersum% = 10sum = 3.2Print sum%; sumEnd Sub A3,2 B3,3 C3.2,3.2 D3.2,3 参考答案：B4、阅读程序，写出程序运行时，输出结果为（ ）Private Sub Command1_Click()x = 12.34: y = 56.78z = x + yp =

9、Val(z)Print pEnd Sub A12.34 B56.78 C69.12 D12.3456 参考答案：D5、 阅读程序，写出程序运行时单击窗体后，输出结果为（ ）Private Sub Form_Click() Dim A(1 To 3) As String Dim c As Integer,j As Integer A(1) = “3” A(2) = “6” A(3) = “9” c=0 For j=1 to 3 c = c + Val(A(j)Next jPrint cEnd Sub A3 B6 C9 D18 参考答案：D6、 阅读程序，写出程序运行时单击命令按纽后，文本框Text1输出结果为（ ） Private Sub Command1_C