大学计算机VB6.0习题(填空题)

习题六一、选择题答案Aadcc dc二、填空题答案1、a(I,j)+b(I,j)2、下标越界3、64、1 2 2 4 3 6第六章选择题部分解析3、sum表示a数组各元素的和X表示a数组元素和的平均值最后打印出a数组中大于平均值的元素Sum=1+2+3+4+5=15，x=3大于3的有4，55、倒着看文本框中显示什么？答：显示的是array1（1，3）+array2（2，3）的和接着往前看程序发现array1（i，j）=i+j所以array1（1，3）=1+3=4Array2(2,3)=2+3=5所以4+5=9二、填空题解析2、x数组最大元素是x（6）退出for循环时，i=7然后print x（i）相当于print x（7）但是没有x（7）这个元素，超出最大下标了。

若把print x（i）改为print x（a）则值是36第六章编程题1、Private Sub Form_Click()Dim a(1 To 20) As Integer, i As IntegerDim j As Integerj = 0 '用来表示小于60的个数Picture1.Print "产生的数组为:"Picture1.PrintPicture2.Print "其中小于60的元素有:"Picture2.PrintFor i = 1 To 20a(i) = Int(Rnd * 100 + 1)Picture1.Print a(i);If i Mod 10 = 0 Then Picture1.PrintIf a(i) < 60 Thenj = j + 1Picture2.Print a(i); " ";If j Mod 10 = 0 Then Picture2.PrintEnd IfNext iEnd SubPrivate Sub Form_Load()RandomizeEnd Sub2、Private Sub Form_Click()Dim a(1 To 10) As IntegerDim max As Integer, min As Integer, i As IntegerFor i = 1 To 10a(i) = Int(Rnd * 90 + 10)Picture1.Print a(i);If i Mod 5 = 0 Then Picture1.PrintNext imax = a(1)min = a(1)For i = 2 To 10If a(i) > max Then max = a(i)If a(i) < min Then min = a(i)Next iLabel1.Caption = "最大数为：" & maxLabel2.Caption = "最小数为：" & minEnd SubPrivate Sub Form_Load()RandomizeEnd Sub3、Dim a(1 To 20) As IntegerPrivate Sub Command1_Click()Dim x As Integer, flag As Integer, i As Integerflag = 0 '标志，表示数组中是否存在xx = InputBox("请输入x的值，为整数", "输入", 1) For i = 1 To 20If x = a(i) Thenflag = 1 'flag改变，说明存在Exit ForEnd IfNext iIf flag = 1 ThenPrint "数组中存在" & xPrint "位置：" & iElsePrint "数组中不存在" & xEnd IfEnd SubPrivate Sub Form_Click()Dim i As IntegerFor i = 1 To 20 '生成数组a(i) = Int(Rnd * 100) '题目没要求，随便的范围Next iFor i = 1 To 19 '冒泡排序For j = 20 To i + 1 Step -1If a(j) > a(j - 1) Thent = a(j)a(j) = a(j - 1)a(j - 1) = tEnd IfNext jNext iFor i = 1 To 20 '打印数组Print a(i);If i Mod 5 = 0 Then PrintNext iEnd SubPrivate Sub Form_Load()RandomizeEnd Sub4、Private Sub Form_Click()Dim a(1 To 15) As SingleDim i As Integer, c1 As Integer, c2 As Integer, c3 As Integer, avg As SingleFor i = 1 To 15a(i) = InputBox("请输入第" & i & "个学生的成绩", "输入成绩", 60)avg = avg + a(i)Next iavg = avg / 15For i = 1 To 15If a(i) > avg Then c1 = c1 + 1If a(i) < 60 Then c2 = c2 + 1If a(i) >= 90 Then c3 = c3 + 1Next iPrint "高于平均分的人数"; c1Print "<60的人数"; c2Print ">=90的人数"; c3End Sub5、Dim a(1 To 4, 1 To 4) As Integer, b(1 To 4, 1 To 4) As Integer, c(1 To 4, 1 To 4) As IntegerPrivate Sub Command1_Click()‘（2）题For i = 1 To 4For j = 1 To it = a(i, j)a(i, j) = a(j, i)a(j, i) = tNext jNext iPicture2.ClsPicture2.Print "a转置后："Picture2.PrintFor i = 1 To 4For j = 1 To 4Picture2.Print a(i, j); " ";Next jPicture2.PrintNext iEnd SubPrivate Sub Command2_Click()‘（3）题Picture2.ClsMax = c(1, 1)t1 = 1t2 = 1For i = 1 To 4For j = 1 To 4If c(i, j) > Max ThenMax = c(i, j)t1 = it2 = jEnd IfNext jNext iPicture2.Print "max=", MaxPicture2.Print "c("; i; ","; j; ")"End SubPrivate Sub Command3_Click()‘（4）题Picture1.ClsPicture2.ClsFor i = 1 To 4For j = 1 To iPicture1.Print a(i, j); " ";Next jPicture1.PrintNext iFor i = 1 To 4For j = i To 4Picture2.Print Tab(j * 5); b(i, j);Next jPicture2.PrintNext iEnd SubPrivate Sub Command4_Click()‘（5）题Picture1.ClsFor i = 1 To 4t = a(1, i)a(1, i) = a(3, i)a(3, i) = tNext iFor i = 1 To 4For j = 1 To 4Picture1.Print a(i, j); " ";Next jPicture1.PrintNext i End SubPrivate Sub Command5_Click()‘（1）题Picture3.Print "c矩阵："Picture3.PrintFor i = 1 To 4For j = 1 To 4c(i, j) = a(i, j) + b(i, j)Picture3.Print c(i, j); " ";Next jPicture3.PrintNext iEnd SubPrivate Sub Form_Load()ShowPicture1.Print "a矩阵："Picture1.PrintPicture2.Print "b矩阵："Picture2.PrintFor i = 1 To 4For j = 1 To 4a(i, j) = Int(Rnd * 40 + 30)b(i, j) = Int(Rnd * 35 + 101)Picture1.Print a(i, j); " ";Picture2.Print b(i, j); " ";Next jPicture1.PrintPicture2.PrintNext iEnd Sub。

