15.为了在运行时把d:\pic文件夹下的图形文件a.jpg装人图片框Picturel中，所使用 的语句为( )。 A.Picturel.Text=LoadPicture("d:\pic\a.jpg") B.Picturel.Picture =LoadPicture("d:\pic\a.jpg") C.Picturel.Picture =LoadPicture(d:\pic\a.jpg) D.Picturel.Picture =Load("d:\pic\a.jpg") 二、填空题（每小题2分，共20分） 16.在VB中，要想获得某个相关控件或语句的帮助信息，一般可首先选中该控件或语 句，然后按 键。 17.表达式8+13Mod2*4+3的值是 18.全局变量在整个应用程序中有效，一般在标准模块中使用 语句声明。 19.若窗体Form1左上角坐标为(0,600)，右下角的坐标为(800，一200)。则X轴的正向 向 ,Y轴的正向向 20.将图片框的AutoSize属性设置成 时，可使图片框根据图片调整大小。 21.Winsock控件主要用来编制基于 或 协议的网络应用程序。 22.VB中，Access数据库属于 。 (说明是哪种数据库类型) 23.VB应用程序与数据库进行通信的主要机制称为 24.设某个程序中要用到一个二维数组，要求数组名为A,类型为字符串类型，第一维下 标从1到3，第二维下标从一1到2，则相应的数组声明语句为 25.列表框控件中最后一项的序号等于ListCount属性减 三、阅读程序题（共25分） 阅读下列程序并写出程序运行结果。 26.(6分) Private Sub Commandl_Click() Dim Suml As Integer,Sum2 As Integer Suml =0:Sum2 2 For i=1 To 2 Forj=1 Toi Sum2Sum2 j Next j Suml Suml Sum2 Next i Print Suml End Sub 写出程序运行时单击Commandl按纽后，Forml上的输出结果。 136115. 把dz\pic 文件夹 下 的 图 件a.jpg 装 入 框Picture1 所使 的语句为( )。 A. Picture1. Text = LoadPicture(" 八pic\a. jpg") B. Picture1. Picture = LoadPicture(" d:\pic\a. jpg") C. Picture1. Picture = LoadPicture( d:\pic\a. jpg) D. Picture1. Pictur Load(" d:\pic\a. jpg") 二、填空题(每小题2分，共 0分) 16. 件或 帮 助 可 首 句，然后按键。 17. 表达式8十13 Mod 铃4+3 18. 变量在 般在 19. 体Form1 为(0 ，600) 右下 为(800 一200) 轴 的 y轴的正向向 20. 图 片 的AutoSize 性设 框根据 调 整 21. Winsock 件 主要 用 编制 应用程序 22. VB Access 数据库属 于 一一 据库类 23. VB 用程序 进行通信 24. 个程 要用 一个二 数组 求 数组 型 为 类 型 标从 1到 3，第二维下标从一1到 2，则相应的数组声明语句为 25. 表框控 后一项 序 号等于ListCount 三、阅读程序题{共 5分) 阅读下列程序并写出程序运行结果。 26. (6 Private Sub CommandLClickO Dim Sum1 As Integer , Sum2 As Integer S1HIll=OzSurn2=2 iJnL um m+?UQU 119UQu h=misl EAOV·. -FNS1·]-ul h=m= Next i Print Sum1 End Sub 写出程序运行时单击 m m n d 1按纽后， 1上的输出结果。 1361