(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3—1

admin2017-03-27  25

问题 (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://jikaoti.com/ti/AOy0FFFM
0

最新回复(0)