【计算机类职业资格】二级VISUAL+BASIC笔试-361及答案解析.doc

上传人:fatcommittee260 文档编号:1327860 上传时间:2019-10-17 格式:DOC 页数:13 大小:72.50KB
下载 相关 举报
【计算机类职业资格】二级VISUAL+BASIC笔试-361及答案解析.doc_第1页
第1页 / 共13页
【计算机类职业资格】二级VISUAL+BASIC笔试-361及答案解析.doc_第2页
第2页 / 共13页
【计算机类职业资格】二级VISUAL+BASIC笔试-361及答案解析.doc_第3页
第3页 / 共13页
【计算机类职业资格】二级VISUAL+BASIC笔试-361及答案解析.doc_第4页
第4页 / 共13页
【计算机类职业资格】二级VISUAL+BASIC笔试-361及答案解析.doc_第5页
第5页 / 共13页
点击查看更多>>
资源描述

1、二级 VISUAL+BASIC 笔试-361 及答案解析(总分:100.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.执行如下语句: a=InputBox(“Today“,“Tomorrow“,“Yesterday“,“Day before yesterday“,5) 将显示一个输入对话框,在对话框的输入区中显的信息是( )。(分数:2.00)A.TodayB.TomorrowC.YesterdayD.Daybeforeyesterday2.下列命令按钮事件过程执行后,输出结果是( )。 Form=1 To 1000Step2 a=10 Forn=1 To

2、20 Step2 a=a+2 Nextn Nextm Printa(分数:2.00)A.1200B.10000C.30D.203.下面的程序运行结果是( )。 Private Sub Form_Click() I=0 DoUntil0 i=i+1 if i10 then Exit Do Loop Printi End Sub(分数:2.00)A.0B.10C.11D.出错4.有如下程序,该段程序将( )。 Fori=1 to 10 Step0 k=k+2 Nexti(分数:2.00)A.形成无限循环B.循环体执行一次后结束循环C.语法错误D.循环体不执行即结束循环5.下列程序运行时输出的结果是

3、( )。 Option Base 1 Private Sub Form_Click() Dimx(10) ForI=1 to 10 x(i)=10-I+1 Next I ForI=10 to 1 step-2 Printx(i); NextI End Sub(分数:2.00)A.1 3579B.975 3 1C.1234567 89 10D.1098765432 16.运行以下程序后,输出的图案是( )。 Form1.ClS A$=Strillg$(10,“*”) Fori=1 To 5 n=10-2*I X$=A$:Y$=Space$(n) Mid$(X$,i+1,n)=Y$ PrintX$

4、 Nexti (分数:2.00)A.B.C.D.7.VisualBasic 采用了( )编程机制。(分数:2.00)A.面向过程B.面向对象C.事件驱动D.可视化8.下面有关注释语句的格式,错误的是( )。(分数:2.00)A.Rem 注释内容B.注释内容C.a=3:b=2对 a、b 赋值D.Private Sub Cpmmandl_Mouse Down(button As Integer,Shin As Integer,Rem 鼠标按下事件的命令调用过程 X As Single,Y As Singl9.fileFiles.Pattem=“*.dat“程序代码执行后,会显示( )。(分数:2.

5、00)A.只包含扩展名为“*.dat“的文件B.第一个 dat 文件C.包含所有的文件D.会显示磁盘的路径10.下列不能打开菜单编辑器的操作是( )。(分数:2.00)A.按 Ctrl+EB.单击工具栏中的“菜单编辑器”按钮C.执行“工具”菜单中的“菜单编辑器”命令D.按 Shift+Alt+M11.在深度为 7 的满二叉树中,叶子结点的个数为( )(分数:2.00)A.32B.31C.64D.6312.退出 VB6.0 的快捷键是( )。(分数:2.00)A.Ctrl+QB.Alt+QC.Alt+AD.Ctrl+A13.以下是 MDI 子窗体在运行时特性的叙述,错误的是( )。(分数:2.0

6、0)A.子窗体在 MDI 窗体的内部区域显示B.子窗体可在 MDI 窗体的外部区域显示C.当子窗体最小化时,它的图标在 MDI 窗体内显示D.当子窗体最大化时,其标题与 MDI 窗体标题合并,并显示在 MDI 窗体的标题栏中14.下列描述中正确的是( )。(分数:2.00)A.程序就是软件B.软件开发不受计算机系统的限制C.软件既是逻辑实体,又是物理实体D.软件是程序、数据与相关文档的集合15.任何控件都具有( )属性。(分数:2.00)A.TextB.CaptionC.NameD.ForeColor16.给文件改名的 VB 语句正确的是( )。(分数:2.00)A.Name 原文件名 To

7、新文件名B.Rename 原文件名 To 新文件名C.Name 原文件名 as 新文件名D.Rename 原文件名 as 新文件名17.假设变量 boolVar 是一个布尔型变量,则下面正确的赋值语句是 )。(分数:2.00)A.boolVar=TrueB.boolVar=.TruC.boolVar=#gTme#D.boolVar=3418.常用控件的 Style 属性值是( )。(分数:2.00)A.字符常量B.逻辑常量C.数值常量D.日期常量19.数据库 DB、数据库系统 DBS、数据库管理系统 DBMS 之间的关系是( )。(分数:2.00)A.DB 包含 DBS 和 DBMSB.DBM

8、S 包含 DB 和 DBSC.DBS 包含 DB 和 DBMSD.没有任何关系20.在窗体上画一个名称为 List1 的列表框,一个名称为 Labe11 的标签,列表框中显示若干城市的名称。当单击列表框中的某个城市名时,该城市名从列表框中消失,并在标签中显示出来。下列能正确实现上述操作的程序是( )。 (分数:2.00)A.B.C.D.21.VisualBasic 布尔运算符 Xor,Or,Eqv,And 中,级别最高的运算符是( )。(分数:2.00)A.XorB.OrC.EqvD.And22.下列程序的输出结果是( )。 Dima a=Array(1,2,3,4,5,6,7,8) i=0

9、ForK=100 To 90 Step-2 s=a(i)2 If a(i)3 Then Exit For i=i+1 Nextk Printk;a(i);s(分数:2.00)A.88 6 36B.88 1 2C.90 2 4D.94 4 1623.下列程序的执行结果为( )。 Ptivate Sub Command_Click() DimFirStr As String FirStr=“abcdef“ PrintPat(FirSb) End Sub PrivateFunctionPat(xStr As String)As String DimtempStr As String,strLen A

10、s Integer tempStr=“ strLen=Len(xStr) i=1 DoWhile i=Len(xStr)-3 tempStr=tempSlx+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop Pat=tempStr End Function(分数:2.00)A.abcdefB.afbecdC.fedcbaD.defabc24.能够改变窗体边框线类型的属性是( )。(分数:2.00)A.Font SyleB.Border StyleC.Back StyleD.Border25.如果要改变窗体的标题,则需要设置的属性是( )。(分数:2

11、.00)A.CaptionB.NameC.BackColorD.Borderstyle26.结构化程序设计主要强调的是( )。(分数:2.00)A.程序的规模B.程序的效率C.程序设计语言的先进性D.程序易读性27.下列语句的输出结果为( )。 PrintFormat$(5689.36,“000,000.000“)(分数:2.00)A.5,689.36B.5,689.360C.5,689.3D.005,689.36028.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Funcdonf(m As Integer) If m Mod

12、2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i) Next PrintS End Sub 程序运行后,单击命令按钮,在窗体上显示的是( )。(分数:2.00)A.11B.10C.9D.829.如果一个变量未经定义就直接使用,则该变量的类型为( )。(分数:2.00)A.IntegerB.ByteC.BooleanD.Variant30.设 A$=“Hello“,下列语句正确的是( )。(分数:2.00)A.Labe11.Hi

