【最全十年真题】更新至2011年9月!全国计算机等级考试二级VB试试题及答案.docx

上传人:无*** 文档编号:87073068 上传时间:2023-04-16 格式:DOCX 页数:244 大小:1.05MB
返回 下载 相关 举报
【最全十年真题】更新至2011年9月!全国计算机等级考试二级VB试试题及答案.docx_第1页
第1页 / 共244页
【最全十年真题】更新至2011年9月!全国计算机等级考试二级VB试试题及答案.docx_第2页
第2页 / 共244页
点击查看更多>>
资源描述

《【最全十年真题】更新至2011年9月!全国计算机等级考试二级VB试试题及答案.docx》由会员分享,可在线阅读,更多相关《【最全十年真题】更新至2011年9月!全国计算机等级考试二级VB试试题及答案.docx(244页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。

1、2002年9月全国计算机等级考试二级VB语言笔试试题及答案、选择题(每题2分,共70分)下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项涂写 在答题卡相应位置上,答在试卷上不得分。(1)在设计阶段,当双击窗体上的某个控件时,所打开的窗口是A)工程资源管理器窗口 B)工具箱窗口C)代码窗口 D)属性窗(2)以下叙述中正确的是A)窗体的Name属性指定窗体的名称,用来标识个窗体B)窗体的Name属性的值是显示在窗体标题栏中的文本C)可以在运行期间改变对象的Name属性的值D)对象的Name属性值可以为空(3)刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是A)单

2、选按钮B)图片框C)通用对话框D)文本框(4)设有如下变量声明Dim TestDate As Date为变量TestDate正确赋值的表达方式是A) TextDate=#1/l/2OO2# B) TestDate=# 1/1/2002 ” #C) TextDate=date( “ 1/1/2002”)D) TestDate=Format( “m/d/yy”,“V1/2OO2”)(5)设有如下声明:Dim X As Integer如果Sgn(X)的值为1,则X的值是A)整数B)大于的整数C)等于的整数D)小于的数(6)在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:Privat

3、e Sub Commandl_Click()Static X As IntegerStatic Y As IntegerCisY=1Y=Y+5X=5+XPrint X,YEnd Sub程序运行时,三次单击命令按钮Commandl后,窗体上显示的结果为A) 15 16 B) 15 6 C) 15 15 D) 5 6(7)设a=3,b=5,则以下表达式值为真的是A) a%26gt;=b And b%26gt;10 B) (a%26gt;b)0r(b%26gt;0)C) (a%26lt;)Eqv(b%26gt;) D) (-3+5%26gt;a)And(b%26gt;0)(8)设有语句x=lnput

4、Box( “输入数值,“ ”, 示例”)程序运行后,如果从键盘上输入数值10并按回车键,则下列叙述中正确的是A)变量X的值是数值10 B)在InputBox对话框标题栏中显示的是“示例”C) 是默认值D)变量X的值是字符串“10”(9)从键盘上输入两个字符串,分别保存在变量strl, str2中。确定第二个字符串在第 个字符串中起始位置的函数是A) Left B) Mid C) String D) Instr(10)设2= Visual Basic”,下面使 b= Basic” 的语句是A) b=Left(a,8,12) B) b=Mid(a,8,5)C) b=Rigth(a,5,5) D)

5、b=Left(a,8,5)(11)以下能够触发文本框Change事件的操作是A)文本框失去焦点B)文本框获得焦点C)设置文本框的焦点D)改变文本框的内容(12)在窗体上有一个文本框控件,名称为TxtTime: 个计时器控件,名称为Timerl, 要求每一秒钟在文本框中显示一次当前的时间。程序为:Private Sub Timerl_ ()TxtTime.text=TimeEnd Sub在下划线上应填入的内容是A) Enabled B) Visible C) Interval D) Timer(13)在窗体上画两个单选按钮,名称分别为Optionl、Option2,标题分别为宋体”和 “黑体”;

6、一个复选框,名称为Checkl,标题为“粗体”;个文本框,名称为Textl, Text属 性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中(窗体 外观如下图),则能够实现上述要求的语句序列是A) Optionl.value=True B) Optionl.Value=TrueCheckl.Value=False Checkl.Value=TrueC) Option2.Value=False D) Optionl.Value=TrueCheckl.Value=True Checkl.Value=l(14)为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把