VB第七章测试题Visual Basic 6.0第七章测试题⼀、填空题1、⽂件管理控件有___________，__________，___________。

2、⽤于连接驱动器个数的属性是_________。

3、在⽬录列表框控件中，返回当前⽬录中⼦⽬录个数的属性是_________，返回当前路径的索引的属性是_________。

当前展开的⽬录⽤索引值_____表⽰。

当前展开⽬录以下的⽬录范围是___________ 。

4、在⽂件列表框控件中返回是否在⽂件列表框控件中进⾏复选的属性是__________。

5、当在⽂件列表中单击⼀个⽂件时发⽣_______事件。

6、⽂件访问的类型有3种：________，_______，_________。

7、顺序⽂件中记录的长度是_______的，随机⽂件中记录的长度是______的。

8、打开顺序⽂件的⽅式有三种，分别是_______，_______，______。

9、⽂件号取值范围是______________。

10、缓冲区⼤⼩不超过________字节，默认______字节。

11、关闭顺序⽂件的语句是_________。

12、在顺序⽂件中⽤来测试⽂件⼤⼩的函数是______。

13、⽤来测试⽂件末尾的函数是________。

14、定义记录类型的语句是_______。

15、打开随机⽂件时，应选择__________ ⼦句。

16、对随机⽂件进⾏读写分4个步骤：_______________,____________________,______________________,______________________________。

17、在随机⽂件中，将记录读⼊变量的语句是________，将变量写⼊记录的语句是_________。

18、FSO对象模型包含在____________类型库中。

要引⽤该对象可选择_______菜单中的_______命令。

19、若要访问⼀个已有的驱动器、⽂件夹和⽂件，可以使⽤___________________对象中的_________,_________,_________⽅法。

VB6.0总复习题一、基本概念1、在设计窗体时双击窗体的任何地方，可以打开的窗口是（代码窗口,而F4键不能打开）2、以下说法正确的是（一个窗体对应一个窗体文件）。

工程文件的扩展名是.vbq3、设置窗体最小化时的图标可通过（Icon ）属性来实现p18表2-14、如果要实现当鼠标暂时停留在一命令按钮上时，显示提示信息，应设置此命令按钮的（ToolTipText）属性。

5、如果要实现窗体从内存中卸载，其实现的方法是（UnLoad）。

6、当文本框的MaxLength属性值取（0 ）时，该文本框能容纳的字符数最多。

7、焦点：使文本框获得焦点的方法是（SetFocus）。

8、当运行程序时，系统自动执行启动窗体的某个事件过程。

这个事件过程是（GotFocus）GotFocus 事件过程用以指定当控件或窗体首次接收焦点时发生的操作。

9、若使用Textbox控件时，为对用户输入的内容立即进行检查，就对Textbox控件的（Change）事件编程。

10、所有控件都具备的属性是（Name）。

11、命令按钮对象不支持DblClick事件。

12、下列4个选项中，不是VB数值常量的是（2E1.4 ）。

13、变量名不合法的是（M-d）,合法的是（k_name ）14、表达式"321" & 100 + "200"的值是（"321300”）。

15、VB6.0中执行时出现错误的是（x = Sqr(-4)x = Exp(800)）16、Sgn(x)的值为-1，则x的值是（小于0的数）。

// Sgn(x): 返回自变量x的符号，即当x为负数时，返回-1；当x为0时，返回0;当x为正数时，返回117、VB的叙述中正确的是（数组下标的下界在默认情况下从0开始）。

18、VB的叙述中不正确的是（使用ReDim语句可以改变数组的类型）。

19、在VB中声明了Variant变量，但未赋值，则系统默认其初始化值为（Empty）p40。

一、选择题一、选择题1．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（ ）。

A．窗体设计．代码C．属性D．工程资源管理器窗口．工程资源管理器窗口 >> 答案：d 2．窗体的Load事件的触发时机是（事件的触发时机是（ ）。

A．用户单击窗体时B．窗体被加载时C．窗体显示之后D．窗口被卸载时．窗口被卸载时 >> 答案：ｂ答案：ｂ3．与传统的程序设计语言相比，Visual Basuc最突出的特点是（最突出的特点是（ ）。

A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术．程序调试技术答案：C 4．VB6.0集成开发环境的主窗口不包括（集成开发环境的主窗口不包括（ ）。

A．标题栏．状态栏 D．工具栏．工具栏．标题栏 B．菜单栏．菜单栏 C．状态栏答案：c 5．如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（ ）。

格式是（A．Text.Mytext B．Mytext.text C．Mytext.（Text）D．Mytext*Text 答案：b 6．下列可以激活属性窗口的操作是（．下列可以激活属性窗口的操作是（ ）。

A．用鼠标双击窗体的任何部位命令 C．按Ctrl+F4 用鼠标双击窗体的任何部位 B．执行“工程”菜单中的“属性窗口”命令D．按F4键答案： b d 答案：7．假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应制造的操作是（ ）。

属性，预先应制造的操作是（A．单击窗体上没有控件的地方．不执行任何操作 D．双击窗体．单击任一个控件 C．不执行任何操作．单击窗体上没有控件的地方 B．单击任一个控件的标题栏的标题栏答案：a 8．如果在文本框中键入字符时，应设置文本框的（（）属性。

只显示某个字符，如星号（*），应设置文本框的如果在文本框中键入字符时，只显示某个字符，A．Caption B．PasswordChar C．Text D．Char 答案：b 9．如果想让文本框中的内容在运行时不能编辑，需将文本框的（．如果想让文本框中的内容在运行时不能编辑，需将文本框的（ ）属性设置为True。

