201701VB程序设计电大期末考试试题

1、一、单项选择题(每小题2分，共30分1.如果要在文本框中键入字符时，只显示某个字符，如星号(*)应设置文本框的( B )属性。 A. Caption B. PasswordChar C. Text D. Locked 2. MAs.gBox函数的返回值的数据类型是( D )。 A.字符串 B.日期型 C. 逻辑型D. 整型 3. 要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列( B )属性设置就有效。 A. MaxButton B. BorderSyle C. Width D. MinButton 4.VAB.程编序译中错通常不会产生错误提示的是( D )。 A.编译错

2、误 B.实时错误 c.运行时错误 D.逻辑错误 5. 要设置命令按钮的背景图形，必须设置的两个属性是( A )。 A. Style和Picture B. Style和Icon C. Caption和Picture D. Value和Icon 6. 下列关于变量的说法不正确的是( B )。 A.局部变量是指那些在过程中用Dim语句或Static语句声明的变量 B. 局部变量在声明它的过程执行完毕后就被释放了 C. 静态局部变量是在过程中用Static语句声明的 D.局部变量的作用域仅限于声明宫的过程 7. 如下数组声明语句，正确的是( B )。 A. Dim a3,4JAsInteger B.

3、Dima(3,4) As Integer C. Dima(n,n)As Integer D. Dima(34) As Integer 8. 若使图像框Image控件自动适应其中的图形大小，应( D )。 A. 将控件的AutoSize属性设为True B. 将控件的AutoSize属性设为False C. 将控件的Stretche属性设为True D. 将控件的Stretche属性设为False 9. 执行Form1.Scale(-14, 14)一(14， 一14)语句后，Form1窗体坐标系x轴和y轴的正方向是( B )。 A.向左和向下 B.向右和向上 C. 向左和向上 D. 向右和向下

4、10.Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件，需要设置的属性是( A )。 A. Interval=0或Enabled=False B. Interval=O或Visible=False C. Interval=0且Enabled=False D. Enabled=False且Visible=False 11. 使用ADO数据模型时，建立Recordset和Connection对象连接的属性是( D )。 A. Execute B. CommandType C. Open D. ActiveConnection 12. 要发送数据，通称使用Winso

5、ck控件的( C )。 A. Accept方法 B. Listen方法 C. SendData方法 D. GetDate方法 13. 用来从数据库表中删除记录的SQL命令是( A )。 A. DELETE B. SELECT C. UPDATE D. WHERE 14. 不属于VB数据库引擎的是( B )。 A. ODBC B. BDE C. Jet引擎 D. OLEDB 15. 如果创建了命令按钮数组控件，那么Click事件的参数是( C )。 ATag B. Caption C. Index D. 没有参数 二、填空题每小题2分，共20分) 中想获得帮助，需要按的键是 F1 ，要设置断点需

6、要按 F916. 在VB 键。 17. Winsock控件主要用来编制基于TCP/IP 或UDP 协议的网络应用程序。 Interval ，发生该事件的时间间隔由定时器的Timer控件可识别的事件是(Timer)定时器18. 属性设置。 属性指定。Index19. 在控件数组中，所有元素的 Name属性均相同，数组中的每个元素由 的语句是VB程序中声明并创建ADOcn20. 假设ADOcn为一个Connection对象，那么在 DimADOcnAs NewConnection 个vbp文件。21. 一个VB应用程序可以包含1 1 22. 列表框控件中最后一项的序号等于ListCount属性减

7、中有效的变量，一般在模块代码编辑器的顶部使用23. 全局变量是指那些在整个应用程序 Public声明。 024. Dim I As Integer,则运行时变量i 的初始值是 参数。中参数传递的方式有两种，一种是引用参数传递 参数，另一种是按值传递25. VB 25分三、阅读程序题共 阅读下列程序并写出程序运行结果。 ) 26.(6分 Private Sub Form_ClickO Dim I As Integer.j As Integer Dim c As Integer c= 1 For I= 1 To 3 For j = 1 To 2 c = c +3 Nextj NextI Print c End Sub : 的输出结果是文件框Text! 19 ) 分 27.(6 Private Sub CommandLClickO Dim s As Double Dim I As Integer s = 5 i = 1 Do While I = 3000 y=x * 1.1 Ca