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

admin2010-09-02  26

问题 (1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Textl文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到Listl列表框中(如图1-36所示)。在in3.txt文件中每个单词之间用一个空格字符隔开,最后一个单词的后面没有空格。已经给出了所有控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。

(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经画出所有控件,如图1-37所示。在运行时,如果单击“开始”按钮,则窗体上的汽车图标每0.1秒向右移动一次(初始状态下不移动);如果单击“停止”按钮,则停止移动。请完成以下工作:
①设置适当控件的适当属性,使得汽车图标每0.1秒向右移动一次。而初始状态下不移动;
②请去掉程序中的注释符,把程序中的?改为正确的内容;
③为两个命令按钮编写适当的事件过程。最后以原文件名存盘。
注意:不得修改已经给出的程序。编写的事件过程中不能使用变量,每个事件过程中只能有一条语句。

选项

答案第l小题 【操作步骤】 步骤l:打开考生文件夹下的本题工程文件sjt3.vbp,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: st=st&ch c=Mid(st,k,1) word="" 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤l:打开考生文件夹中的本题工程文件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:按要求将文件保存至考生文件夹中。

解析 第l小题
    本题在“读入数据”按钮的单击事件中,首先将in3.txt文件以Input方式打开,然后利用Do循环依次读入文件中的每一个数据,在每一次循环中读入文件中的一个数据并连接至变量st中,循环结束后sl的值就是文件中所有单词连接而成的字符串。
    在“插入列表框”按钮的单击事件中,以空格为单词分隔依据找出每个单词,然后将单词插入列表框中,清空变量word准备继续寻找下一个单词。
第2小题  
   Move方法用于移动窗体或控件,其语法为:对象名.Move LeR,top,width,height。
   计时器只在设计时可见,计时器是否启用由其Enabled属性设置,值可取True或False。启用后由Interval属性设置间隔多长时间触发一次其Timer事件,Interval属性的单位为毫秒,缺省值为0,此时计时器不启用。Timerl用于控制汽车行驶,每触发一次Timerl的Timer事件,汽车向右移动20,即P1.Move P1.Left+20。
转载请注明原文地址:https://jikaoti.com/ti/7mg0FFFM
0

最新回复(0)