7、该命令按钮的 个属性设置为True,这个属性是A) Value B) Default C) Cancel D) Enabled(15)在窗体上画一个命令按钮,名称为Command。然后编写如下程序:Private Sub Commandl_Click()For 1=1 To 4For J=0 To 1Print Chr$(65+I);Next JPrintNext IEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A) BB B) A C) B D) AACC BB CC BBBDDDD CCC DDD CCCCEEEEE DDDD EEEE DDDDD(16)图像框有一个属

8、性,可以自动调整图形的大小,以适应图像框的尺寸,这个属性A) Autosize B) StretchC) AutoRedraw D) Appearance(17)在窗体上画两个名称分别为Textl、Texte2的文本框和一个名称为Commandl的命 令按钮,然后编写如下事件过程:Private Sub Commandl_Click()Dim x As Integen As Integer x=l n=0Do While x10 Then xit for Next7extl.lext=Str(n) End Sub程序运行后,单击命令按钮,在文本框中显示的值是 A)2B)3D)4D)5(19)在

9、窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后 编写如下事件过程:Private Sub Commandl_Click()Dim arrayl(10z10) As Integer Dim i,j As IntegerFor i=l To 3 Forj=2To4 arrayl(ij)=i+j Next j Next ITextl.Textnarrayl(2,3)+arrayl(3,4) End Sub程序运行后,单击命令按钮,在文本框中显示的值是A) 12 B) 13 C) 14 D) 15(20)在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序

10、:Private Sub Commandl_Click()Dim i As Integer As IntegerDim a(10,10)As IntegerFor i=l To 3For j=l To 3a(i,j)=(i-l)*3+jPrint a(i,j);Next jPrintNext jEnd Sub程序运行后,单击命令按钮,窗体上显示的是A) 123 B) 234 C) 147 D) 123246 345 258 456369 456 369 789(21)设有如下程序:Option Base 0Private Sub Form_Click()Dim aDim i As Intege

11、ra 二 Array(l,2,3,4,5,6,7,8,9)For i=0 To 3Print a(5-i);NextEnd Sub程序运行后,单击窗体,则在窗体上显示的是A) 4321 B) 5432 C) 6543 D) 7654(22)下列叙述中正确的是A)在窗体的Form_Load事件过程中定义的变量是全局变量B)局部变量的作用域可以超出所定义的过程C)在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但 其作用域只限于该过程D)在调用过程时,所有局部变量被系统初始化为或空字符串(23)在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,

12、则显示个输入对话框,在该对话框中输入个整数,并用这个整数作为实参调用函数过程 F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回。能 够正确实现上述功能的代码是A) Private Sub Commandl_Click()x=lnputBox(请输入整数”)a=Fl(Val(x)Print aEnd SubFunction Fl(ByRef b As Integer)If b Mod 2=0 ThenReturn 0日seReturn 1End IfEnd FunctionB) Private Sub Commandl_Click() x=lnputBox(“请输入

13、整数”) a=Fl(Val(x)Print aEnd SubFunction Fl(ByRef b As Integer)If b Mod 2=0 ThenFl=0日seFl=lEnd IfEnd FunctionC) Private Sub Commandl_Click() x=l n put B ox(请输入整数”) Fl(Val(x)Print aEnd SubFunction Fl(ByRef b As Integer)If b Mod 2=0 ThenFl=lElseFl=0End IfEnd FunctionD) Private Sub Commandl_Click() x二lnp

14、utBox(“请输入整数”) Fl(Val(x)Print aEnd SubFunction Fl(ByRef b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd Function(24)在窗体上画一个名称为Commandl的命令按钮和一个名称为Textl的文本框,然后 编写如下程序:Private Sub Commandl_Click()Dim x,y,z As Integerx=5y=7z=0Textl.text二 “Call Pl(x,y,z)Textl.Text=Str(x)End SubSub Pl(ByVal a

15、As Integer By Vai b As Integer,c As Integer)c=a+bEnd Sub程序运行后,如果单击命令按钮,则在文本框中显示的内容是A) 0 B) 12 C) Str(z) D)没有显示(25)以下叙述中错误的是A)如果过程被定义为Static类型,则该过程中的局部变量都是Static类型B) Sub过程中不能嵌套定义Sub过程C) Sub过程中可以嵌套调用Sub过程D)事件过程可以像通用过程一样由用户定义过程名(26)以下叙述中错误的是A)在Key Up和KeyDown事件过程中,从键盘上输入A或a被视作相同的字母(即具有 相同的KeyCode)B)在Key