vb填空题练习填空题1.VB6.0是运行于Windows 9x/NT操作系统环境下的一个快速可视化程序开发工具,用它进行程序设计,有两个基本的特点,即可视化设计和【1】.答案：1). 事件驱动编程2.一个工程可以包括多种类型的文件,其中扩展名为.bas的文件表示【1】文件.答案：1). 标准模块或模块3.菜单控件(对象)只有一个【1】事件答案：1). Click() 或 "单击事件" 或单击事件4.如果建立菜单时在标题文本框中输入—个【1】,那么显示时形成一个分隔符.答案：1). 下划线或 _5.Integer类型的变量占用【1】字节空间.答案：1). 26.在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的【1】属性的值设置为True.答案：1). MultiLine7.VB中的变量按其作用分为全局变量,模块变量,【1】.答案：1). 局部变量8.表示x是5的倍数或是9的倍数的逻辑表达式为【1】.1). x Mod 5=0 OR x Mod 9=09.a 和b 中有仅只有一个为1,相应的Visual Basic逻辑表达式为【1】.答案：1). a=1 xor b=110.根据访问模式文件分成顺序文件、随机文件、【1】.答案：1). 二进制文件11.在VB 6.0中,变量名最长可达【1】个字符.答案：1). 25512.在过程调用中,参数的传递可分为两种方式,其中按【1】传递方式是默认的.答案：1). 地址13.sst="ABC12DE",则Val(sst)=【1】.答案：1). 014.VB6.0的连接运算符包括【1】运算符和【2】运算符两种.答案：1). & 或 +2). & 或 +15.滚动条响应的重要事件有【1】和Change事件.答案：1). Scroll16.写出用随机函数产生一个200至300之间整数的VB表达式【1】.答案：1). 200 + Int( Rnd*100 ) 或 200 + Int( 100*Rnd )17.VisualBasic6.0用于开发【1】环境下的应用程序.1). WINDOWS18.在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer,则strVar、intVar与sngVar的数据类型分别是Variant、Variant 和【1】.答案：1). Integer19.使用Dim CJ(1 To 3, 1 To 4, 2 To 3),声明数组CJ有【1】个数组元素.答案：1). 2420.在VB 6.0中,设 Single型变量 XYZ 的值为123.45,若要将其转换成字符串,应使用的类型转换函数是【1】.答案：1). STR 或 CSTR21.Option Base 1的作用是确定数组的下界为【1】.答案：1). 122.String(3, "abc")的结果为【1】.答案：1). aaa23.当菜单项的【1】属性设为False时,则程序执行时该菜单不可见.答案：1). Visible24.VB 6.0的基本表达式包括算术表达式、关系表达式和【1】表达式.答案：1). 逻辑25.大于X 的最小整数的VB表示形式为【1】.答案：1). Int(x)+1 或 Int(x) + 126.对文本框的ScrollBars属性值设置为2(有垂直滚动条),但没有垂直滚动条显示,是因为没有将【1】属性设置为True.1). MultiLine27.当对命令按钮的Picture属性装入.bmp图形文件后,选项按钮上并没有显示所需的图形,原因是没有将【1】属性设置为1(Graphical).答案：1). Style28.在VB中,窗体由属性定义外观,由【1】定义行为,由事件定义其与用户的交互.答案：1). 方法29.将【1】属性设置为1,单选按钮和复选框的标题显示在左边.答案：1). Alignment30.表达式 Fix(-21.68) + Int(-12.02) 的值为【1】 .答案：1). -5631.Val("123.55ab456")的值是多少【1】.答案：1). 123.5532.VB表达式9^2 MOD 45 \2 *3 的值【1】.答案：1). 433.要使同一类型控件组成一个控件数组,必须要求【1】.答案：1). Name 相同或名称相同34.对象具有属性和【1】.答案：1). 方法35.在VB中,若要改变一个窗体的标题,应在属性窗口中改变这个窗体的【1】属性的值.1). Caption36.要动态添加菜单项,使用的语句是【1】答案：1). Load37.数组元素个数可以改变的数组称为【1】.答案：1). 动态数组38.要使用下列FOR语句循环执行20次,请在下划线处填入正确的值.For k= 【1】T o –5 Step -2答案：1). 3339.传地址方式是当过程被调用时,形参和实参共享【1】.答案：1). 存储单元40.把条件1<=X<12写成VB关系表达式为【1】.答案：1). x>=1 and x<12 或 x<12 and x>=141.要使一个按钮设为默认按钮,应把此按钮的【1】属性的值设为True.答案：1). Default42.要使鼠标停留在按钮上显示特殊的鼠标形状,应设置的属性值是【1】.答案：1). mousepointer43.在VB中,若要将字符串"12345"转换成数字值应使用的类型转换函数是【1】.答案：1). VAL 或 Cint44.VB的运算符包括算术运算符、【1】运算符、关系运算符、逻辑运算符和特殊运算符.答案：1). 连接45.VB中,变量的声明可分为两种方法:隐式声明和【1】.答案：1). 显式声明46.【1】表示列表框中最后一项的序号.答案：1). ListCount-148.X=2:Y=8:PRINT X+Y=10的结果是【1】.答案：1). True49.把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】.答案：1). False50.一个工程可以包括多种类型的文件,其中,扩展名为.frm的文件表示【1】文件.答案：1). 窗体52.变量min&表示【1】类型的变量.答案：1). 长整型53.表达式 32\7 MOD 3^2 的值是【1】.答案：1). 454.当x=2时,语句if x=2 then Print x=2 的结果值是【1】.答案：1). True55.由Dim a (10) As single定义的数组占用【1】字节的内存空间.答案：1). 4456.Print "x=" & (2=4) 的结果为【1】.答案：1). x=False57.要使一个按钮无效,则可把它的Enable属性设为【1】.答案：1). False58.在VB中,若要重新定义一个动态数组的元素个数,应当使用【1】语句对其进行重新定义.答案：1). ReDim59.文件列表框的FileName属性【1】(包含/不包含) 路径.答案：1). 不包含60.将【1】属性设置为1,单选按钮和复选框以图形方式显示.答案：1). Style62.图片框和图像框都可以载入图形文件,二者中【1】更灵活些,它适用于动态环境,在其内部还可以绘图、放入其他控件等.答案：1). 图片框63.列表框(ListBox)显示【1】,用户可以从中选择一个或多个项目.答案：1). 项目列表或列表64.要获得列表框List数组的元素总个数通过【1】属性.答案：1). ListCount65.一般情况下,控件有两个属性项的缺省值是相同的,这两个属性项是name和【1】.答案：1). caption66.一个工程可以包括多种类型的文件,其中,扩展名为.vbp的文件表示【1】文件.答案：1). 工程67.在控件之中,【1】不能从工具箱中被删除.答案：1). 内部控件或标准控件68表达式 1 and 0的值【1】.答案：1). False69.在利用Visual Basic设计应用程序时,一般会遇到三类错误:语法错误、执行错误和【1】.答案：1). 逻辑错误70一个工程可以包括多种类型的文件,其中ActiveX控件的文件扩展名为【1】.答案：1). OCX71表达式(-3) And 8 的值为【1】.答案：1). True72.把整型数1赋给一个逻辑型变量,则逻辑变量的值为【1】.答案：1). True73执行下面的程序段后,s的值为【1】s = 5For i = 2.5 To 5.1 Step 0.6s = s+1Next i答案：1). 1074.变量min@表示【1】类型的变量.答案：1). 货币数据变量或货币75.Windows环境下的应用程序一般为用户提供三种菜单,分别是窗体控制菜单、【1】菜单与快捷菜单.答案：1). 下拉76.求x与y之积除以z的余数的VB表达式为【1】.答案：1). x*y Mod z。

