首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3.1
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3.1
admin
2020-07-22
102
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3.176所示)。在in3.txt文件中每个单词之间用一个空格字符隔开,最后一个单词的后面没有空格。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经画出所有控件,如图3.177所示。在运行时,如果单击“开始”按钮,则窗体上的汽车图标每O.1秒向右移动一次(初始状态下不移动);如果单击“停止”按钮,则停止移动。
请完成以下工作:
①设置适当控件的适当属性,使得汽车图标每O.1秒向右移动一次,而初始状态下不移动;②请去掉程序中的注释符,把程序中的?改为正确的内容;③为两个命令按钮编写适当的事件过程。最后以原文件名存盘。
注意:不得修改已经给出的程序。编写的事件过程中不能使用变量,每个事件过程中只能有一条语句。
选项
答案
(1)步骤1:打开考生文件夹下的工程文件sjt3.vbp,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: st=st & ch c=Mid(st,k,1) Word="" 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,将计时器Timerl的Enabled属性设置为False,Interval属性设置为100。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容并编写两个命令按钮的单击事件过程。参考代码: Private Sub C1_Click() Timerl.Enabled=True End Sub Private Sub C2_Click() Timerl.Enabled=False End Sub Private Sub Timerl_Timer() P1.Move P1.Left+20 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)本题在“读入数据”按钮的单击事件中,首先将in3.txt文件以Input方式打开,然后利用Do循环依次读入文件中的每一个数据,在每一次循环中读入文件中的一个数据并连接至变量st中,循环结束后st的值就是文件中所有单词连接而成的字符串。
在“插入列表框”按钮的单击事件中,以空格为单词分隔依据找出每个单词,然后将单词插入列表框中,清空变量word准备继续寻找下一个单词。
(2)计时器只在设计时可见,计时器是否启用由其Enabled属性设置,值可取True或False。启用后由Interval属性设置间隔多长时间触发一次其Timer事件,Interval属性的单位为毫秒,缺省值为0,此时计时器不启用。
Timerl用于控制汽车行驶,每触发一次Timerl的Timer事件,汽车向右移动20,即P1.Move P1.Left+20。
转载请注明原文地址:https://kaotiyun.com/show/ZJHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设子程序过程定义的首部为:PublicSubs(xAsInteger,YAsSingle)则以下正确的调用形式为
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger)f=1Fori=1Toxf=f*iNexts=fEndFunctionPrivate
某人编写了下面的程序PfivateSubCommandl_Click()PrivateSubpro(nAsInteger)DimaAsInteger,bAsIntegerWhile(n>0
窗体上有Command1、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommand1_Click()m=InputBox("请输入一个正
窗体上有一个文本框Text1和一个水平滚动条HScroll1,且HScroll1的Min和Max属性值分别为10和40。程序运行后,如果移动HScroll1的滚动框,则文本框Text1中的文字大小随着滚动框位置的变化同步改变。以下能实现上述操作的过程是(
在窗体上画Text1、Text2两个文本框,并编写如下程序:PrivateSubForm_Load()Text2.PasswordChar="$"EndSubPrivateSubText1_Change()Text2
关于文件操作,以下叙述中正确的是
下列叙述中正确的是
要使菜单项MenuOne在程序运行时失效,应使用的语句是()。
窗体上有文本框Text1和一个菜单,菜单标题、名称见表,结构如图所示。要求程序执行时单击“保存”菜单项,则把其标题显示在Text1文本框中,下面可实现此功能的事件过程是()。
随机试题
患者肢体经人摆布成极不舒服的姿势而长时间维持不变,此症状就是蜡样屈曲。()
A.苏子降气汤B.小青龙汤C.六君子汤D.参苓白术散E.二陈平胃散治疗痰浊壅肺型肺胀的首选方是
急性阑尾炎最典型的体征是
悬钟穴位于()
外贸手续费的计算公式正确的是()。
下列关于防火分区的划分说法错误的是()。
根据《中华人民共和国信托法》,受托人以()为限向受益人承担支付信托利益的义务。
下列数据结构中,能用二分法进行查找的是()。
F
WillaCatherwrotebecauseshefoundwriting______.WhatdidCathermeanby"theendisnothing;theroadisalt"?
最新回复
(
0
)