首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3—1
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3—1
admin
2017-03-27
62
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3—176所示)。在in3.txt文件中每个单词之间用一个空格字符隔开,最后一个单词的后面没有空格。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经画出所有控件,如图3—177所示。在运行时,如果单击“开始”按钮,则窗体上的汽车图标每0.1秒向右移动一次(初始状态下不移动):如果单击“停止”按钮,则停止移动。
请完成以下工作:
①设置适当控件的适当属性,使得汽车图标每0.1秒向右移动一次,而初始状态下不移动;
②请去掉程序中的注释符,把程序中的?改为正确的内容;③为两个命令按钮编写适当的事件过程。最后以原文件名存盘。
注意:不得修改已经给出的程序。编写的事件过程中不能使用变量,每个事件过程中只能有一条语句。
选项
答案
第1小题 步骤1:打开考生文件夹下的工程文件sjt3.vbp,打开代码编辑窗门,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: st=st&ch c=Mid(st,k,1) word=" " 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,将计时器Timer1的Enabled属性设置为False,Interval属性设置为100。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容并编写两个命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() Timer1.Enabled=True End Sub Private Sub C2_Click() Timer1.Enabled=False End Sub Private Sub Timer1_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,此时计时器不启用。
Timer1用于控制汽车行驶,每触发一次Timer1的Timer事件,汽车向右移动20,即P1.MoveP1.Left+20。
转载请注明原文地址:https://kaotiyun.com/show/8hGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程;OptionBase0PrivateSubCommand1_Click()DimcityAsVariantcity=Array("北
下面属于黑盒测试方法的是()。
下列特征中不是面向对象方法的主要特征的是()。
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
下列叙述中正确的是()。
下列叙述中正确的是()。
下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。PrivateSubCommand1_Click()x=Val(Text
以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。PrivateSubForm_click()Dimx,yAsSingleDimzAsIntegerx=InputBox("
随机试题
以下哪种行为破坏了茶艺人员服务规范
腕关节掌侧玻璃切割伤,出现哪项体征说明有正中神经损伤
师某几年来共盗窃自行车五百多辆,案发后在横穿公路时突被一辆卡车撞死。司法机关对师某的盗窃行为可能作出的正确决定是()。
向已有地方标准的区域排放污染物时,应当执行()。
下列适用15%的企业所得税税率的企业所得有()。
国家信用的主要形式有()。
已知下列非齐次线性方程组:求解方程组(I),用其导出组的基础解系表示其通解;
MoneyinAmericaMoneyisusedtobuygoodsorservicesand【1】______debts. 【1】_________InAmerica,moneysupplycon
Americansareahighly【B1】______people.Whatfactorscausethemtomove?Thedesireforeconomicbettermentis【B2】______themo
A、Theplaneissafeeveniftwoofitsenginesfail.B、Therearethreeenginesoneachofthegiantjetplane.C、Thereisanext
最新回复
(
0
)