16、Up和KeyDown事件过程中,将键盘上的“1”和右侧小键盘上的“1”视作不 同的数字(具有不同的KeyCode)D) KeyPress事件中不能识别键盘上某个健的按下与释放E) KeyPress事件中可以识别键盘上某个键的按下与糅放(27)以下叙述中错误的是A)在同一窗体的菜单项中,不允许出现标题相同的菜单项B)在菜单的标题栏中,26”所引导的字母指明了访问该菜单项的访问键C)程序运行过程中,可以重新设置菜单的Visible属性D)弹出式菜单也在菜单编辑器中定义(28)设在菜单编辑器中定义了一个菜单项,名为menul。为了在运行时隐藏该菜单项, 应使用的语句是A) menul.Enabled

17、=True B) Munul.Enabled=FalseC) Menul.Visible=True D) Menul.Visible=False(29)以下叙述中错误的是A)在程序运行时,通用对话框控件是不可见的B)在同一个程序中,用不同的方法(如ShowOpen或ShowSave等)打开的通用对话框 具有不同的作用调用通用对话框控件的ShowOpen方法,可以直接打开在该通用对话框中指定的文 件D)调用通用对话框控件的ShowColor方法,可以打开颜色对话框(30)在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件 列表框所列出的文件类型是文本文件(即,txt文件),则

18、正确的描述格式是A) “text (.txt)|(*.txt)” B)“文本文件(.txt) I (.txt)”C) “text(.txt)| |(*.txt)” D) “text(.txt)(*.txt)”(31)以下叙述中错误的是A) 个工程中只能有一个Sub Main过程B)窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体C)窗体的Hide方法和Unload方法的作用完全相同D)若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体(32)以下叙述中错误的是A) 个工程中可以包含多个窗体文件B)在一个窗体文件中用Private定义的通用过程能被其他窗体调用C)在设计VB程序

19、时,窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文 件D)全局变量必须在标准模块中定义(33)设在工程中有一个标准模块,其中定义了如下记录类型Type BooksName As String *10TelNum As String *20End Type在窗体上画一个名为Commandl的命令按钮。要求当执行事件过程Commandl_Click时, 在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是A) Private Sub Commandl_Click()Dim B As BooksOpen c:Person.txt” For Output As #1B.

20、Name=lnputBox(输入姓名”)B.TelNum=lnputBox(输入电话号码”)Write #l,B.Name,B.TelNumClose #1End SubB) Private Sub Commandl_Click()Dim B As BooksOpen c:Person.txt” For Input As #1B.Name=lnputBox(输入姓名)B.TelNum=lnputBox(输入电话号码”)Print #l,B.Name,B.TelNumClose #1End SubC) Private Sub Commandl_Click()Dim B As BooksOpen

21、c:Person .txt ” For Output As #1B.Name=lnputBox(输入姓名”)B.TelNum=lnputBox(输入电话号码”)Write #1,BClose #1End SubD) Private Sub Commandl_Click()Open c:Person.txt” For Input As #1Name=lnputBox(输入姓名)TelNum=lnputBox(输入电话号码”)Print #l,Name/TelNumClose #1End Sub(34)以下叙述中正确的是A) 个记录中所包含的各个元素的数据类型必须相同B)随机文件中每个记录的长度是

22、固定的C) Open命令的作用是打开个已经存在的文件D)使用Input#语句可以从随机文件中读取数据(35)目录列表框的Path属性的作用是A)显示当前驱动器或指定驱动器上的目录结构B)显示当前驱动器或指定驱动器上的某目录下的文件名C)显示根目录下的文件名D)显示该路径下的文件二、填空题(每空2分,共40分)请将每空的正确答案写在答题卡(1)至(15)的横线上,答在试卷上不得分。(1)在窗体上画两个标签,其名称分别为Labell和Label2,Caption属性分别为“数值” 及空白;然后画一个名称为Hscolll的水平滚动条,其Min的值为0, Max的值为100。程 序运行后,如果单击滚动

