11[简答题]在窗体上建立三个菜单(名称分别为Read、Cale和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后再添加一个文本框,名称为Text1,MuhiLine属性设置为True,ScrollBars属性设置为2(如图所示)。程序运行后,如果执行“读人数据”命令,则读入考生文件夹下datain1.txt文件中的100个整数,放人一个数组中,数组的下界为1;如果单击“计算并输出”按钮,则把该数组中下标为偶数的元素在文本框中显示出来,求出它们的和,并把所求得的和在窗体上显示出来;如果单击“存盘”按钮,则把所求得的和存入考牛文件夹下的dataout.txt文件中。
在考生文件夹下有一个工程文件sjt5.vbp,窗体文件中的ReadData过程可以把datainl.txt文件中的100个整数读入Arr数组中;而WriteData过程可以把指定的整数值写到考生文件夹下指定的文件中(整数值通过计算求得,文件名为dataout.txt)。
注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名仍保存为sit5.vbp,窗体文件名仍保存为sjt5.frm。
参考解析:
【考点分析】本题考点有:文本框的Name、MultiLine、SerollBars和Text属性,文件操作,菜单编辑器的使用(名称、标题、内缩符号),Art()函数以及Space()函数。
【解题思路】根据题意在“读人数据”命令的Click事件过程中,通过调用ReadData过程将数据从datainl.txt文件读入到数组Arr(窗体变量)中;在“计算并输出”命令的Click事件过程中,在For循环语句(循环变量i的初值为2,终值为100,步长为2)中依次将数组Art中下标为偶数的元素显示在文本框中,并将其值累加到变量sum;在“存盘”命令的Click事件过程中,通过调用WriteData过程将sum的值写入数据文件dataout.txt中。
【操作步骤】
步骤1:打开本题工程文件,利用菜单设计器,按表中的设置建立菜单项,在窗体Form1中绘制一个文本框,其相关属性及其值见表3.19和表3.20。
步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。
参考答案
´需要考生编写的内容
Dim Sum As integer
考生编写程序结束
´需要考生编写的内容
Private Sub Calc_Click()
Text1.Text=""
For i=2 To 100 Step2’从2开始循环,以2为步长的下标都是偶数
Text1.Text;=Text1.Text&Art(i)&
Space(5)
Sum=Sum+Arr(i)。对下标为偶数的值求和
Next i
Print sum
End Sub
Private Sub Read_Click()
ReadData'调用ReadData子过程
End Sub
Private Sub Save_Click()´调用Save_Click函数
WriteData"dataout.txt",sum
End Sub
´考生编写程序结束
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
【易错提示】调用WriteData过程时需传递参数dataout.txt和sum,变量sum应为窗体变量。
12[单选题] 数据流图中带有箭头的线段表示的是( )。
A.控制流B.事件驱动C.模块调用D.数据流
参考答案:D
参考解析:数据流图中带箭头的线段表示的是数据流,即沿箭头方向传送数据的通道,一般在旁边标注数据流名。
13[单选题] 层次型、网状型和关系型数据库划分原则是( )。
A.记录长度B.文件的大小C.联系的复杂程度D.数据之间的联系方式
参考答案:D
参考解析:层次模型的基本结构是树形结构,网状模型是一个不加任何条件限制的无向图,关系模型采用二维表来表示,所以三种数据库的划分原则是数据之间的联系方式。
14[单选题] 以下叙述中错误的是( )。
A.标准模块文件的扩展名是.bas
B.标准模块文件是纯代码文件
C.在标准模块中声明的全局变量可以在整个工程中使用
D.在标准模块中不能定义过程
参考答案:D
参考解析:标准模块独立保存为标准模块文件.bas,故A选项正确。
标准模块是应用程序内其他模块访问的过程和声明的容器。当应用程序比较庞大,含有多个窗口,而且几个窗口需要写重复的过程、变量等代码时,就可以把这些重复的代码写在标准模块。故B选项正确。
在标准模块中定义的Public变量、Public过程属于全局变
量和全局过程,在整个工程中的其他窗体、模块都可以使用。故c选项正确,在标准模块中可以定义过程,故D选项错误。
15[单选题] 为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为( )。
A.Dim pi As Integer
B.Dim pi(7)As Integer
C.Dim pi As Single
D.Dim pi As Long
参考答案:C
参考解析:单精度Single或双精度Double型的变量能够保存浮点型小数,整型Integer和长整型Long的变量只能保存整型数据。本题中圆周率为3.14159,小数,可用定义一个Single或Double型变量来保存。故选C。
16[单选题] 计算下面分段函数的正确语句是( )。
A.Y:nf(x>0。x+1,iIf(x<0,x一1,0))
B.Y=IIf(x=0,0,IIf(x>0,x一1,x+1))
C.y:IIf(x>0,x+1,IIf(x<0,0,x一1))
D.Y=IIf(x=0,0,x一1,x+1)
参考答案:A
参考解析:
IIF是条件函数,它的语法格式是:
Ilf(<条件表达式>,<表达式为True时的取值>,<表达式为False时的取值>)
B选项中,内层的HF函数中,当X>0时,X+1,否则X一1,所以应该是IIf(X>0,X+1,X一1)。
C选项中,内层的IⅡ函数中,当x<0时,x一1,否则0,所以应该是IIf(X<0,x一1,O)。
D选项中IIf函数中有4个参数不对,应该有3个参数。故B、C、D选项均错误,A选项正确。
17[单选题] 假定Picturel和Textl分别为图片框和文本框的名称,则下列错误的语句是( )。
A.Print 25B.Picturel.Print 25C.Textl.Print 25 D.Debug.Print 25
参考答案:C
参考解析:Print方法可以在窗体上显示文本字符串和表达式的值,并可在其他图形对象或打印机上输出信息。其一般格式为:’
[对象名称.]Print[表达式表][,l;]
其中对象名称可以是窗体(Form)、图片框(PictureBox)或打印机(Printer),也可以是立即窗口(Debug)。如果省对象名称,则在当前窗体上输出。
18[单选题] 对于含有多个窗体的工程而言,以下叙述中正确的是
A.没有指定启动窗体时,系统自动将最后一个添加的窗体设置为启动窗体
B.启动窗体可以通过“工程属性”对话框指定
C.Load方法兼有装入和显示窗体两种功能
D.Hide方法可以将指定的窗体从内存中清除
参考答案:B
参考解析:没有指定启动窗体时,系统自动将第一个窗体默认为启动窗体,所以选项A.错误;要想使包含多个窗体的工程中的某个窗体在程序运行时首先显示,则方法就是在“工程属性”对话框中将“启动对象”设置为某个窗体,所以选项B.正确;Ioad方法有装入窗体功能,所以选项C.错误;Hide方法使指定的窗体不显示,但不从内存中删除窗体,所以选项D.错误。
19[简答题]在考生文件夹下有一个工程文件sit3.vbp。程序运行后,单击“读人数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Textl文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一·项添加到Listl列表框中(如图所示)。
在in3.txt文件中,每个单词之间用一个空格字符隔开,最后一个单词的后面没有空格。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
参考解析:
【考点分析】本题考点有:列表框AddItem方法、Mid()函数、文件编辑、“&”连接符、DoWhile语句、Len()函数、For循环语句以及If判断语句。
【解题思路】本题首先要从文件中读人数据,再逐一检查文本框中每一个字符,如果发现空格则将其之前或两个空格之间的字符串作为一个单词用AddItem方法添加到列表框中。循环语句的上限为Len(st),赋值给变量n,判断语句的判断条件应为Mid(st,k,I)<>" ",其中st=Textl.Text。每添加一个单词后清空变量word,将所取字符的起始位置加1,再次执行循环得到下一个单词。
【操作步骤】
步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,去掉程序中的注释符“´”,
将问号改为正确的内容。
参考答案(阴影部分是需考生填入的内容)
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
20[简答题]在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.fem,此外还有一个名为datain.txt的文本文件,其内容如下:.
32 43 78 58 28 12 98 57 31 42 53 64
75 86 97 13 24 35 46 57 68 79 80 59 37
程序运行后,单击窗体,将把文件datain.txt中的数据输入到二维数组Mat中,按5行、5列的矩阵形式显示在窗体上,并输出矩阵左上一右下对角线上的数据,如图所示。在窗体的代码窗口中,已给出了部分程序,·这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
参考解析:
7rab函数常与Prim#语句或Print方法一起使用,对输出进行定位,其语法为:
Tab[(n)]
其中,可选的参数n表示在显示或打印下一个表达式之前移动的列数。在使用数组时,应先定义。Input#语句用于读取顺序文件中一项(或多项)数据给一个变量(或多个变量),其语法格式为:
Input#FileNumber.Varlist
其中:FileNumber参数表示打开文件的句柄,Varlist为变量列表。语句“Option Base l”用于限定数组下标的下限默认为1。
本题中文件以Input方式打开,使用一个5行、5列的二维数组Mat来存放数据,并使用一个嵌套的For循环显示矩阵,对于5 * 5的矩阵来说,位于左上到右下对角线上的元素具有行号等于列号的特点。
相关推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |