问答题
(1)在考生文件夹下有一个工程文件sjt3．vbp，其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0．5秒，方框的颜色交替变为黄色和红色(黄色值为&HFFFF&；红色值为&HFF&)；若单击鼠标右键，则停止变色；若单击鼠标左键，则方框左上角移到鼠标点击的位置处(如图2-45所示)。请将事件过程中的注释符去掉，把?改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4．vbp，其窗口上有2个名称分别为Commandl和Command2，标题分别为“开始查找”和“重新输入”的命令按钮；有2个名称分别为Text1和Text2、初始值均为空的文本框。 1)在Text1文本框中输入仅含字母和空格(空格用于分隔不同的单词)的字符串后，单击“开始查找”按钮，则可以将输入字符串中最长的单词显示在Text2文本框中，如图2-46所示； 2)单击“重新输入”按钮，则清除Text1和Text2中的内容，并将焦点设置在Text1文本框中，为下一次输入做好准备。请将“开始查找”命令按钮Click事件过程中的注释符去掉，把?改为正确内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序。最后，程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4．vbp，其窗口上有2个名称分别为Commandl和Command2，标题分别为“开始查找”和“重新输入”的命令按钮；有2个名称分别为Text1和Text2、初始值均为空的文本框。 1)在Text1文本框中输入仅含字母和空格(空格用于分隔不同的单词)的字符串后，单击“开始查找”按钮，则可以将输入字符串中最长的单词显示在Text2文本框中，如图2-46所示； 2)单击“重新输入”按钮，则清除Text1和Text2中的内容，并将焦点设置在Text1文本框中，为下一次输入做好准备。请将“开始查找”命令按钮Click事件过程中的注释符去掉，把?改为正确内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序。最后，程序按原文件名存盘。
【正确答案】正确答案：第1小题 【知识点拨】鼠标事件分点击事件和状态事件：点击事件有单击(Click)和双击(DblCliek)，不区分左键、右键；状态事件有按下(MouseDown)、移动(MouseMove)和弹起(MouseUp)，能够区分出鼠标的左键、有键和中间键。按下鼠标键事件过程的一般格式为： Private Sub Form_MouseDown(Button As Integer， Shift As Integer，X As Single，Y As Single) End Sub 其中各参数的含义：Button表示被按下的鼠标键，可以取3个值，1为左键、2为右键、4为中间键：ShiR表示Shift键、Ctrl键和Alt键的状态，ShiR键为1、Ctrl键为2、Alt键为4；X，Y表示鼠标光标的当前位置。 【操作步骤】 步骤1：打开考生文件下的本题工程文件sjt3．vbp，在代码编辑窗口中，_去掉程序中的注释符“”’，将问号“?”改为正确的内容。 参考代码： Timerl．Interval=500 Shapel．Left=X Shapel．Top=Y Timerl．Enabled=False If Shapel．BackColor=vbRed Then 步骤2：按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1：打开考生文件下的本题工程文件sjt4．vbp，在代码编辑窗口中，去掉程序中的注释符“”’，将问号“?”改为正确的内容。 参考代码： word—s=S S=Mid(s，m+1) If n
【答案解析】