23、条两端的箭头,则在标签Lable2中显示滚动条的值,如图所示。 请在1和2处填入适当的内容,将程序补充完整。Private Sub HScrolll_ 1()Labl2.Caption=HScrolll. 2End Sub(2)在窗体上画一个名称为Command人标题为“计算”的命令按钮:画两个文本框, 名称分别为Textl和Text2:然后画4个标签,名称分别为Labell、Label2、Label3和Label% 标题分别为“操作数1”、“操作数2”、“运算结果”和空白;再建立一个含有4个单选按纽 的控件数组,名称为Option1,标题分别为“ +和“/。程序运行后,在Textl、Text

24、2中输入两个数值,选中一个单选按钮后单击命令按钮,相应的计算结果显示在Label% 程序运行情况如图所示。请在3 , 4和处填入适当的内容,将程序补充完整。Private Sub Commandl_Click()For i=0 To 3If 3 =True then opt=Optionl(i).Caption End If NextSelect Case 4Case +”Result=Val(Textl.Text)+Val(Text2.Text) CaseResult=Val(Textl.Text)-Val(Text2.Text) Case *Result=Val(7ext.Text)*Va

25、l(Text2.Text) Case /Result=Val(Textl.Text)/Val(Text2.Text) End Select 5 =ResultEnd Sub(3)在窗体上画一个名称为Commandl的命令按钮和一个名称为Textl的文本框。程序 运行后,Commandl为禁用(灰色)。当向文框中输入任何字符时,命令按钮Command!变 为可用。请在6处填入适当的内容,将程序补充完整。Private Sub Form Load() Commandl.Ena bled=False End SubPrivate Sub Textl_ 6( )Commandl.Enabled=Tru

26、e End Sub(4)在菜单编辑器中建立了一个菜单,名为pmenu,用下面的语句可以把它作为弹出式 菜单弹出,请填空。Forml. 7 Pmenu(5)以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时结束输入, 然后输出其中的最高分数和最低分数。请在和9处填入适当的内容,将程序补充完 整。Private Sub Form_Click()Dim x As Single,amax As Single,amin As Single x=lnputBox( Enter a score”) amax=x amin=x Do While 8 If xamax Then Amax=x En

27、d If If 9Then Amin=xEnd Ifx=lnputBox( Enter a score )LoopPrint” Max二“;amax, Min= ;aminEnd Sub(6)在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:Private Sub Form_Load()Textl.Text二”计算机”End SubPrivate Sub 7extl_Change()Picturel.Print “等级考试”End Sub程序运行后,在文本框中显示的内容是10,而在图片框中显示的内容是11I。(7)在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:F

28、unction M(x As Integer As lnteger)As IntegerM=llf(xy,x/y)End FunctionPrivate Sub commandl_Click()Dim a As lnteger;b As Integera=100b=200Print M(a,b)End Sub程序运行后,单击命令按钮,输出结果为12 (8)为了改变计时器控件的时间间隔,应该修改该控件的13属性。(9)在窗体上画一个名称为Lablel的标签和一个名称为Listl的列表框。程序运行后, 在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Labell中显示所选中 的项目,如

29、图所示。请在14和15处填入适当的内容将程序补充完整。Private Sub Form_load()Listl.Additemw 北京”List 1. Add Item w 上海”Listl. Add Item“湖北”End SubPrivate Sub 14()Labell.Caption= 15End Sub2002年9月全国计算机等级考试二级VB试卷答案、选择题:110 CACADBBDDB1120DDDCABBBAD2130CCB B DCADCA3135 CB AD A二、填空题:1、CHANGE 2 VALUE 3、0PTI0N1 (I) .VALUE 4、OPT5、LABEL4a

30、 CAPTION 6 CHANGE 7 POPUPMENU 8. X%26gt;=09、X 14、LIST1_DBLCLICK 15 LIST1.TXT2003年4月全国计算机等级考试二级VB语言笔试试题及答案、选择题(1)(20)每小题2分,(21)(30)每小题3分,共30题,70分)下列各题A)、B)、, D)四个选项中,只有一个选项是正确的,请将正确选项涂 在答题卡的相应位置上,答在试卷上不得分。(1)以下不能在“工程资源管理器”窗口中列出的文件类型是A), bas B). res C). fnn D). ocx(2)以下关于窗体的描述中,错误的是A)执行UnloadFoMI语句后,窗