13、ght=Labe11.Hight+A$B.Labe11.Caption=Labe11.Caption+A$C.Labe11.Enabled=Laabe11.Enabled+A$D.Labe11.Visible=Labe11.Visible+AS31.如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是( )。(分数:2.00)A.如果工程中含有 Sub Main 过程,则程序一定首先执行该过程B.不能把标准模块设置为启动模块C.用 Hide 方法只是隐藏一个窗体,不能从内存中清除该窗体D.任何时刻最多只有一个窗体是活动窗体32.只有将组合框的 Style 属性设置为( )值时,才能触发 D

14、blClick 事件。(分数:2.00)A.0B.1C.2D.333.设有命令按钮 Commandl 的单击事件过程,代码如下: Private Sub Commandl_Click() Dima(30)As Integer Fori=1 To 30 a(i)=Int(Rnd*100) Next For Each arrltem In a IfarrltemMod7=0 ThenPrintarrItem; Ifarrltem90ThenExitFor Next End Sub 对于该事件过程,以下叙述中错误的是( )。(分数:2.00)A.a 数组中的数据是 30 个 100 以内的整数B.语

15、句 ForEacharrItem Ina 有语法错误C.Ifarrltem Mod7=0语句的功能是输出数组中能够被 7 整除的数D.Ifarrltem90语句的作用是当数组元素的值大于 90 时退出 For 循环34.设已经在窗体上添加了一个通用对话框控件 CommonDialogl,以下正确的语句是( )。(分数:2.00)A.CommonDialog1.Filter=-ALLLFiles*| Pictures(*.Bm|*.BmpB.CommonDialoS1.Filter=“ALLLFiles“|*.*|“Pictures(*.Bm“|*.BmpC.CommonDialog1.Filt

16、er=ALLLPUesI*I Pictures(*.Bm|*.BmD.ComlnonDialog1. Filter=“ALLLPdes|*.*|Pictures(*.Bm|*.Bmpn35.在窗体上画一个名称为 Filel 的文件列表框,并编写如下程序: Private Sub FUel_DblClick() x=Shell(File1_ileName,1) End Sub 以下关于该程序的叙述中,错误的是( )。(分数:2.00)A.x 没有实际作用,因此可以将该语句写为:Call Shell(FileFileName,1)B.双击文件列表框中的文件,将触发该事件过程C.要执行的文件的名字通

17、过 File1.FileName 指定D.Ffle1 中显示的是当前驱动器、当前目录下的文件二、B填空题/B(总题数:13,分数:30.00)36.在程序中使用日期型数据时,必须用符号 1 将日期型数据括起来。(分数:2.00)填空项 1:_37.将一般窗体转换为 MDI 窗体的子窗体时要把 MDIChild 属性设置为 1。(分数:2.00)填空项 1:_38.在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块(桩模块)。其中 1 的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。(分数:2.00)填空项 1:_39.设有以下函数过程: Functi

18、ofun(m As Integer)As Integer Dimk As Integer,sum As Integer sum=0 Fork=m To 1 Step-2 sum=sum+k Nextk fun=sum End Function 若在程序中用语句 s=fun(10)调用此函数,则 s 的值为_。(分数:2.00)填空项 1:_在对象的 MouseDown 和 MouseUp 事件过程中,参数 Button 的值为 1、2、4 时,分别代表按下鼠标的左键、U 5 /U和U 6 /U按钮。(分数:4.00)(1).(分数:2.00)填空项 1:_40.对象的方法是指 1。(分数:2.

19、00)填空项 1:_41.计时器事件时间的间隔通过 1 属性设置。(分数:2.00)填空项 1:_42.在代码窗口中输入某行代码并按回车键后,如果代码变成红色,表示 1。(分数:2.00)填空项 1:_43.在窗体上画 1 个命令按钮和 1 个文本框,其名称分别为 Commandl 和 Textl,然后编写如下代码: Dim Save All As String Private Sub Commandl_C1iCk() Text1.Text=Left(UCase(SaveAU),4) End Sub Private Sub Textl_KeyPress(KeyAscii As Intege)

20、SaveA11=Save All+Chr(KeyAscii) End Sub 程序运行后,在文本框中输入 abcdefg,单击命令按钮,则文本框中显示的内容是_。(分数:2.00)填空项 1:_44.下列程序段的运行结果是_。 Dimnum As Integer,a As Integer,b As Integer a=88:b=24 Do While b0 num=a Modb a=b b=num Wend Printa Loop(分数:2.00)填空项 1:_45.若要求输入密码时文本框中只显示“*”号,则应当在文本框的属性窗口中设置 1 属性。(分数:2.00)填空项 1:_46.设置状态

21、栏控件的 1 属性可以改变状态栏在窗体上的位置。(分数:2.00)填空项 1:_下列过程的功能是:在对多个文本框进行输入时,对第 1 个文本框(text1)输入完毕后用回车键使焦点跳到第 2 个文本框(text2),而不是 Tab 键来切换。请完成该程序。Private Sub Textl_(eyDown(Keycode As Integer,Shift As Integer)IfU 14 /UThenText2.U 15 /UEnd IfEnd Sub(分数:4.00)(1).(分数:2.00)填空项 1:_二级 VISUAL+BASIC 笔试-361 答案解析(总分:100.00,做题时间

22、:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.执行如下语句: a=InputBox(“Today“,“Tomorrow“,“Yesterday“,“Day before yesterday“,5) 将显示一个输入对话框,在对话框的输入区中显的信息是( )。(分数:2.00)A.TodayB.TomorrowC.Yesterday D.Daybeforeyesterday解析:2.下列命令按钮事件过程执行后,输出结果是( )。 Form=1 To 1000Step2 a=10 Forn=1 To 20 Step2 a=a+2 Nextn Nextm Printa(分数:2.

23、00)A.1200B.10000C.30 D.20解析:3.下面的程序运行结果是( )。 Private Sub Form_Click() I=0 DoUntil0 i=i+1 if i10 then Exit Do Loop Printi End Sub(分数:2.00)A.0B.10C.11D.出错 解析:4.有如下程序,该段程序将( )。 Fori=1 to 10 Step0 k=k+2 Nexti(分数:2.00)A.形成无限循环 B.循环体执行一次后结束循环C.语法错误D.循环体不执行即结束循环解析:5.下列程序运行时输出的结果是( )。 Option Base 1 Private

24、Sub Form_Click() Dimx(10) ForI=1 to 10 x(i)=10-I+1 Next I ForI=10 to 1 step-2 Printx(i); NextI End Sub(分数:2.00)A.1 3579 B.975 3 1C.1234567 89 10D.1098765432 1解析:6.运行以下程序后,输出的图案是( )。 Form1.ClS A$=Strillg$(10,“*”) Fori=1 To 5 n=10-2*I X$=A$:Y$=Space$(n) Mid$(X$,i+1,n)=Y$ PrintX$ Nexti (分数:2.00)A. B.C.

25、D.解析:7.VisualBasic 采用了( )编程机制。(分数:2.00)A.面向过程B.面向对象C.事件驱动 D.可视化解析:8.下面有关注释语句的格式,错误的是( )。(分数:2.00)A.Rem 注释内容B.注释内容C.a=3:b=2对 a、b 赋值D.Private Sub Cpmmandl_Mouse Down(button As Integer,Shin As Integer,Rem 鼠标按下事件的命令调用过程 X As Single,Y As Singl 解析:9.fileFiles.Pattem=“*.dat“程序代码执行后,会显示( )。(分数:2.00)A.只包含扩展名

26、为“*.dat“的文件 B.第一个 dat 文件C.包含所有的文件D.会显示磁盘的路径解析:10.下列不能打开菜单编辑器的操作是( )。(分数:2.00)A.按 Ctrl+EB.单击工具栏中的“菜单编辑器”按钮C.执行“工具”菜单中的“菜单编辑器”命令D.按 Shift+Alt+M 解析:11.在深度为 7 的满二叉树中,叶子结点的个数为( )(分数:2.00)A.32B.31C.64 D.63解析:12.退出 VB6.0 的快捷键是( )。(分数:2.00)A.Ctrl+QB.Alt+Q C.Alt+AD.Ctrl+A解析:13.以下是 MDI 子窗体在运行时特性的叙述,错误的是( )。(分

27、数:2.00)A.子窗体在 MDI 窗体的内部区域显示B.子窗体可在 MDI 窗体的外部区域显示 C.当子窗体最小化时,它的图标在 MDI 窗体内显示D.当子窗体最大化时,其标题与 MDI 窗体标题合并,并显示在 MDI 窗体的标题栏中解析:14.下列描述中正确的是( )。(分数:2.00)A.程序就是软件B.软件开发不受计算机系统的限制C.软件既是逻辑实体,又是物理实体D.软件是程序、数据与相关文档的集合 解析:15.任何控件都具有( )属性。(分数:2.00)A.TextB.CaptionC.Name D.ForeColor解析:16.给文件改名的 VB 语句正确的是( )。(分数:2.0

28、0)A.Name 原文件名 To 新文件名B.Rename 原文件名 To 新文件名C.Name 原文件名 as 新文件名 D.Rename 原文件名 as 新文件名解析:17.假设变量 boolVar 是一个布尔型变量,则下面正确的赋值语句是 )。(分数:2.00)A.boolVar=TrueB.boolVar=.TruC.boolVar=#gTme#D.boolVar=34 解析:18.常用控件的 Style 属性值是( )。(分数:2.00)A.字符常量B.逻辑常量C.数值常量 D.日期常量解析:19.数据库 DB、数据库系统 DBS、数据库管理系统 DBMS 之间的关系是( )。(分数

29、:2.00)A.DB 包含 DBS 和 DBMSB.DBMS 包含 DB 和 DBSC.DBS 包含 DB 和 DBMS D.没有任何关系解析:20.在窗体上画一个名称为 List1 的列表框,一个名称为 Labe11 的标签,列表框中显示若干城市的名称。当单击列表框中的某个城市名时,该城市名从列表框中消失,并在标签中显示出来。下列能正确实现上述操作的程序是( )。 (分数:2.00)A.B.C. D.解析:21.VisualBasic 布尔运算符 Xor,Or,Eqv,And 中,级别最高的运算符是( )。(分数:2.00)A.XorB.OrC.EqvD.And 解析:22.下列程序的输出结

30、果是( )。 Dima a=Array(1,2,3,4,5,6,7,8) i=0 ForK=100 To 90 Step-2 s=a(i)2 If a(i)3 Then Exit For i=i+1 Nextk Printk;a(i);s(分数:2.00)A.88 6 36B.88 1 2C.90 2 4D.94 4 16解析:23.下列程序的执行结果为( )。 Ptivate Sub Command_Click() DimFirStr As String FirStr=“abcdef“ PrintPat(FirSb) End Sub PrivateFunctionPat(xStr As St

31、ring)As String DimtempStr As String,strLen As Integer tempStr=“ strLen=Len(xStr) i=1 DoWhile i=Len(xStr)-3 tempStr=tempSlx+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop Pat=tempStr End Function(分数:2.00)A.abcdefB.afbecd C.fedcbaD.defabc解析:24.能够改变窗体边框线类型的属性是( )。(分数:2.00)A.Font SyleB.Border Style C.B

32、ack StyleD.Border解析:25.如果要改变窗体的标题,则需要设置的属性是( )。(分数:2.00)A.Caption B.NameC.BackColorD.Borderstyle解析:26.结构化程序设计主要强调的是( )。(分数:2.00)A.程序的规模B.程序的效率C.程序设计语言的先进性D.程序易读性 解析:27.下列语句的输出结果为( )。 PrintFormat$(5689.36,“000,000.000“)(分数:2.00)A.5,689.36B.5,689.360C.5,689.3D.005,689.360 解析:28.在窗体上画一个名称为 Command1 的命令

33、按钮,然后编写如下通用过程和命令按钮的事件过程: Private Funcdonf(m As Integer) If m Mod2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i) Next PrintS End Sub 程序运行后,单击命令按钮,在窗体上显示的是( )。(分数:2.00)A.11B.10C.9 D.8解析:29.如果一个变量未经定义就直接使用,则该变量的类型为( )。(分数:2.00)A.IntegerB.By

34、teC.BooleanD.Variant 解析:30.设 A$=“Hello“,下列语句正确的是( )。(分数:2.00)A.Labe11.Hight=Labe11.Hight+A$B.Labe11.Caption=Labe11.Caption+A$ C.Labe11.Enabled=Laabe11.Enabled+A$D.Labe11.Visible=Labe11.Visible+AS解析:31.如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是( )。(分数:2.00)A.如果工程中含有 Sub Main 过程,则程序一定首先执行该过程 B.不能把标准模块设置为启动模块C.用 Hid

35、e 方法只是隐藏一个窗体,不能从内存中清除该窗体D.任何时刻最多只有一个窗体是活动窗体解析:32.只有将组合框的 Style 属性设置为( )值时,才能触发 DblClick 事件。(分数:2.00)A.0B.1 C.2D.3解析:33.设有命令按钮 Commandl 的单击事件过程,代码如下: Private Sub Commandl_Click() Dima(30)As Integer Fori=1 To 30 a(i)=Int(Rnd*100) Next For Each arrltem In a IfarrltemMod7=0 ThenPrintarrItem; Ifarrltem90

36、ThenExitFor Next End Sub 对于该事件过程,以下叙述中错误的是( )。(分数:2.00)A.a 数组中的数据是 30 个 100 以内的整数B.语句 ForEacharrItem Ina 有语法错误 C.Ifarrltem Mod7=0语句的功能是输出数组中能够被 7 整除的数D.Ifarrltem90语句的作用是当数组元素的值大于 90 时退出 For 循环解析:34.设已经在窗体上添加了一个通用对话框控件 CommonDialogl,以下正确的语句是( )。(分数:2.00)A.CommonDialog1.Filter=-ALLLFiles*| Pictures(*.

37、Bm|*.BmpB.CommonDialoS1.Filter=“ALLLFiles“|*.*|“Pictures(*.Bm“|*.BmpC.CommonDialog1.Filter=ALLLPUesI*I Pictures(*.Bm|*.BmD.ComlnonDialog1. Filter=“ALLLPdes|*.*|Pictures(*.Bm|*.Bmpn 解析:35.在窗体上画一个名称为 Filel 的文件列表框,并编写如下程序: Private Sub FUel_DblClick() x=Shell(File1_ileName,1) End Sub 以下关于该程序的叙述中,错误的是( )

38、。(分数:2.00)A.x 没有实际作用,因此可以将该语句写为:Call Shell(FileFileName,1) B.双击文件列表框中的文件,将触发该事件过程C.要执行的文件的名字通过 File1.FileName 指定D.Ffle1 中显示的是当前驱动器、当前目录下的文件解析:二、B填空题/B(总题数:13,分数:30.00)36.在程序中使用日期型数据时,必须用符号 1 将日期型数据括起来。(分数:2.00)填空项 1:_ (正确答案:#)解析:37.将一般窗体转换为 MDI 窗体的子窗体时要把 MDIChild 属性设置为 1。(分数:2.00)填空项 1:_ (正确答案:True)

39、解析:38.在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块(桩模块)。其中 1 的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。(分数:2.00)填空项 1:_ (正确答案:驱动模块)解析:39.设有以下函数过程: Functiofun(m As Integer)As Integer Dimk As Integer,sum As Integer sum=0 Fork=m To 1 Step-2 sum=sum+k Nextk fun=sum End Function 若在程序中用语句 s=fun(10)调用此函数,则 s 的值为_。(分数:2.0

40、0)填空项 1:_ (正确答案:30)解析:在对象的 MouseDown 和 MouseUp 事件过程中,参数 Button 的值为 1、2、4 时,分别代表按下鼠标的左键、U 5 /U和U 6 /U按钮。(分数:4.00)(1).(分数:2.00)解析:填空项 1:_ (正确答案:同时按下)解析:40.对象的方法是指 1。(分数:2.00)填空项 1:_ (正确答案:对象的动作和行为)解析:41.计时器事件时间的间隔通过 1 属性设置。(分数:2.00)填空项 1:_ (正确答案:InterVal)解析:42.在代码窗口中输入某行代码并按回车键后,如果代码变成红色,表示 1。(分数:2.00

41、)填空项 1:_ (正确答案:该行代码有语法错误)解析:43.在窗体上画 1 个命令按钮和 1 个文本框,其名称分别为 Commandl 和 Textl,然后编写如下代码: Dim Save All As String Private Sub Commandl_C1iCk() Text1.Text=Left(UCase(SaveAU),4) End Sub Private Sub Textl_KeyPress(KeyAscii As Intege) SaveA11=Save All+Chr(KeyAscii) End Sub 程序运行后,在文本框中输入 abcdefg,单击命令按钮,则文本框中

42、显示的内容是_。(分数:2.00)填空项 1:_ (正确答案:ABCD)解析:44.下列程序段的运行结果是_。 Dimnum As Integer,a As Integer,b As Integer a=88:b=24 Do While b0 num=a Modb a=b b=num Wend Printa Loop(分数:2.00)填空项 1:_ (正确答案:8)解析:45.若要求输入密码时文本框中只显示“*”号,则应当在文本框的属性窗口中设置 1 属性。(分数:2.00)填空项 1:_ (正确答案:Password)解析:46.设置状态栏控件的 1 属性可以改变状态栏在窗体上的位置。(分数:2.00)填空项 1:_ (正确答案:Align)解析:下列过程的功能是:在对多个文本框进行输入时,对第 1 个文本框(text1)输入完毕后用回车键使焦点跳到第 2 个文本框(text2),而不是 Tab 键来切换。请完成该程序。Private Sub Textl_(eyDown(Keycode As Integer,Shift As Integer)IfU 14 /UThenText2.U 15 /UEnd IfEnd Sub(分数:4.00)(1).(分数:2.00)解析:填空项 1:_ (正确答案:SetFicys)解析:

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 考试资料 > 职业资格

copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1