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

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

1、二级 VISUAL+BASIC 笔试-354 及答案解析(总分:90.00,做题时间:90 分钟)一、选择题(总题数:25,分数:75.00)1.在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为 _。Private Sub Text1_KeyPressKeyAscii As Integer)Dim char as Stringchar=Chr(KeyAscii)Text1.Text=String(5,KeyAscii)End Sub(分数:3.00)A.aaaaaB.AAAAAC.aaaaaaD.AAAAAA2.大部分控件都没有的属

2、性是 _。(分数:3.00)A.TopB.NameC.IntervalD.Visible3.以下程序运行后输出的结果是 _。a = 12.3b=-123m=Len(Str$(A)+Str$(B)Print mEnd(分数:3.00)A.9B.5C.7D.84.编写如下事件过程:Private Sub Form KeyDown(KeyCode As Integer,Shift As Integer)If(Button And 3)=3 ThenPrint “AAAA“End IfEnd Sub程序运行后,为了在窗体上输出“AAAA“,应按下的鼠标键为 _。(分数:3.00)A.左B.右C.同时按

3、下左、右D.按什么键都不显示5.读数据文件的操作可以通过下列 _ 语句来实现。(分数:3.00)A.Input#和 Get#B.Read 和 Line Input#C.Get#和 Line Input#D.Line Input# 和 Input#6.在 Visual Basic 中,所有的窗体和控件都必定具有的一个属性是 _。(分数:3.00)A.FontB.NameC.CaptionD.FillColor7.假定在窗体上建立一个通用对话框,其名称为 CommonDialogl,用下面的语句可以建立一个对话框:CommonDialogl.Action=1与该语句等价的语句是 _。(分数:3.0

4、0)A.CommonDialogl.ShowOpenB.CommonDialogl.ShowSaveC.CommonDialogl.ShowFontD.CommonDialogl.ShowColor8.以下程序的输出结果是 _。x=2-2Print xEnd(分数:3.00)A.4B.0.25C.4D.程序错误9.下列 Visual Basic 语句中,正确的语句是 _。(分数:3.00)A.A=1.75E2.7B.AS=BASICC.A$=“X+Y+Z“D.A$=B$+1210.在窗体上画一个通用对话框,其名称为 CommonDialogl,然后画一个命令按钮,并编写如下事件过程:Priva

5、te Sub Command1_Click()CommonDialogl.Flags=cdlOFNHideReadOnlycommonDialogl.Filter=“All Files(*.*)|*.*| Text Files“Next iPrintEnd Sub(分数:2.50)填空项 1:_30.在窗体上建立名称为 Text1、Text2 和删的三个文本框,其中 Text1 和 Text2 文本框用来接受两个整数(假设为 M 和 N),建立一个名称为 command1 的命令按钮,单击它将得到数 M 从右边起的 N 位数字,并把该数字显示在 Text3 文本框中,如下图所示。请填空。(分数

6、:2.50)填空项 1:_31.下列程序实现的功能是:在窗体上单击时,将在窗体上输出 c:=a1.txt 文件中的所有小写字母。Private Sub Form Click()Dim Ch As String * 1Open “c:/a1.txt“ For Input As #10Do While 【8】 Ch= Input(1, #10)If 【9】 ThenPrint Ch;End IfLoop【10】 End Sub(分数:2.50)填空项 1:_二级 VISUAL+BASIC 笔试-354 答案解析(总分:90.00,做题时间:90 分钟)一、选择题(总题数:25,分数:75.00)1

7、.在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为 _。Private Sub Text1_KeyPressKeyAscii As Integer)Dim char as Stringchar=Chr(KeyAscii)Text1.Text=String(5,KeyAscii)End Sub(分数:3.00)A.aaaaaB.AAAAAC.aaaaaaD.AAAAAA 解析:解析 在程序段用到了 4 个函数,在按了键盘上的某个键(在这里是字母键 a)后,Chr 函数将得到的键的 ASCII 码值(101)转换成该 ASCII 码值对