31、体Fonnl消失,但仍在内存中B)窗体的load事件在加载窗体时发生C)当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被禁止D)窗体的Height, width属性用于设置窗体的高和宽(3)下列可作为V2sualBasic变量名的是A)A#A B)4A C)?xY D)constA(4)设有如下的记录类型Type StudentnumberAs stringname As Stringage As IntegerEnd Type则正确引用该记录类型变量的代码是A) Student. name=张红B) Dim As Students. name=张红C) Dim s A

32、s Type Student D) Dim s As TypeS. name= 张红” s.Dame= 张红”(5)函数String(n, str”)的功能是A)把数值型数据转换为字符串B)返回由n个字符组成的字符串C)从字符串中取出n个字符D)从字符串中第n个字符的位置开始取子字符串(6)将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式,其正确的形式是A)Cos(a+b)A2 十 5 exp(2) B)CosA2(a+b)+5*exp(2)C)Cos(a+b)A2 十 5*ln(2) D)CosA2(a+b)+5*ln(2)(7)在窗体上画一个命令按钮,名称为Com

33、mand単击命令按钮时,执行如下事件过 程:Private Sub CommandlClickoa$=software and hardwareb$=Right(a$,8)c$=Mid(a$,l, 8)Msgbox a$b$,c$,lEnd Sub则在弹出的信息框的标题栏中显示的信息是A)softWare and hardware B)software C)hardwafe D)1执行如下语句:a = inutBox( Today , Tomorrow, Yesterday ,Day before yesterday, 5)将显示个输入对话框,在对话框的输入区中显示的信息是A)Today B)

34、Tomorrow C)Yesterday D)Day before yesterday(9)表示滚动条控件取值范围最大值的属性是A)Max B)LargeChange C)Value D)Max一Min(10)在窗体上画一个名称为Listl的列表框,一个名称为Labell的标签。列表框中显示 若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。 下列能止确实现上述功能的程序是A) Private Sub listl_Click() B)Private Sub Listl_Click()Labell. Caption = listl.listindex Labell. Na

35、nle=Listl. listindexEnd Sub . End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A)空白B)错误提示C)北京D)上海(15)假定有以下函数过程:Function Fun(S As String) As StringDim si As StringFor i=l lb Len(S)sl=UCase(Mid(S, i, 1)十 sCNext iFun = slEnd Function在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commmldl_Click()Dim Strl As String, Str2 As StringS

36、trl = inputbox(请输入一个字符串”)Str2=Fun(Strl)Print Str2End Sub程序运行后,单击命令按钮,如果在输入对话框中输入字符串“ abcdefg,则单击“确 定按钮后在窗体上的输出结果为A)abcdefg B)ABCDEFG C)gfedcba D)GFEDCBA(16)设有语句open c: Test. Dat For Output As#l则以下错误的叙述是A)该语句打开C盘根目录下一个己存在的文件Test. DatB)该语句在C盘根目录下建立一个名为Test. Dat的文件C)该语句建立的文件的文件号为1D)执行该语句后,就可以通过Print#语句

37、向文件Test. Dat中写入信息(17)以下叙述中错误的是A)用Shell函数可以调用能够在Windows下运行的应用程序B)用Shell函数可以调用可执行文件,也可以调用VisualBasic的内部函数C)调用Shell函数的格式应为:变量名=Shell()D)用Shell函数不能执行DoS命令(18)以下关于过程及过程参数的描述中,错误的是A)过程的参数可以是控件名称B)用数组作为过程的参数时,使用的是“传地址”方式 c)只有函数过程能够将过程中处理的信息传回到调用的程序中 D)窗体可以作为过程的参数(19)在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:Private S

38、ub Txta_KeyPress(keyascii as integer)End Sub若焦点位于文本框中,则能够触发KeyPress事件的操作是A)单击鼠标B)双击文本框C)鼠标滑过文本框D)按下键盘上的某个键(20)目录列表框的Path属性的作用是A)显示当前驱动器或指定驱动器上的路径B)显示当前驱动器或指定驱动器上的某目录下的文件名c)显示根目录下的文件名D)只显示当前路径下的文件(21)假定有如下事件过程:Private Sub Form_MouseDown(button As Integer,Shift As Integer, x As Single, Y As Single)If

