77范文网 - 专业文章范例文档资料分享平台

2013年3月全国计算机等级考试二级VB无纸化上机题题库及答案解析((8)

来源:网络收集 时间:2020-02-21 下载这篇文档 手机版
说明:文章内容仅供预览,部分内容可能不全,需要完整文档或者需要复制内容,请下载word后使用。下载word有问题请添加微信号:或QQ: 处理(尽可能给您提供完整文档),感谢您的支持与谅解。点击这里给我发消息

步骤2:在窗体Form1中画一个文本框,其相关属性及值见表77-5。

表77-5

步骤3:在代码编辑窗口,分别编写三个菜单项的

Click事件过程。

参考代码:

Dim Sum As Integer

Private Sub Read_Click() ReadData End Sub

Private Sub Calc_Click() Dim S As String Sum = 0

For i = 1 To 100

If Arr(i) < 50 Then

Sum = Sum + Arr(i)

S = S & Str(Arr(i)) & \ \ End If Next i

Text1.Text = S

Print \End Sub

Private Sub Save_Click()

WriteData \End Sub

步骤4:按要求将文件保存至考生文件夹中。

【特别提示】在多个过程中使用同一个变量,应将其声明为窗体变量。

第七十八套上机答案解析101

一、基本操作题

第1小题 【知识点播】①用Visual Basic开发应用程序的一般步骤:首先建立用户界面,然后设置窗体及控件属性,最后编写代码。②添加控件的方法有两种:一是先选中工具箱中要添加的控件,然后在窗体上按下鼠标左键并拖动到一定位置后松开;二是通过直接双击工具箱中相应控件的图标来添加控件。③设置控件属性的方法也有两种:一是在设计阶段通过对象的属性窗口来设置;二是通过程序代码在程序运行时来设置。④文本框(Text):通常用于接收用户输入的字符串数据或用于显示输出信息,其Text属性用于设置或返回文本框中显示的文本。⑤控件的Height和Width属性用于设置控件在屏幕上的大小(即高和宽)。⑥通过属性设置窗口中的Font属性可设置控件标题文本的字体、字号、字形等,在程序设计时Font属性可返回一个Font对象,Font对象包含有格式化文本所需要的信息。⑦窗体的标题由其Caption属性设置,窗体的MaxButton 属性、MinButton 属性决定其标题栏是否显示最大化、最小化按钮,True表示显示,False表示不显示。此外,通过修改窗体的BorderStyle属性(用于设置边框样式),也可实现窗体标题栏是否显示最大化、最小化按钮的效果,其中值设置为3时窗体具有固定大小,包含左侧控制框和标题栏,但没有最大化、最小化按钮。

【审题分析】本题只需按要求建立程序界面并设置窗体和文本框相关属性即可。

【操作步骤】

步骤1:新建一个\标准EXE\工程。

步骤2:单击工具箱中的TextBox控件图标,在窗体Form1上按下鼠标左键并拖动到一定位置后松开,画出一个文本框,如图7所示。

步骤3:选定窗体中的文本框,在属性窗口中设置其相关属性,如图8所示,属性及值如表1所示。

—36—

图7

图8

表1

步骤4:在文本框的属性窗口中点击\属性右侧的

按钮,打开\字体\对话框,在其中设置\字体\为\黑体\,\字号\为\四号\。

步骤5:单击窗体无控件区域,在属性窗口中设置窗体相关属性,属性及值如表1所示。

步骤6:选择【文件】→【保存工程】命令,打开\文件另存为\对话框,如图9所示。在该对话框的\保存在\下拉列表中选择考生文件夹,并在\文件名\文本框中输入vbsj1.frm,单击\保存\按钮,即保存好窗体文件;在接下来的\工程另存为\对话框中,在\文件名\文本框中输入vbsj1.vbp,如图10所示,并单击\保存\按钮,即保存好工程文件。

图9

图10

第2小题

【知识点播】①焦点是接收用户鼠标或键盘输入的能力。当对象具有焦点时,可接收用户的输入。②对象的SetFocus方法用于将焦点移到指定的对象上。

【审题分析】本题其实就是在两个命令按钮的单击事件过程中,通过使用SetFocus方法使对应文本框获得焦点。

【操作步骤】

步骤1:新建一个\标准EXE\工程,在窗体Form1中画两个文本框和两个命令按钮,分别设置其相关属性,属性及值如表2所示。程序界面如图11所示。

表2

图11

步骤2:双击\左\命令按钮,打开代码编辑窗口,在按钮的Click事件过程中输入如图12中所示代码。

图12

步骤3:从代码编辑窗口的\对象\下拉列表中选择

cmdRight,从\事件\下拉列表中选择Click,编写以下事件过程。

参考代码:

Private Sub cmdRight_Click() txtRight.SetFocus End Sub

步骤4:按要求将文件保存至考生文件夹中。

二、简单应用题

第1小题

【知识点播】①Alignment属性用于确定文本框中文本的放置方式,其值可以设置为0(靠左,默认)、1(靠右)或2(居中)。②控件数组是一组具有共同名称和类型的控件,它们拥有共同的事件,数组中的每个控件都有唯一的索引号(Index),即下标。③容器(如窗体和框架)中的单选按钮(OptionButton)组常用于提供多个选项间的唯一选择,其Value属性用于设置或返回每个单选按钮的选中状态:值为False表示未选,值为True表示选中。④Format(数值表达式,格式字符串)函数的功能是按\格式字符串\指定的格式输出\数值表达式\的值。在格式字符串中用0表示数字位,0的个数决定了显示区域的长度,如果要显示的数值的位数小于格式字符串指定的区段长度,则多余的位以0补齐。如果要显示的数值的位数大于指定的区段长度,则数值照原样显示;\表示显示小数点,小数点与0结合使用,可以放在显示区段的任何位置,根据格式字符串的位置,小数部分多余的数字按四舍五入处理。⑤Sin(N)正弦函数用于返回N的正弦值,Cos(N)余弦函数用于返回N的余弦值,其中参数N应为弧度。

【审题分析】本题可通过利用If…Else…语句来判断第一个单选按钮是否被选中,若是则进行正弦运算,否则进行余弦运算。为实现\第4位截去\的功能,可将运算值减去0.0005后再使用Format函数进行格式输出。

【操作步骤】

步骤1:打开考生文件夹中的本题工程文件vbsj3.vbp,程序界面如图13所示。

图13

步骤2:依次选中窗体中的两个文本框,将其Alignment属性值设置为1-Right Justify。

步骤3:双击窗体中的\计算\命令按钮,在打开的代码编辑窗口中编写其单击事件过程。

参考代码:

Private Sub cmdCal_Click()

If optFun(0).Value = True Then

txtResult.Text=Format(Sin(_

Val(txtInput.Text)*3.14159/180) -0.0005,\Else

txtResult.Text = Format(Cos(_

Val(txtInput.Text)*3.14159/180)-0.0005,\End If End Sub

步骤4:按键运行程序,在左侧文本框中输入\,选择不同选项,单击\计算\按钮,结果如图14所示。

图14

步骤5:单击窗体右上角的关闭按钮以结束程序。 步骤6:按要求将文件保存至考生文件夹中。

【提示】本题程序运行时,单击窗体右上角的关闭按钮将输出计算结果到文件out3.txt中,并以其判断程序编写是否正确。

第2小题

【知识点播】①组合框(ComboBox)将文本框与列 —37—

表框的特性组合在一起,既可在组合框的文本框部分输入信息,也可在列表框部分选择项目,ListIndex属性可返回其当前所选项目的索引号;②Trim函数用于删除字符串左右两边的空格;③Right()函数用于取出已有字符串最右边指定个数的字符串;④Left()函数用于取出已有字符串最左边指定个数的字符串; ⑤Mid(字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串。

【审题分析】本题源程序的中心设计思想是:将文本框txtInput中的字符串按组合框中所选要求进行截取并放入文本框txtResult中。源程序以组合框列表项的索引号(即ListIndex属性值)作为Select Case语句的判断表达式,故第1个?处应为cboLong.ListIndex;组合框中第三项要求截取第3~6个字符,其实就是从字符串的第3个字符开始,截取4个字符,故Mid函数的第2、3个参数应为3和4;最后的?处是将截取结果显示在文本框中,故应为tmpStr。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj4.vbp,在代码编辑窗口,去掉程序中的注释符\,将问号\?\改为正确的内容。

参考代码:

Select Case cboLong.ListIndex

tmpStr = Mid(Trim(txtInput.Text), 3, 4) txtResult.Text = tmpStr

步骤2:按要求将文件保存至考生文件夹中。

三、综合操作题

【知识点播】①Type语句用于在模块级别中定义一个用户自己的数据类型,其本质上是一个数据类型集合,它含有一个至一个以上的成员,每个成员可以被定义为不同的数据类型。声明自定义类型变量后,可通过\变量名.成员名\来访问自定义变量中的元素。②用Open语句打开随机文件,其语法格式为:Open FileName for Random as #FileNumber Len=记录长度。记录长度是一条记录实际所占字节数,可用Len(记录变量名)函数获取;Get#语句用于从文件中读出某记录号的记录,格式为:Get # FileNumber,[RecordNuber], Var;Put#语句用于把记录按指定记录号写入文件,格式为:Put # FileNumber,[RecordNuber],Var。③LOF函数可返回一个用Open 语句打开的文件的大小,该大小以字节为单位,返回值为Long数据类型。④Do循环语句的功能是:当指定的\循环条件\为True时(使用While关键词)或直到指定的\循环条件\变为True之前(使用Until关键词),重复执行一组语句(即循环体)。

【审题分析】本题源程序设计思路:在\写通信录\命令按钮的单击事件过程中,先用Open语句打开考生文件夹下的随机文件out5.txt,并通过计算得到随机文件现有记录数,存入变量RecNum;然后在Do循环中,为自定义数据类型变量Pers的各元素赋值,用Put语句将该变量的值写入打开的随机文件中(记录号为RecNum+1),并通过输入对话框询问是否要再输入新记录,Do循环以输入对话框中返回值的大写为\作为循环条件。

在\读通信录\命令按钮的单击事件过程中,先用Open语句打开考生文件夹下的随机文件out5.txt,并通过表达式:LOF(1) / Len(Pers)计算得到随机文件现有记录数,存入变量RecNum;然后利用For循环语句(初值为1,终值为RecNum的值),用Get语句读入随机文件中相应记录号的记录,赋值给变量Pers,并将变量Pers各元素的值用Print方法显示在窗体上。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj5.vbp,在代码编辑窗口,去掉程序中的注释符\,将问号\?\改为正确的内容。

参考代码:

RecNum = RecNum + 1 Put #1, RecNum, Pers

Loop While UCase(asp) = \RecNum = LOF(1) / Len(Pers) Get #1, i, Pers

步骤2:运行程序,单击\写通信录\命令按钮,按照提示依次输入:

LiuXiaoqiang (028)87348765 430065 DengQinghua (021)26874321 300120

步骤3:运行程序,单击\读通信录\命令按钮,在窗体上显示全部记录(共5个)。

步骤4:按要求将文件保存至考生文件夹中。

第七十九套上机答案解析102

一、基本操作题

第1小题

【知识点播】通用对话框(CommonDialog)提供诸如打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框,该控件运行时不可见。Action属性用于设置被打开对话框的类型;当通用对话框显示为\打开\或\另存为\类型时,其FileName属性用于返回或设置所选的文件的路径和文件名,Filter(过滤器)属性在对话框显示时提供一个可供选择过滤器列表,从而指定在对话框的文件列表中显示文件的类型,例如,过滤器为*.txt,表示显示所有的文本文件,它的语法为:对象名.Filter =\描述|文件扩展名\。使用管道符(|)将描述与过滤器隔开,同样使用管道符将多个过滤器相互分隔。FilterIndex属性返回或设置\打开\或\另存为\对话框中一个缺省的过滤器,其中第一个过滤器的索引号是1。

在VB6中开始使用新方法来打开不同对话框,同时也保留了对Action属性的支持。表1列出了不同Action属性值代表的对话框类型及其在VB6中的对应方法。

表1

【审题分析】要在单击按钮时弹出\打开文件\

对话框,只需在\打开\按钮的Click事件过程中调用通用对话框的ShowOpen方法即可。

【操作步骤】

步骤1:新建一个\标准EXE\工程,在窗体Form1中加入一个命令按钮,其相关属性设置如表2所示。

表2

步骤2:选择【工程】→【部件】命令,将弹出的

\部件\对话框如图6所示,从列表中选中\Common Dialog Control6.0\项目,单击\确定\按钮。

—38—

图6

步骤3:双击工具箱新添加的通用对话框(CommonDialog)图标,在窗体中加入一个通用对话框,其相关属性设置如表2所示。也可右击窗体中的通用对话框,选择【属性】命令,在打开的\属性页\对话框中设置其相关属性,如图7所示。

图7

步骤4:双击窗体Form1中的\打开\按钮,在打开的代码编辑窗口中,输入如下代码:

参考代码:

Private Sub cmdOpen_Click() cdlOpen.ShowOpen End Sub

步骤5:按要求将文件保存至考生文件夹中。 第2小题

【知识点播】①文本框的Text属性可返回或设置文本框中显示的内容;SelLength属性可返回或设置文本框中当前选定的字符数;SelStart属性可返回或设置所选文本的起始点,该起始点位于起始文本的左侧;SelText属性可返回含有当前所选择的字符串。②Right()函数用于取出已有字符串最右边指定个数的字符串。③Left()函数用于取出已有字符串最左边指定个数的字符串。④Mid(字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,若不指定个数将返回字符串中从参数\起始位置\到字符串尾端的所有字符。

【审题分析】本题在\复制\按钮的单击事件过程中,需将文本框txtSrc的SelText属性值赋予文本框txtObj。在\删除\按钮的单击事件过程中,需将文本框txtSrc被选文本左右两侧的文本分别取出,连接(用连字符\)后重新赋予文本框txtSrc。

【操作步骤】

步骤1:新建一个\标准EXE\工程,在窗体Form1中画两个文本框和两个命令按钮,其相关属性设置如表3所示。

表3

步骤2:在代码编辑窗口,分别编写\复制

\和\删除\按钮的单击事件过程。

参考代码:

Private Sub cmdCopy_Click()

txtObj.Text = txtSrc.SelText End Sub

Private Sub cmdDel_Click()

txtSrc.Text = Left(txtSrc.Text, txtSrc. SelStart)& Mid_

(txtSrc.Text, txtSrc.SelStart + txtSrc.SelLength + 1) End Sub

步骤3:按要求将文件保存至考生文件夹中。

二、简单应用题

第1小题

【知识点播】计时器控件用于实现在规则的时间间隔触发其Timer事件,执行有关事件过程代码,来完成对应功能。Interval属性用于设置触发计时器的Timer事件的时间间隔,单位为毫秒,值为0时计时器不启用。Enabled属性控制计时器是否开始启用,值为True时表示启用,值为False时表示不启用。

【审题分析】本题通过计时器的Timer事件来控制直线控件的位置,从而实现钟表上的指针旋转的功能。为使计时器的Timer事件每秒激活一次需将计时器的Interval属性值设置为1000;为使程序刚运行时钟表指针不动需将Enabled属性值设置为False。在\开始\按钮的单击事件过程中,通过设置计时器的Enabled属性值为True来启动计时器。在\停止\按钮的单击事件过程中,通过设置计时器的Enabled属性值为False来停止计时器。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj3.vbp,在属性设置窗口,设置计时器的Interval属性值为1000,Enabled属性值为False。

步骤2:在代码编辑窗口,编写\开始\和\停止\按钮的单击事件过程。

参考代码:

Private Sub cmdStart_Click() tmrClock.Enabled = True End Sub

Private Sub cmdStop_Click() tmrClock.Enabled = False End Sub

步骤3:按要求将文件保存至考生文件夹中。 第2小题

【知识点播】①滚动条分为水平滚动条(HscrollBar)和垂直滚动条(VscrollBar)两种,常用来提供简便的定位或用于取代数据的键盘输入。通过调整滚动条滑块的位置即可改变其Value属性的值,滚动条的Max属性、Min属性限定了滚动条所能表示的最大值和最小值,即Value属性值的取值范围,在程序中改变Value属性的值,滚动条滑块会随之移动到相应位置。LargeChange属性用于设置当点击滚动条滑块与两侧箭头间区域时Value属性值的改变量,SmallChange属性用于设置当点击滚动条两侧箭头时Value属性值的改变量。②滚动条滑块位置改变时将触发其Change事件。

【审题分析】本题要求在单击\开始\按钮时,汽车向右运动,其实质是在\开始\按钮的单击事件过程中启动计时器,故第1个?处应改为True。要通过移动滚动条上的滚动框来改变汽车的运动速度,需在滚动条的Change事件过程中,将滚动条当前Value属性值赋予计时器的Interval属性,第2个?处应改为Timer1。汽车向右移动是在计时器的Timer事件过程中,通过不断增加图片框的Left属性值来实现的,故第3个?处应改为Picture1.Left。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj5.vbp,在代码编辑窗口,去掉程序中的注释符\,将问号\?\改为正确的内容。

参考代码:

Timer1.Enabled = True

Timer1.Interval = HScroll1.Value Picture1.Left = Picture1.Left + 10

步骤2:按要求将文件保存至考生文件夹中。

三、综合操作题

【知识点播】①过程是构成程序的一个模块,常用来完成一个相对独立的功能。Function过程也叫函数过程,一般用于调用后不仅要执行一组代码完成相应操作,还需返回一个有用值的情况。Function函数的参数有两种传递方式:按值传递(Byval)和按址传递(Byref),默认为按址传递。调用Function函数常放在赋值符右端。 —39—

②For循环通常用于知道次数的循环,在不知道明确的循环次数的情况下,我们可以用条件来控制循环,While循环和Do循环就是用条件来控制的循环。While…Wend语句的一般语法格式:

While 条件 语句块 Wend

功能:在给定的条件为真(True)时,执行循环中的\语句块\。

③素数的判断准则就是看该数除了1和其本身外是否别无其他约数。

【审题分析】程序设计思路:要找出小于给定数的最大素数,可以定义一个初值比给定数小1的整型变量n,通过调用函数isprime(n),以其返回值不是素数(即Not isprime(n))作为While循环语句的循环条件,在循环体中加入语句:n=n-1实现每执行循环体一次变量n的值减1,当循环结束时n的值即为一个最大素数。

由于本题要求找出三个小于给定数的最大素数,故可通过For循环重复执行三次上述查找最大素数的语句,并将每次查找结果在对应标签中显示出来。

【操作步骤】

步骤1:打开本题对应工程文件vbsj5.vbp。

步骤2:双击窗体Form1上的\计算\按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码:

参考代码: Dim j As Integer Dim n As Integer

n = Val(txtInput.Text) - 1 For j = 0 To 2

While Not IsPrime(n) n = n - 1 Wend

lblResult(j).Caption = n n = n - 1 Next

步骤3:运行程序,在\给定的素数\对应的文本框中输入12379,并执行\查找\命令,将找到满足条件的三个素数显示在标签中,然后单击关闭按钮结束程序的运行。

步骤4:按要求将文件保存至考生文件夹中。

【考试误区】正确使用循环控制结构是解决此题的关键。

【主要考点】循环控制结构的应用、过程调用。

第八十套上机答案解析103

一、基本操作题

第1小题

【知识点播】&运算符用来强制两个表达式作字符串连接。

【审题分析】本题只需在命令按钮的单击事件过程中,用Print方法将两个文本框中的内容输出到窗体上。

【操作步骤】

步骤1:新建一个\标准EXE\工程,按表1在窗体中画出控件并设置其相关属性。

表1

步骤2:在代码编辑窗口,编写命令按钮的

Click事件过程。

参考代码:

Private Sub cmdDisplay_Click()

Print txtName.Text & \,现年\ txtAge.Text & \岁\

End Sub

步骤3:按要求将文件保存至考生文件夹中。 第2小题

【知识点播】图片框(PictureBox)主要用于显示图片(支持的图形文件有位图(bmp)、图标(ico)、Windows元文件(wmf))或在其上画图,也可用作其他控件的容器,还可使用Print方法在其上直接输出文本。

【审题分析】要实现本题所要求的功能,可在文本框的Change事件过程中,将当前文本框中的文本用Print方法输出到图片框中。

【操作步骤】

步骤1:新建一个\标准EXE\工程,按表2在窗体中画出控件并设置其相关属性。

表2

步骤2:打开代码编辑窗口,编写命令按钮的单击事

件过程。

参考代码:

Private Sub txtIn0put_Change() picOutput.Print txtInput.Text End Sub

步骤3:按要求将文件保存至考生文件夹中。

二、简单应用题

第1小题

【知识点播】①控件数组是一组具有共同名称和类型的控件,它们拥有共同的事件,数组中的每个控件都有唯一的索引号(Index),即下标。②容器(如窗体和框架)中的单选按钮(OptionButton)组常用于提供多个选项间的唯一选择,其Value属性用于设置或返回每个单选按钮的选中状态:值为False表示未选,值为True表示选中。

【审题分析】本题源程序在命令按钮的单击事件过程中,首先利用For循环语句(循环变量k的初值为0,终值为3)逐一检查单选按钮数组中的每个元素是否被选中,若选中则用变量n记录下选中单选按钮的索引号,即n=k。循环结束后,取消对当前选中单选按钮的选择,变量n增1;接着判断增1后的n值是否为4,若是则将n的值设置为0;最后设置索引号为n的单选按钮被选中。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj3.vbp,按表3在窗体中用\复制\和\粘贴\命令画出包含4个元素的单选数组和1个命令按钮并设置属性。

表3

步骤2:打开代码编辑窗口,去掉程序中的注释符

\,将问号\?\改为正确的内容。

参考代码:

Private Sub CmdNext_Click() For k = 0 To 3

If OptItem(k).Value Then n = k End If Next k

—40—

OptItem (n).Value = False n = n + 1 If n = 4 Then n = 0 End If

OptItem (n).Value = True End Sub

步骤3:按要求将文件保存至考生文件夹中。 第2小题

【知识点播】①UCase()函数用于将字符串中小写字母转化为大写字母,原本大写或非字母字符保持不变。②LCase()函数用于将字符串中大写字母转化为小写字母,原本小写或非字母字符保持不变。

【审题分析】本题源程序是在命令按钮的单击事件过程中,用For循环语句和Mid函数逐一取出文本框txtInput中的字符后,根据单选按钮的选择进行相应转换;当选择\大小写互换\时,如果是小写字母就用UCase函数转换为大写,如果是大写字母就用LCase函数转换为小写,如果不是字母就不用转换;当选择\全部大写\时,就用UCase函数将文本框中所有字母转换为大写;当选择\全部小写\时,就用LCase函数将文本框中所有字母转换为小写。将转换结果显示在文本框txtResult中。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj4.vbp,在代码编辑窗口,去掉程序中的注释符\,将问号\?\改为正确的内容。

参考代码:

a = Mid$(txtInput.Text, k, 1) ch = ch + LCase(a) txtResult = ch

步骤2:按要求将文件保存至考生文件夹中。 【主要考点】字符串函数。

三、综合操作题

【知识点播】①Type语句用于在模块级别中定义一个用户自己的数据类型,其本质上是一个数据类型集合,它含有一个至一个以上的成员,每个成员可以被定义为不同的数据类型。声明自定义类型变量后,可通过\变量名.成员名\来访问自定义变量中的元素。②用Open语句打开随机文件,其语法格式为:Open FileName for Random as #FileNumber Len=记录长度。记录长度是一条记录实际所占字节数,可用Len(记录变量名)函数获取;Get#语句用于从文件中读出某记录号的记录,格式为:Get # FileNumber,[RecordNuber], Var;Put#语句用于把记录按指定记录号写入文件,格式为:Put # FileNumber,[RecordNuber],Var。③LOF函数可返回一个用Open 语句打开的文件的大小,该大小以字节为单位,返回值为Long数据类型。

【审题分析】本题需在\显示第三个记录\按钮的单击事件过程中,先声明一个自定义数据类型PalType的变量,然后用Open语句打开文件in5.txt,接着用Get#语句读出记录号为3的记录并赋值给自定义类型变量,最后将该变量各元素的值显示在对应文本框中。

【操作步骤】

步骤1:打开考生文件中的本题工程文件vbsj5.vbp,按表4在窗体中画出控件并设置其相关属性。

表4

步骤2:在代码编辑窗口中,编写cmdDisplay_Click

件过程。

参考代码:

Private Sub cmdDisplay_Click() Dim pers As PalType

Open \ Get #1, 3, pers

txtName.Text = pers.Name txtTel.Text = pers.Tel txtPost.Text = pers.Post Close #1 End Sub

步骤3:按要求将文件保存至考生文件夹中。

步骤4:按键运行程序,先单击\显示第三个记录\按钮,再单击\保存\按钮。

—41—

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读,免费范文网,提供经典小说教育文库2013年3月全国计算机等级考试二级VB无纸化上机题题库及答案解析((8)在线全文阅读。

2013年3月全国计算机等级考试二级VB无纸化上机题题库及答案解析((8).doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印 下载失败或者文档不完整,请联系客服人员解决!
本文链接:https://www.77cn.com.cn/wenku/jiaoyu/769347.html(转载请注明文章来源)
Copyright © 2008-2022 免费范文网 版权所有
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ: 邮箱:tiandhx2@hotmail.com
苏ICP备16052595号-18
× 注册会员免费下载(下载后可以自由复制和排版)
注册会员下载
全站内容免费自由复制
注册会员下载
全站内容免费自由复制
注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: