首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)
admin
2018-05-08
45
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)。
在in3.txt文件中,每个单词之间用一个空格字符隔开,最后一个单词的后面没有空格。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经添加所有控件,如图所示。在程序运行时,如果单击“开始”按钮,则每隔0.1秒窗体上的汽车图标向右移动一次(初始状态下不移动);如果单击“停止”按钮,则停止移动。
请完成以下工作:
①设置适当控件的适当属性,使得每0.1秒汽车图标向右移动一次,而初始状态下不移动。
②请去掉程序中的注释符,把程序中的?改为正确的内容。
③为两个命令按钮编写适当的事件过程,最后以原文件名存盘。
注意:不得修改已经给出的程序。编写事件的过程中不能使用变量,每个事件过程中只能有一条语句。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() Dim st$, ch$ Open App.Path & "\in3.txt" For Input As #1 Do While Not EOF(1) Input #1, ch ’ st= ? & ch Loop Close #1 Text1 = st End Sub Private Sub Command2_Click() Dim st$, word$, c$ st = Text1 n = Len(st) For k = 1 To n ’ ? = Mid(st, k, 1) If c <> " " Then word = word & c Else List1.AddItem word ’ ? = "" End If Next List1.AddItem word End Sub 程序结束 参考答案 第1个?处填入:st 第2个?处填入:c 第3个?处填入:word 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件, 设置计时器Interval属性为100,Enabled属性设置为False。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Timer1_Timer() ’ P1.? P1.Left + 20 End Sub 程序结束 参考答案 ?处填入:Left = ’需要考生编写的程序 Private Sub C1_Click() Timer1.Enabled = True End Sub Private Sub C2_Click() Timer1.Enabled = False End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/XqGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮执行以下程序,则输出结果为()。PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=14:y=48CallProc(x,y)Printx;yE
在窗体上有两个文本框:Textl和Text2,然后编写如下事件过程:PrivateSubForm_Load()ShowTextl.Text=““:Text2.Text=““:Text2.SetFocusEndSubPrivate
在窗体上有2个图片框,名称分别为Picturel和Picture2,Picture2中添加了香蕉图片(见图3),且将Picture2.DragMode属性设置为1。要求程序运行时,可以用鼠标把Picture2拖拽到Picturel中(见图4)。以下可以实现
当一个工程含有多个窗体时,其中启动窗体是()。
若看到程序中有以下事件过程,则可以肯定的是,当程序运行时PrivateSubClick_MouseDown(ButtonAsInteger,_ShiftAsInteger,XAsSingle,YAsSingle)
下面关于控件数组的叙述中正确的是
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定理整数组合的个数,勾股定理中三个数的关系是:a<sup>2</sup>+b<sup>2</sup>=c<sup>2</sup>,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3
下列选项中属于面向对象设计方法主要特征的是()。
面向对象方法中,继承是指()。
某二叉树的中序序列为BDCA,后序序列为DCBA,则前序序列为
随机试题
背景材料:芬兰人在买卖做成之后,会举行一个长时间的宴会,请对方洗蒸汽浴。洗蒸汽浴是芬兰人一项重要的礼节,表示对客人的欢迎,对此是不能拒绝的,因为芬兰人经常在蒸汽浴中解决重要问题和加强友谊。问题:(1)上述案例突出说明了哪种文化因素会影响国际商务谈判的风格?
我国的国家金库,按照统一领导、分级管理的财政体制设立,由财政部代理。()
适合技术资料的统计图是
A.周期性疼痛B.肿块边界清楚,活动,增长缓慢C.肿块固定,腋窝淋巴结肿大融合D.肿块有明显压痛E.摸不到肿块,乳头有时有溢液乳腺囊性增生症
出土于陕西的西周青铜器有()。
小区一幢住宅楼需要集资安装一部电梯,以方便群众上下楼。但其中的一部分住户表示反对,请问如何协调解决?
根据下面材料回答问题。2007年上半年,315消费电子投诉网共接到网游投诉4864宗.2008年上半年网游投诉为4537宗。2008年上半年投诉玩家涉及损失的金额为5798207.62元,平均每个投诉玩家损失约1277.98元.下面两图为315消
Youmaysaythatthebusinessofmarkingbooksisgoingtoslowdownyourreading.Itprobablywill.That’soneofthe【B1】_____
Books,eveninthisageofcheapliterature,costmoney?Theshortageofpaper,togetherwiththehighcostofliving,hasmade
Ifyouwanttogototheconcert,you’llhavetomakea______,ortherewillbenotickets.
最新回复
(
0
)