39、Button=2 thenPopupMenu popFormEnd ifEnd Sub则以下描述中错误的是A)该过程的功能是弹出个菜单B)popForm是在菜单编辑器中定义的弹出式菜单的名称C)参数X、Y指明鼠标的当前位置D)Button=2表示按下的是鼠标左键(22)以下能够正确计算n!的程序是二级Visual Basic语言程序设计试卷第5页(共15页)A) Private Sub Commandl_ClicK()n = 5:x=lDoX=x*li = i 十 1Loop While inPrint xEnd SubB) Private Sub Commandl_Click()n = 5:

40、 x=l: i=lDoX=X*1i=i 十 1Loop While inPrint xEnd SubC)Private Sub Commandl_Click()n=5: x=l: i = lDoX=X*1i = i 十 1Loop while inPrint xEnd Sub(23)在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Label2 的标签,然后编写如下程序代码:.二级vIsudBM5c语言程序设计试卷第6页(共15页)Private x As IntegerPrivate Sub Command!一Click()X=5: Y=3Call proc(x

41、,Y)Labell. Caption=XLabel2. Caption =YEnd SubPrivate Sub proc(ByVal a As Integer, By Vai b As hteger)x=a* aY=b 十 bEnd Sub程序运行后,单击命令按钮,则两个标签中显示的内容分别是A)5 和 3 B)25 和 3 C)25 和 6 D)5 和 6(24)在窗体上画一个名称为Commandl的命令按钮,个名称为Label!的标签,然后 编写如下事件过程:Private Sub Commandl_Click()S=0Fori = lTO 15x=2*i 1If x Mod 3=0 T

42、hen s=s 十 1NextiLabell. Caption=s End Sub.程序运行后,单击命令按钮,则标签中显示的内容是A)1 B)5 C)27 D)45(25)在窗体上画一个名称为Commandl的命令按钮和三个名称分别为Labell, Label2、 Label3的标签,然后编写如下代码:Private x As IntegerPrivate Sub Commandl_Click()Static y As Integer Dimz As Integer n=10 z=n 十 z y=y + z x=x 十 zLabell.Caption=xLabel2. Caption=yLab

43、el3. Caption =z End Sub 运行程序,连续三次单击命令按钮后,则三个标签中显示的内容分别是A)10 10 10 B)30 30 30 C)30 30 10 D)10 30 30(26)设在窗体上有一个名称为 Commandl 的 命令按钮,并有以下事件过程:Private Sub Commandl_Click() Static b As Variantb=Array(l,3,5,7,9) End Sub此过程的功能是把数组b中的5个数逆序存放(即排列为9, 7, 5, 3, 1)为实现此功 能,省略号处的程序段应该是A)For i = 0To5-l2 tmp=b(i) b(

44、i) = b(5-i-l) b(5-i-l)=tmp NextB)for i=OTo5 tmp=b(i) b(i) = b(5-i-l) b(5-i-l)=tmp NextC) Fori=0T0 52 tmp = b(i) b(i) = b(5-i-l) b(5-i-l); tmpNextD)For i = lT0 52tmp=b(i)b(i) = b(5 LI)b(5-i-1) =tmpNext二级VlsualBM5c语言程序设计试卷第8页(共15页)(27)在窗体上画一个名称为Drivel的驱动器列表框,个名称为Did的目录列表框,一 个名称为Filel的文件列表框,两个名称分别为Labell、Label2,标题分别为空白和“共有文 件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变 化,并且在标签Labell中显示当前文件夹中文件的数量。如图所示。能够正确实现上述功能的程序是A) Private Sub Dirl_Change() B)Private Sub Dirl_Change()Filel. Path=

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 教育专区 > 教案示例

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知得利文库网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号-8 |  经营许可证:黑B2-20190332号 |   黑公网安备:91230400333293403D

© 2020-2023 www.deliwenku.com 得利文库. All Rights Reserved 黑龙江转换宝科技有限公司 

黑龙江省互联网违法和不良信息举报
举报电话:0468-3380021 邮箱:hgswwxb@163.com