模拟试题一一、单选题1. VB6.0是一种面向的编程环境。

(A) 机器(B) 对象欢迎使用本资料，祝您身体健康、万事如意，阖家欢乐。

愿同学们健康快乐的成长。

早日为祖国的繁荣昌盛奉献自己的力量(C) 过程(D) 应用2. 以下关于窗体的Name属性的叙述正确的是。

欢迎使用本资料，祝您身体健康、万事如意，阖家欢乐。

愿同学们健康快乐的成长。

早日为祖国的繁荣昌盛奉献自己的力量(A) 窗体的Name属性可以为空(B) 窗体的Name属性是显示在窗体标题栏中的文本(C) 可以在运行期间改变窗体的Name属性欢迎使用本资料，祝您身体健康、万事如意，阖家欢乐。

愿同学们健康快乐的成长。

早日为祖国的繁荣昌盛奉献自己的力量(D) 窗体的Name属性指定窗体的名称，用来标识一个窗体3. 若要使命令按钮不可操作，要对属性进行设置。

(A) EnabIed (B)Visible(C) Backcolor (D)Caption4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过事件获得输入键值的ASCII码。

(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面是合法的变量名。

(A) pi (B)π(C) print (D) a+k6. 表达式Int(10*Rnd)产生的随机数的范围是。

(A) [1,9] (B) [1,10](C) [0,10] (D) [0,9]7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是。

(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是。

(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 当VB执行下面语句后，变量a的值为。

一，选择题1、如果VB环境中缺少某个窗口，一般应从主菜单__C____的下拉菜单中找到相应的激活命令。

（1分）A、编辑B、文件C、视图D、调试2、启动Visual Basic后，VB为用户建立的第一个窗体是__B____。

（1分）A、FormB、Form1C、窗体1D、窗体3、不属于一个工程文件（*.vbp）里的文件是____A__。

（1分）A、*.txt文件B、*.bas文件C、*.cls文件D、*.frm文件4、与传统的程序设计语言相比较，Visual Basic最突出的特点是__C____。

（1分）A、结构化的程序设计B、数据处理C、面向对象的可视化编程D、中文支持5、文本框中的ScrollBars属性已设置为3-Both，但却没有水平和垂直滚动条的效果，原因可能是___B___。

（1分）A、文本框中没有内容B、文本框的MultiLine属性为FalseC、文本框的MaxLength属性为0D、文本框的Locked属性是True6、能够盛放其他控件，而且是最基本的对象是___A___。

（1分）A、窗体B、图像C、标签D、文本7、任何控件都具有的属性是____C__。

（1分）A、PictureB、CaptionC、NameD、AutoSize8、窗体上有一个标签Label1和一个命名按钮Command1，当程序运行时每单击一次命令按钮，标签就向右移动一定距离。

在Command1_Click()中能完成这个功能的命令为___D___。

（1分）A、Label1.Left = 100B、Label1.Left = Label1.Left - 100C、Label1.Move 100D、Label1.Move Label1.Left + 1009、要把一个Image控件对象设置成隐藏，应设置的属性是___A___。

（1分）A、VisibleB、EnabledC、DefaultD、Cancel10、以下___B___是正确的For …Next结构。

试题一、语言基础（35分）（一）判断下列叙述的正确与否，正确的打“√”，否则打“×”（每题1分，共10分）1．窗体的Top、Left属性为数值，其单位长度为缇，且不可改变 ( ) 。

2．数组的下标最小为1，且不可改变 ( ) 。

3．设置好窗体字体后，在窗体上建立控件，各控件的默认字体为窗体字体 ( ) 。

4．控件的只读属性值不可以在程序运行时动态地修改 ( ) 。

5．函数Val("2a")的返回值为42 ( ) 。

6．标签框的Caption属性值为字符串，运行时可以重新赋值 ( ) 。

7．列表框控件的Sorted属性可以在运行时修改 ( ) 。

8．将容器的FillStyle属性设置为0后，容器中所有图形都变为实心填充 ( ) 。

9．在容器的ScaleMode属性值中，取值7使得容器的单位长度最小 ( ) 。

10．图片框的Clear方法可以清除图片框中的文字以及用图形方法绘制的图形 ( ) 。

（二）单选题（每题1分，共5分）1．装入窗体后，使窗体最大化的窗体属性名是。

A、WindowStateB、MaxC、MinD、Style2．按Tab键时，决定焦点在各个控件之间移动顺序的属性是。

A、IndexB、TabIndexC、TabStopD、SetFocus 3．表示文本框中所选定内容的属性是。

A、SeltextB、SellenghtC、TextD、Caption 4．设置某菜单项是不是一个分割条的属性是。

A. NameB. CaptionC. EnabledD. Visible 5．语句“Circle(1000,1000),800,,,,2”绘制的是。

A、弧B、椭圆C、扇形D、同心圆（三）填空题（每题2分，共20分）1．将一条语句分成多行显示，语句间使用的分隔符为。

2．将数学式 (x+1)e2x写作VB算术表达式为。

3．判断整型变量n是否为两位正整数的逻辑表达式为。

4．执行下列程序段后，变量s、k的值依次为。

考试题型一、单项选择题（每题1分，共35分）二、判断题（每题1分，共15分；正确的打"，错误的打x。

）三、填空题（每空1分，共10分）四、读程序写出结果（每题5分，共20分）五、程序填空（每空2分，共10分）六、编程题（每小题10分，共10分）2006年4月全国计算机等级考试二级笔试试卷Visual Basic语言程序设计11. 以下关于Visual Basic特点的叙述中，错误的是A）Visual Basic是采用事件驱动编程机制的语言B）Visual Basic程序既可以编译运行，也可以解释运行C）构成Visual Basic程序的多个过程没有固定的执行顺序D）Visual Basic程序不是结构化程序，不具备结构化程序的三种基本结构12. 以下叙述中，错误的是A）一个Visual Basic应用程序可以含有多个标准模块文件B）一个Visual Basic工程可以含有多个窗体文件D）标准模块文件的扩展名是.bas13. 以下叙述中，错误的是A）在Visual Basic中，对象所能响应的事件是由系统定义的C）Visual Basic中允许不同对象使用相同名称的方法D）Visual Basic中的对象具有自己的属性和方法14. 设有如下语句：Dim a,b As In tegerC= "VisualBasic ”D=#7/20/2005#以下关于这段代码的叙述中，错误的是A）a被定义为Integer类型变量B） b被定义为Integer类型变量C） c中的数据是字符串D）d中的数据是日期类型15. 以下能从字符串"VisualBasic "中直接取出子字符串"Basic"的函数是A）Left |B） Mid | C） Stri ng D） In str16. 设a=4,b=3,c=2,d=1下列表达式的值是a>b+1 Or c<d And b Mod cA) True B) 1 C) -1 D) 017.以下可以作为Visual Basic变量名的是A) A#A B)counstA C) 3A D) ?AA18.设x-4,y-6,则以下不能在窗体上显示出A=10 的语句是C） Print “ A= ” +Str（x+y）D） Print “ A= ” & x+y19. 假定有如下的命令按钮（名称为Comma ndl）事件过程：Private Sub Comma nd1_Click（）X=lnputBox（输入：：“'输入整数”）MsgBox ”输入的数据是：”，，”输入数据：”+XEnd Sub程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是A）x的值是数值10B）输入对话框的标题是“输入整数“C）信息框的标题是“输入数据：10 “D）信息框中显示的是“输入的数据是：“20. 在窗体上画1个命令按钮（名称为Command1 ）和1个文本框（名称为Text1），然后编写如下事件过程：Private Sub Comma nd1_Click()X=Val(Text1.Text)Select Case xCase 1,3Y=x*xCase Is>=10,Is<=-10Y=xCase -10 To 10Y=-xEnd SelectEnd Sub程序运行后，在文本框中输入3,然后单击命令按钮，则以下叙述中正确的是A) 执行Y=x*x B)执行Y=-xC)先执行Y=x*x，再执行Y=-x D)程序出错21. 设有命令按钮Comma nd1的单击事件过程，代码如下：Private Sub Comma nd1_Click()Dim a(30) As In tegerFor i=1 to 30a(i)=I nt(R nd*100)NextFor Each arritem In aIf arrItem Mod 7=0 Then Print arrItem;If arrItem >90 Then Exit ForNextEnd Sub对于该事件过程，以下程序中错误的是B) 语句For Each arrltem In a 有语法错误C) ........................................... If arrltem Mod 7=0 语句的功能是输出数组中能够被........................... 7整除的数D) ................................ If arrItem >90 语句的作用是当数组元素的值大于....................... 90时退出For循环22. 设有命令按钮Comma nd1的单击事件过程，代码如下：Private Sub Comma nd1_Click()Dim a(3,3) As In tegerFor i=1 to 3For j=1 to 3a(i,j)=i*j+iNext jNext iSum=0For i=1 to 3Sum=Sum+a(i,4-i)Next iPrint SumEnd Sub运行程序，单击命令按钮，输出结果是A) 20 B) 7 | C) 16 ~| D) 1723. 在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Comma nd1_Click()a=0For i=1 to 2For j=1 to 4If j Mod 2<>0 Thena=a-1End Ifa=a+1Next jNext iPrint aEnd Sub程序运行后，单击命令按钮，输出结果是A)0 B) 2 C) 3 | D)424. 窗体上有名称分别为Text1、Text2的2个文本框，有一个由3个单选按钮构成的控件数组Option1,程序运行后，如果单击某个单选按钮，则执行Text1中的数值与该单选按钮所对应的运算(乘以1、10或100)，并将结果显示在Text2中，如图2所示。

题目： 1、在Visaul Basic中的常量分为两种，一种是文字常量,一种是常量。

答案: 符号常量权重：3难易度：1题目： 2、数学公式(X+Y)(Y×Z)的数学表达式是。

答案: (x+y)*(y*z)权重：4难易度：1题目： 3、在程序中使用日期型数据时，必须用符号将日期型数据括起来。

答案: “#”|井字符号权重：4难易度：1题目： 4、在Visaul Basic中,属性窗口分为4 个部分，这四个部分分别是属性显示方式、属性列表框和属性含义说明。

答案:对象列表框权重：3难易度：1题目： 5、VB集成发环境窗口，它包括了数个独立的窗口。

除必须的"主窗口"外，常用的还有窗口、窗口、窗口、工具箱窗口、对象浏览窗口、工程资源管理等窗口。

答案: 窗体窗口;属性窗口;代码窗口权重：3难易度：2题目：在计算机上建立一个VB应用程序的完整过程，一般分：建立用户界面的对象、、对象事件过程及编程、和五个步骤。

答案:对象属性的设置;程序运行和调试程序;保存文件权重：3难易度：2题目： 7、VB中每个对象都有自己的属性，属性决定控件是否允许可见。

答案: Visible权重：4难易度：1题目： 8、在VB对象的三要素中，可以把看作一个对象的性质，把看作对象的响应，把看作对象的动作。

答案: 属性;事件;方法权重：4难易度：1题目： 9、同一窗体中建立几组相互独立的单选钮时，必须先建立，然后在其中建立单选钮。

答案: 框架对象框架控件权重：3难易度：2题目： 10、VB有三种工作模式，它们分别是模式、模式和模式。

答案: 设计模式;运行模式;中断模式权重：3难易度：2题目： 11、VB中对象与对象之间、对象与系统之间及对象与程序之间的通信都是通过来进行的。

答案: 事件权重：2难易度：3题目： 12、如果希望每0.6秒钟产生一个计时事件，那么应将InterVal属性值应设置为。

答案: 600权重：4难易度：1题目： 13、控件属性Height和Width决定了控件的。

大学计算机基础vb试题及答案一、选择题（每题2分，共10分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. StringC. DoubleD. 以上都是答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. ConstD. Option答案：A3. 下列哪个函数用于将字符串转换为数值？A. CIntB. CStrC. CDblD. CLng答案：A4. 在VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. ListBox答案：A5. VB中，以下哪个事件用于处理按钮点击？A. ClickB. DoubleClickC. DblClickD. MouseDown答案：A二、填空题（每题2分，共10分）1. VB中的_________语句用于定义一个过程。

答案：Sub2. VB中，_________函数用于获取当前日期。

答案：Date3. 在VB中，_________属性用于设置或返回控件的可见性。

答案：Visible4. VB中，_________方法用于清空文本框中的内容。

答案：Clear5. VB中，_________事件用于处理文本框内容改变。

答案：Change三、简答题（每题5分，共20分）1. 请简述VB中事件处理程序的作用。

答案：事件处理程序是VB中用于响应用户操作或系统事件的代码块，它们使得程序能够对用户的输入或特定事件做出反应。

2. 描述VB中数组的声明和使用方式。

答案：在VB中，数组可以通过Dim语句声明，如Dim arr(10) As Integer，表示声明一个包含11个整数的数组。

使用时，通过索引访问数组元素，如arr(0)。

3. 说明VB中如何使用条件语句。

答案：VB中使用If...Then...Else语句进行条件判断。

如果条件为真，则执行Then后面的代码块；如果条件为假，则执行Else后面的代码块。

《Viusla Basic 6.0程序设计》习题答案习题1答案一、简答题1. 答：Windows应用程序通常以窗口形式运行，窗口上包含文本框、按钮等控件。

在Visual Basic中，采用“所见即所得”方式设计Windows应用程序，可以把控件直接拖放到窗口上，而不用编写代码来实现用户界面。

2. 答：在任务1中，窗体、标签和按钮都是对象，在设计过程设置了这些对象的许多属性，例如Caption属性等；还在按钮的Click事件中编写程序代码，以便在单击按钮时执行相应的操作。

二、填空题1. 窗体模块；标准模块；类模块2. 对象；过程3. 运行；启动4. .frm；.vbp三、选择题1. A2. D3. D4. B一、简答题1. 答：Visual Basic有以下基本数据类型：Byte（字节型）、Integer （整型）、Long（长整型）、Single（单精度浮点型）、Double（双精度浮点型）、Currency（货币型）、String（变长）、String（定长）、Variant（可变型数字）、Variant（可变型字符）、Boolean（布尔型）、Date （日期型）、Object（对象型）。

2. 答：Visual Basic的表达式分为以下4类：算术表达式、字符串表达式、关系表达式、布尔表达式。

3. 答：Print语句用于输出数字和文本，通常是把结果输出到窗体上。

4. 答：分支语句有两个：If语句和Select语句，它们都是根据条件来执行特定的语句。

5. 答：循环语句有3种语句：For、While和Do，For用于执行指定次数，While为先测试型循环语句，Do为后测试型循环语句。

6. 答：定长数组包含固定数目的元素，通过数组名和下标来访问每个元素。

7. 答：动态数组和定长数组的不同之处在于：动态数组的元素数可以动态改变。

8. 答：过程的参数有两种传递方式：按值传递参数和按地址传递参数。

二、填空题1. “"”；“#”2. 字母；255；句号、空格、类型说明符、运算符等3. False4. 495. marriage And age >= 26 And workingage >=56. 177. 408. 149. 10 1210. 2 4 7 11 1611. s=2 s=5 s=9三、选择题1. D2. B3. C4. D5. A6. B一、简答题1. 答：不是。

vb大学试题及答案一、单项选择题（每题2分，共20分）1. VB中用于声明变量的关键字是：A. DimB. DeclareC. VarD. Let答案：A2. 在VB中，用于表示逻辑“与”运算的运算符是：A. AndB. OrC. NotD. Xor答案：A3. 下列哪个选项不是VB中的控件？A. TextBoxB. ButtonC. LabelD. ComboBox答案：D4. VB中用于执行循环的关键字是：A. ForB. WhileC. DoD. All of the above答案：D5. 在VB中，用于定义一个过程的关键字是：A. FunctionB. SubC. ProcedureD. Method答案：B6. VB中用于打开文件的函数是：A. OpenB. CloseC. ReadD. Write答案：A7. 在VB中，用于声明常量的关键字是：A. ConstB. DimC. StaticD. Let答案：A8. VB中用于创建数组的关键字是：A. ArrayB. DimC. DeclareD. New答案：B9. 在VB中，用于执行条件判断的关键字是：A. IfB. ElseC. SelectD. Case答案：A10. VB中用于执行异常处理的关键字是：A. TryB. CatchC. FinallyD. All of the above答案：D二、填空题（每题2分，共20分）1. VB中，用于声明一个整型变量的关键字是________。

答案：Dim2. 在VB中，________运算符用于比较两个值是否不相等。

答案：<>3. VB中，________关键字用于定义一个类。

答案：Class4. VB中，________函数用于获取系统当前时间。

答案：Now5. 在VB中，________关键字用于定义一个事件。

答案：Event6. VB中，________函数用于计算两个数的和。

VB练习题一、单项选择题（1-251题）1.以下4种描述中，错误的是__ D __。

A. 常量在程序执行期间其值不会发生改变B. 根据数据类型不同，常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量C. 符号常量是用一个标识符来代表一个常数，好象是为常数取一个名字，但仍保持常数的性质D. 符号常量的使用和变量的使用没有差别2.下面合法的常量是___ D ____。

A. 1/2B. 'abcd'C. 1.2*5D. False3.Visual Basic中可以用类型说明符来标识变量的类型，其中表示货币型的是___ C ____。

A. %B. #C. @D. $4.下面___ B____是不合法的整常数。

A.100B.%O100C.&H100D.&O1005.以下关键字中，不能定义变量的是___A____。

A. DeclareB. DimC. PublicD. Private6.表达式16/4-2^5*8/4 MOD 5\2的值为___B____。

A. 14B. 4C. 20D. 27.用十六进制表示Visual Basic的整型常数时，前面要加上的符号是___A____。

A. &HB. &OC. HD. O8.Visual Basic日期型常量的定界符是__A_____。

A. ##B.‘’C. ()D. {}9.数学关系式3≤x<10表示成正确的VB表达式为___B____。

A. 3<=x<10B. 3<=x AND x<10C. x>=3 OR x<10D. 3<=x AND <1010.下面正确的赋值语句是___C____。

A. x+y=30B. pi*r*r=yC. y=x+30D.x=3y11. \，/，Mod，*四个算术运算符中，优先级别最低的是___C____。

A. \B. /C. ModD. *12.表达式ASC("F")的类型是__C_____。

大学vb试题及答案大学VB试题及答案一、选择题（每题2分，共20分）1. VB中，以下哪个函数用于计算字符串的长度？A. LenB. StrC. UCaseD. LCase答案：A2. 在VB中，以下哪个关键字用于定义一个过程？A. FunctionB. SubC. DimD. Const答案：B3. VB中，以下哪个控件用于显示文本信息？A. TextBoxB. ButtonC. LabelD. ComboBox答案：C4. 在VB中，以下哪个属性用于设置文本框的只读状态？A. ReadOnlyB. EnabledC. VisibleD. BackColor答案：A5. VB中，以下哪个语句用于结束当前的过程执行？A. EndB. ExitC. ReturnD. Stop答案：B6. VB中，以下哪个关键字用于定义一个类？A. ClassB. ModuleC. InterfaceD. Namespace答案：A7. 在VB中，以下哪个函数用于将字符串转换为大写？A. UCaseB. LCaseC. StrConvD. Trim答案：A8. VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. BackColorD. ForeColor答案：A9. 在VB中，以下哪个语句用于创建一个新的对象实例？A. NewB. CreateObjectC. DimD. Set答案：D10. VB中，以下哪个关键字用于定义一个数组？A. DimB. ReDimC. EraseD. Option Base答案：A二、填空题（每题2分，共20分）1. VB中，使用________关键字可以定义一个变量。

答案：Dim2. 如果要在VB中创建一个包含10个元素的整数数组，可以使用________语句。

答案：Dim arr(9) As Integer3. VB中，使用________函数可以获取当前系统时间。

《程序设计语言VB》课程习题集一、单选题1. Visual Basic是一种面向（D ）的程序设计语言。

A. 用户B. 事件C. 程序D. 对象2.在Visual Basic6.0中规定工程文件的扩展名是（A）。

A. vbpB. forC. frmD. bas3. Visual Basic6.0中规定窗体文件的扩展名是（B ）。

A. forB. frmC. vbpD. bas4.如何使一个标签或按钮控件在运行时不可用（C）。

A. 把它的Visible属性设置成FalseB. 把它的Visible属性设置成TrueC. 把它的Enabled属性设置成FalseD. 把它的Enabled属性设置成True5.控件的字体可在属性窗口的（A）属性中调整？A. FontB. ColorC. TextD. Caption6.若要将某命令按钮设置为默认命令按钮。

则应设置为True的属性是（C ）。

A. ValueB. CancelC. DefaultD. Enabled7.在VB中，记录对象数据的是（C）。

A. 方法B. 事件C. 属性8.在文本框上显示文本的属性是（B）。

A. ValueB. TextC. PrintD. Enabled9. InputBox函数返回值的类型为（A）。

A. 字符串B. 数值C. 变体D. 数值或字符串（视输入的数据而定）10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（A）。

A. 字符串"20"B. 字符串"120"C. 默认值100D. 数值12011.下列控件中可用于接受用户输入文本，又可用于显示文本的是（B）。

A. Label控件B. TextBox控件C. Timer控件D. CommandButton控件12.语句PRINT "25*4"的输出结果是（A）。

试卷编号：8016所属语言：Visual Basic试卷方案：VB模拟试卷总分：100分共有题型：5种一、填空共10题（共计10分）第1题（1.0分）题号:66VB 6.0的基本表达式包括算术表达式、关系表达式和【1】表达式.答案：=======(答案1)=======逻辑第2题（1.0分）题号:234当x=2时,语句if x=2 then Print x=2 的结果值是【1】.答案：=======(答案1)=======True第3题（1.0分）题号:1286使用Dim CJ(1 To 3, 1 To 4, 2 To 3),声明数组CJ有【1】个数组元素.答案：=======(答案1)=======24第4题（1.0分）题号:1460执行下面的程序段后,a 的值为【1】, b 的值为【2】.a=300b=20a=a+b b=a-ba=a-b答案：=======(答案1)=======20=======(答案2)=======300第5题（1.0分）题号:389Visual Basic中保存工程文件时,若不改变目录名,则系统默认的目录是【1】.答案：=======(答案1)=======VB98第6题（1.0分）题号:57在控件之中,【1】不能从工具箱中被删除.答案：=======(答案1)=======内部控件=========或=========标准控件第7题（1.0分）题号:270将焦点定位于命令按钮Command1之上的语句为【1】.答案：=======(答案1)=======Command1.SetFocus=========或=========SetFocus第8题（1.0分）题号:232表达式93\7 MOD 2^3的值是【1】.答案：=======(答案1)=======5第9题（1.0分）题号:1410两质数的差为2,称此两质数为质数对,下列程序是找出100以内的质数对,并成对显示结果.其中,函数IsP判断参数m是否为质数.请在程序中下划线处填入相应的内容.Public Function IsP(m)As BooleanDim I%【1】For I=2 To Int(Sqr(m))If 【2】Then IsP=FalseNext IEnd FunctionPrivate Sub Command1_Click()Dim I%P1=IsP(3)For I=5 To 100 Step 2P2=IsP(I)If 【3】Then Print I-2,IP1 【4】Next IEnd Sub答案：=======(答案1)=======IsP=True=======(答案2)=======m Mod I=0=======(答案3)=======p1 And p2 =======(答案4)=======p2第10题（1.0分）题号:44一个工程可以包括多种类型的文件,其中,扩展名为.vbp的文件表示【1】文件.答案：=======(答案1)=======工程二、判断共10题（共计10分）第1题（1.0分）题号:300如果一个列表框一共有5个选项,而当选中第三项时,这时列表框的ListIndex属性为2.答案：Y第2题（1.0分）题号:1122对象的三要素包括:属性、事件、方法.答案：Y第3题（1.0分）题号:250Image 控件不能用作容器使用.答案：Y第4题（1.0分）题号:228Dim i, j as integer 表明i和j都是整型变量.答案：N第5题（1.0分）题号:1134ActiveX部件是可以重复使用的编程代码和数据.答案：Y第6题（1.0分）题号:312通用对话框只能用SHOW方法进行调用.答案：N第7题（1.0分）题号:346在Visual Basic 中Dim a ,b,c as integer 和Dim a as integer, b as integer,c as integer 相同.答案：Y第8题（1.0分）题号:349在程序中Name属性是作为对象的标识而引用,不会显示在窗体上,而控件上显示的内容由Caption属性决定.答案：N第9题（1.0分）题号:341在VB中,可通过函数 Now返回计算机系统的日期和时间.答案：N第10题（1.0分）题号:362属性是用来描述和反映对象特征的参数,不同的对象具有各自不同的属性,对象的所有属性都可以在属性窗口中设置.答案：N三、单项选择共20题（共计20分）第1题（1.0分）题号:855在逐行运行程序的语句时,可用调试窗口监视表达式和变量的值,其中()窗口是用来显示代码中正在调试的语句所产生的信息,或显示直接在该窗口中键入的命令所请求的信息.A:立即B:监视C:本地D:中断答案：A第2题（1.0分）题号:374下列可缩放图片的属性是().A:autosizeB:pictureC:stretchD:OleDrawMode答案：C第3题（1.0分）题号:860组合框的三种不同风格:下拉组合框、简单组合框和下拉列表框由()属性决定.A:StyleB:BoderStyleC:FillStyleD:DrawStyle答案：A第4题（1.0分）题号:2257在用菜单编辑器设计菜单时,必须输入的项有().A:快捷键B:标题C:索引D:名称答案：D第5题（1.0分）题号:358下列()是日期型常量.A:"2/1/02"B:37258C:#2/1/02#D:|2/1/02|答案：C第6题（1.0分）题号:349为了防止用户随意将光标置于控件上,应(). A:将控件的TABINDEX属性设置为0B:将控件的TABSTOP属性设置为TRUEC:将控件的TABSTOP属性设置为FALSED:将控件的ENABLED属性设置为FALSE答案：D第7题（1.0分）题号:3243属性窗口只能在使用.A:设计时B:编译时C:运行时D:以上都不对答案：A第8题（1.0分）题号:3412下面关于对象的描述中,错误的是().A:对象就是自定义结构变量B:对象代表正在创建的系统中的一个实体C:对象是一个状态和操作(或方法)的封装体D:对象之间的信息传递是通过消息进行的答案：A第9题（1.0分）题号:3442一句语句要在下一行继续写,续行符是(). A:+B:-C:_D:…答案：C第10题（1.0分）题号:3207设a="Visual Basic",下面使b="Basic"的语句是 .A:b=Left(a,8,12)B:b=Left(a,8,5)C:b=Mid(a,8,5)D:b=Right(a,5,5)答案：C第11题（1.0分）题号:2245结构化程序由三种基本结构组成,下面不属于三种基本结构之一的是().A:顺序结构B:选择结构C:过程结构D:循环结构答案：C第12题（1.0分）题号:377下列哪个变量的取法是不正确的().A:TNameB:T_TempC:T32D:T32#答案：D第13题（1.0分）题号:294改变控件在窗体中的左右位置应修改该控件的()属性.A:TopB:LeftC:WidthD:Right答案：B第14题（1.0分）题号:3538关于键盘事件的说法中,正确的是A:按下键盘任意键都会引发KeyPress事件B:大键盘的"1"键,和数字键盘的"1"键的KeyCode编码相同C:KeyDown 和 KeyUp事件过程中有KeyAscii参数D:大键盘的4的上档符号是$,当同时按下Shift 键和大键盘的4时,KeyPress事件过程KeyAscii参数值是$的Ascii值.答案：D第15题（1.0分）题号:3193下列程序段的运行结果.Private Sub Form_Click()Dim MsgHideMsg="选择'确定'按钮"MsgBox MsgShowEnd SubA:隐藏窗体,按'确定'按钮使窗体重现B:隐藏窗体C:显示窗体,按'确定'按钮使窗体隐藏D:显示窗体答案：A第16题（1.0分）题号:3233执行下面程序段后,变量c$的值为___ ___. a$= "Visual Basic Programming"b$= "Quick"c$=b$ & Ucase(Mid$(a$,7,6)) &Right$(a$,12)A:Visual BASIC ProgrammingB:Quick Basic ProgrammingC:QUICK Basic Programming D:Quick BASIC Programming答案：D第17题（1.0分）题号:2179当在滚动条内拖动滚块时触发()事件. A:KeyUpB:KeyPressC:ChangeD:Scroll答案：D第18题（1.0分）题号:3185函数Int(Rnd*11)+10产生的数值的范围是______.A:(0,10)B:[10,10]C:[10,20]D:(0,20)答案：C第19题（1.0分）题号:3254下面程序段输出的结果是Private Sub Command1_Click()x = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd SubA:X=210B:X=218C:X=50D:X=58答案：D第20题（1.0分）题号:3534执行指令"Line(1200,1200)-Step(1000,500),,B"后,CurrentX=A:2200B:1200C:1000D:1700答案：A四、程序设计共5题（共计50分）第1题（10.0分）题号:131'-------------------------------------------------'【程序设计】'-------------------------------------------------'题目：(事件)单击窗体。