8、应的字符(a),然后利用 Ucase 函数将该字符转换成大写字母(A),将该大写字母的 ASCII 码值(利用函数 Asc()赋给 KeyAscii,最后利用 String 函数的 5 个 ASCII码值等于 KeyAscii 的字符(即 5 个 A)赋给文本框 Text1,此时文本框中将显示 5 个 A,又因为 KeyPress事件本身会在文本框中显示/输入一个 ASCII 码值为 KeyAscii 的字符(A),因此最后在文本框中将显示 6个大写字母 A。2.大部分控件都没有的属性是 _。(分数:3.00)A.TopB.NameC.Interval D.Visible解析:解析 Inter

9、val 属性仅应用于 Timer 控件。返回或设置对 Timer 控件的计时事件各调用间的毫秒数。3.以下程序运行后输出的结果是 _。a = 12.3b=-123m=Len(Str$(A)+Str$(B)Print mEnd(分数:3.00)A.9 B.5C.7D.8解析:解析 str$(数值表达式)函数的功能是将数值表达式的值转换成字符串表达式。如果数值表达式的值为正数,则在字符串前有一空格符号位。因此,函数 Str$(12.3)返回的结果为“12.3”,其长度为 5(标志共有 5 个字符);Str$(-123)返回的结果为“-123”,其长度为 4。长度函数 Len 计算的结果是:m=5+

10、4=904.编写如下事件过程:Private Sub Form KeyDown(KeyCode As Integer,Shift As Integer)If(Button And 3)=3 ThenPrint “AAAA“End IfEnd Sub程序运行后,为了在窗体上输出“AAAA“,应按下的鼠标键为 _。(分数:3.00)A.左B.右C.同时按下左、右D.按什么键都不显示 解析:解析 从题目中的程序可以看出,(BuRon And 3)=3 这个条件永远是假的,所以输出语句也永远不会被执行。5.读数据文件的操作可以通过下列 _ 语句来实现。(分数:3.00)A.Input#和 Get#B.

11、Read 和 Line Input#C.Get#和 Line Input#D.Line Input# 和 Input# 解析:解析 Get#语句把由“文件号”所指定的磁盘文件中的数据读到“变量”中。Visual Basic 中没有 Read 语句。读数据文件的操作由 Input#语句、Line Input#语句和 Input()函数来实现。6.在 Visual Basic 中,所有的窗体和控件都必定具有的一个属性是 _。(分数:3.00)A.FontB.Name C.CaptionD.FillColor解析:解析 在 Visual Basic 中,所有的窗体和控件都是对象,它们在工程中都必定有

12、一个名称。它们的名称都是由 Name 属性决定的。7.假定在窗体上建立一个通用对话框,其名称为 CommonDialogl,用下面的语句可以建立一个对话框:CommonDialogl.Action=1与该语句等价的语句是 _。(分数:3.00)A.CommonDialogl.ShowOpen B.CommonDialogl.ShowSaveC.CommonDialogl.ShowFontD.CommonDialogl.ShowColor解析:解析 通用对话框的 Action 属性为 1 表示显示的是“打开”对话框,所以相当于 Common Dialogl.ShowOpen。8.以下程序的输出结

13、果是 _。x=2-2Print xEnd(分数:3.00)A.4B.0.25 C.4D.程序错误解析:解析 在一般情况下,不允许两个运算符相连,应当用括号隔开,以免出错。乘幂号与符号相邻时为例外。9.下列 Visual Basic 语句中,正确的语句是 _。(分数:3.00)A.A=1.75E2.7B.AS=BASICC.A$=“X+Y+Z“ D.A$=B$+12解析:解析 选项 A 中,常量的表示方法错误;选项 B 中,赋值号两边的数据类型不匹配, A$为字符型变量,BASIC 作为变量是数值型变量,作为字符串常量缺双引号;选项 D 中,赋值号右边数据类型不匹配,B$为字符型变量,12 为数

14、值常量。选项 C 中,把一个字符串常量“X+Y/2“赋给字符串变量 A$,表达正确。10.在窗体上画一个通用对话框,其名称为 CommonDialogl,然后画一个命令按钮,并编写如下事件过程:Private Sub Command1_Click()CommonDialogl.Flags=cdlOFNHideReadOnlycommonDialogl.Filter=“All Files(*.*)|*.*| Text Files“Next iPrintEnd Sub(分数:2.50)填空项 1:_ (正确答案:j=20 a(i)=a(j))解析:解析 数组逆序存放其实就是把数组的第一个元素和最后

15、一个元素交换,第二个元素和倒数第二个元素交换,直到所有的元素都交换完毕。算法可描述如下:用变量 i 记下第一个元素的下标 1,用变量j 记下最后一个元素的下标 20:交换 a(i)和 a(j);i 加 1 指向后一个元素, j 减 1 指向前一个元素:重复上述步骤,直到 ij 为止。【4】处应该填写 j 赋最后一个元素的下标,为“j=20“。【5】处是 a(i)和a(j)交换的一条语句,应填“a(i)=a(j)”。30.在窗体上建立名称为 Text1、Text2 和删的三个文本框,其中 Text1 和 Text2 文本框用来接受两个整数(假设为 M 和 N),建立一个名称为 command1

16、的命令按钮,单击它将得到数 M 从右边起的 N 位数字,并把该数字显示在 Text3 文本框中,如下图所示。请填空。(分数:2.50)填空项 1:_ (正确答案:m Mod 10 digit(m, n))解析:解析 本题 digit 函数的作用是求第一个形参 m 从右数的第 n(第二个形参)位数字。为求 m 的第n 位数字,可先让 m 除以 10n-1(上标),再求商除以 10 的余数,该余数就是所需要的数字。因此【6】处应填“m Mod 10”。当发生 Command1_Click 事件时,将调用该函数求得 m 和右数第 n 位数字,因此在【7】处应填函数调用“digit(m, n)”。31

17、.下列程序实现的功能是:在窗体上单击时,将在窗体上输出 c:=a1.txt 文件中的所有小写字母。Private Sub Form Click()Dim Ch As String * 1Open “c:/a1.txt“ For Input As #10Do While 【8】 Ch= Input(1, #10)If 【9】 ThenPrint Ch;End IfLoop【10】 End Sub(分数:2.50)填空项 1:_ (正确答案:Not EOF(10) Ch“a“And Ch=“z“ Close #10)解析:解析 要将 a1.txt 中的所有小写字母输出,可采用下述方法:首先读打开该文件,然后从文件中读取一个字符,判断该字符是否为小写字母,若是则输出该字母,重复上述过程直到文件结尾。在读字符前应要测试文件内部读写指针是否位于文件尾,只有不是在文件结尾时才能读取字符,故【8】处应填“Not EOF(10)”,读取一个字符后,应判断该字符是否尾小写字母,故【9】处应填“Ch“a“ And Ch=“z“”,文件读写过后,应关闭文件,故【10】处应填“Close #10”。

展开阅读全文
相关资源
猜你喜欢
  • CSN 83 4712 Cast 2-1987 Air pollution control Determination of hydrogen sulphide emissions from stationary sources Sampling for manual methods《空气污染控制 固定污染源硫化氢排放量的测定 手工方法取样》.pdf CSN 83 4712 Cast 2-1987 Air pollution control Determination of hydrogen sulphide emissions from stationary sources Sampling for manual methods《空气污染控制 固定污染源硫化氢排放量的测定 手工方法取样》.pdf
  • CSN 83 4712 Cast 3-1987 Air pollution control Determination of hydrogen sulphide emissions from stationary sources Titration method《空气污染控制 固定污染源硫化氢排放量的测定 滴定法》.pdf CSN 83 4712 Cast 3-1987 Air pollution control Determination of hydrogen sulphide emissions from stationary sources Titration method《空气污染控制 固定污染源硫化氢排放量的测定 滴定法》.pdf
  • CSN 83 4712 Cast 4-1987 Air pollution control Determination of hydrogen sulphide emissions from stationary sources Photometric method《空气污染控制 固定污染源硫化氢排放量的测定 光度法》.pdf CSN 83 4712 Cast 4-1987 Air pollution control Determination of hydrogen sulphide emissions from stationary sources Photometric method《空气污染控制 固定污染源硫化氢排放量的测定 光度法》.pdf
  • CSN 83 4713 Cast 1-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources General part《空气污染控制 固定污染源硫化碳的排放量测定 概要部分》.pdf CSN 83 4713 Cast 1-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources General part《空气污染控制 固定污染源硫化碳的排放量测定 概要部分》.pdf
  • CSN 83 4713 Cast 2-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources Sampling for manual methods《空气污染控制 固定污染源硫化碳的排放量测定 手工方法取样》.pdf CSN 83 4713 Cast 2-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources Sampling for manual methods《空气污染控制 固定污染源硫化碳的排放量测定 手工方法取样》.pdf
  • CSN 83 4713 Cast 3-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources Argentometric titration《空气污染控制 固定污染源硫化碳的排放量测定 银量法》.pdf CSN 83 4713 Cast 3-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources Argentometric titration《空气污染控制 固定污染源硫化碳的排放量测定 银量法》.pdf
  • CSN 83 4713 Cast 4-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources Iodimetric method《空气污染控制 固定污染源硫化碳排放量的测定 碘量法》.pdf CSN 83 4713 Cast 4-1987 Air pollution control Determination of carbon sulphide emissions from stationary sources Iodimetric method《空气污染控制 固定污染源硫化碳排放量的测定 碘量法》.pdf
  • CSN 83 4721 Cast 1-1987 Air Pollution Control Determination of nitrogen oxides emissions from stationary sources General part《空气污染控制 固定污染源氧化氮的排放量测定 概要部分》.pdf CSN 83 4721 Cast 1-1987 Air Pollution Control Determination of nitrogen oxides emissions from stationary sources General part《空气污染控制 固定污染源氧化氮的排放量测定 概要部分》.pdf
  • CSN 83 4721 Cast 2-1987 Air Pollution Control Determination of nitrogen oxides emissions from stationary sources Sampling for manual measurement《空气污染控制 固定污染源氧化氮的排放量测定 手工测量的采样》.pdf CSN 83 4721 Cast 2-1987 Air Pollution Control Determination of nitrogen oxides emissions from stationary sources Sampling for manual measurement《空气污染控制 固定污染源氧化氮的排放量测定 手工测量的采样》.pdf
  • 相关搜索

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

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