问答题在名称为Form1的窗体上，画1个名称为Label1的标签，其标题为“横坐标X”，且能根据标题内容自动调整标签的大小；再画1个名称为Text1的文本框，其中的文字显示为空白；再画1个名称为Picture1的图片框，大小适中即可。要求：编写适当的事件过程，使得程序运行时，如果鼠标在图片框中移动，则能在文本框Text1中显示鼠标在图片框中的当前位置的横坐标，运行情况如图所示。注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

问答题(1)在名称为Form1的窗体上建立一个二级下拉菜单(菜单项见表3．2)，运行时的窗体如图3-98所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjtl．frm。(2)在名称为Form1的窗体上画两个文本框，名称分别为Text1、Text2，均无初始内容。要求：①通过属性窗口设置适当的属性，使Text1、Text2中显示的文本的字体为“隶书”；②编写适当的事件过程，使得在Text1中输入每一个字符时，立即在Text2中显示Text1中的内容，如图3—99所示。注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjtE．vbp，窗体文件名为sjt2．frm。

问答题在考生文件夹中有一个工程文件sj3.vbp，相应的窗体文件名为sj3.frm。请在名为Form1的窗体上绘制一个名称为Text1的文本框和一个名称为Cmd1、标题为“大小写转换”的命令按钮，如下图所示。在程序运行时，单击“大小写转换”按钮，可以把Text1中的大写字母转换为小写，把小写字母转换为大写。窗体文件中已经给出了“大小写转换”按钮的Click事件过程，但不完整，请去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容。注意：不能修改程序的其他部分。最后按原文件名并在原文件夹中保存修改后的文件。

问答题在考生文件夹下有一个工程文件sjt4．vbp。程序的功能是：程序运行时，文本框中显示一篇英文短文，单击“查找”按钮时可输入查找内容，如图1所示。若未找到查找内容，查找结束；若找到查找内容，被找到的内容在文本框中以反相显示(即呈选中状态)，每找到一次都给出提示，并在左下角文本框中显示累计的次数，如图2所示，若单击提示对话框的“是”按钮，则继续向后查找；若单击“否”按钮，则终止查找。在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把?改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。

问答题(1)在名称为Form1，标题为“图片”的窗体上添加1个名称为Image1的图像框，其高为2500，宽为2000。请通过属性窗口设置适当属性，将考生文件夹下的图片文件pie1．jpg插入图像框，并使图片自动适应图像框的大小(如图所示)。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1．vbp，窗体文件名保存为sjt1．frm。(2)在名称为Form1的窗体上添加一个名称为Iabel1，标题为“口令”的标签；添加一个名称为Text1的文本框；再添加三个命令按钮，名称分别为Command1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。程序运行时，在Text1中输入若干字符，单击“隐藏口令”按钮，则只显示与字符同样数量的“*”(如图2所示)；单击“显示口令”按钮，则正常显示输入的字符(如图1所示)，单击“重新输入”按钮，则清除Text1中的内容，并把光标定位到Text1中。要求：请按要求添加所有控件，编写命令按钮的Click事件过程，程序中不得使用变量，在“显示口令”、“隐藏口令”按钮的事件过程中只能写1条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

问答题注意：下面出现的“考生文件夹”均为C:/wexam/25160002。在考生文件夹下有一个工程文件sjt5.vbp在名称为Form1的窗体上画一个文本框，名称为Text1，允许多行显示：再画3个命令按钮，名称分别为C1、C2和C3，标题分别为“输入”、“转换”和“存盘”，如图26-5所示。请编写适当的事件过程，使得在运行时，单击“输入”按钮，则从考生文件夹中读入in5.txt文件(文件中只有字母和空格)，放入Text1中；单击“转换”按钮，则把Text1中的所有小写字母转换为大写字母；单击“存盘”按钮，则把Text1中的内容存入out5.txt文件中。注意：去掉程序中的注释符，把程序中的?改为正确的内容，考生必须把转换后的内容用“存盘”按钮存入out5.txt文件，否则无成绩。考生的工程文件以文件名sjt5.vbp存盘，窗体文件以文件名sjt5.frm存盘。

问答题(1)在考生文件夹下有一个工程文件sit3．vbp，相应的窗体文件为sjt3．frm。其功能是产生20个0～1000的随机整数，放入一个数组中，然后输出这20个整数中小于500的所有整数之和。程序运行后，单击命令按钮(名称为Commandl，标题为“输出小于500的整数之和”)，即可求出这些整数的和，并在窗体上显示出来(如图2．224所示)。这个程序不完整，清把它补充完整，并能正确运行。要求：去掉程序中的注释符，把科序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sit4．vbp，相应的窗体文件为sit4．frm，在窗体上有一个命令按钮和一个文本框。程序运行后，单击命令按钮，即可计算出0～100范围内所有偶数的平方和，并在文本框中显示出来。在窗体的代码窗口中，已给出了部分程序，其中计算偶数平方和的操作在通用过程Fun中实现，请编写该过程的代码。要求：请勿改动程序中的任何内容，只在FunctionFun0和EndFunction之间填入编写的若干语句。最后把修改后的文件按原文件名存盘。

问答题(1)考生文件夹下有一个工程文件sjt3．vbp，其窗体上有1个名称为Text1的控件数组；一个标题为”排序”的命令按钮。程序运行时，在文本框数组中输入8个整数，如图3—29(a)所示；然后单击“排序”按钮，则8个整数按降序排序，如图3—29(b)所示。在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。(2)在考生文件夹下有工程文件sjt4．vbp。其窗体界面如图3—30所示，可以实现以下功能：“添加项目”按钮可以把在组合框编辑区中输入的新项目添加到组合框列表中，但不能添加重复项目；“删除项目”按钮从列表中删除选中的项目；“添加爱好”按钮把组合框编辑区中的内容追加到下面的文本框原有内容之后；“清除爱好”按钮清除该文本框内容。在给出的窗体文件中已经有了全部控件，但程序不完整。请将事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。

问答题在考生文件夹下有工程文件sjt5．vbp，窗体上有两个标题分别是“读数据”和“统计”的命令按钮，请添加一个名称为Labe11、标题为“回文的个数为”的标签和一个名称为Text1，初始值为空的文本框，如图3—87所示。程序功能如下：①单击“读数据”按钮，则将考生文件夹下in5．dat文件的内容读到变量s中。②单击“统计”按钮，则统计in5．dat文件(该文件中仅含由空格间隔开的字母串)中回文的个数，并将统计的回文个数显示在Text1文本框内。(所谓回文是指顺读与倒读都一样的字符串，如“recycer”)。“读数据”按钮和“统计”按钮的Click事件过程已经给出，请完善Function过程foundhuiwen的功能，实现上述程序功能。注意：考生不得修改窗体文件中已存在的控件和程序，在结束程序运行之前，必须先进行统计，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

问答题在名称为Form1的窗体上添加一个名称为Hscroll1的水平滚动条，其刻度范围为1～100；再添加一个名称为Text1的文本框，初始文本内容为1。程序开始运行时，焦点在滚动条上。请编写适当的事件过程，使得程序运行时，文本框中实时显示滚动框的当前位置。运行情况如图所示。注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名保存为sjt2.vbp，窗体文件名保存为sjt2.frm。

问答题(1)在考生文件夹下有一个工程文件vbsj3．vbp，相应的窗体文件为vbsj3．frm，在窗体上有一个标题为“计算”的命令按钮和一个文本框。程序运行后，单击命令按钮，即可计算出数组arr中每个元素与其下标相除所得的和，并在文本框中显示出来，程序的运行情况如图3．144所示。在窗体的代码窗口中，已给出了部分程序，其中计算数组arr中每个元素与其下标相除所得的和的操作在通用过程Fun中实现，请编写该过程的代码。要求：请勿改动程序中的其他部分，只在FunctionFun()和EndFunction之间填入你编写的若干语句并运行程序。在结束程序运行之前，必须至少正确运行一次程序，将结果显示在文本框中9否则无成绩。最后把修改后的文件按原文件名存盘。说明：数组arr中共有40个元素，“数组arr中每个元素与其下标相除所得的和”，是指：arr(1)／1+arr(2)／2+arr(3)／3+…+arr(40)／40程序源码：EndSubFunctionFun(a()AsSingle)AsSingle'由考生编写=============EndFunctionPrivateSubcmdCalClick()Dimarr，arr2(40)AsSinglearr=Array(12．5，65．4，56，73，46．23，_58．25，83．49，96，27．3，36．78，_29．26，89．4，34．7，45．4，56．9，_67．4，78，98，87．5，76．8，34．6，_55．8，64．7，43．7，99，4，84．7，_66．2，23．9，55．5，44．1，33．2，_43．5，41．2，28．3，78．6，98．3，_6．1，73．6，49．3，48．3)Fori=1ToUBound(arr)arr2(i)=arr(i)Nextir=Fun(arr2())txtResult．Text=Str(r)SaveDataEndSubSubSaveData()Open"out3．txt"ForOutputAs#1rint#1，txtReSUit．TextClose1EndSub(2)在考生文件夹下有一个工程文件vbsj4．vbp。程序运行后，如果单击“开始”按钮，则图．片vb自p左向右移动，同时滚动条的滑块随之移动，每0．5秒移动一次。当图片完全移出窗体的右边界时，立即再从窗体的左边界开始重新移动，若单击“停止”按钮，则图片停止移动，如图3．145所示。在窗体文件中已经给出了全部控件，但程序不完整。要求：请去掉程序中的注释符，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序源码：PrivateSubcmd．Start_Click()Tmr1．Enabled=TrueEndSubPriVateSubcmdStop_Click()'Tmr1．Enabled=?EndSubPriVateSubFormLoad()Hsbl．Min=0Hsbl．Max=Me．Width'Tmr1．Interval=?EndSubPriVateSubTmrlTimer()Picl．Left=Picl．Left+200'IfPicl．Left>?Then'Picl．Left=?EndIfHScroll1．Value=Picl．Left

问答题新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框(名称分别为Textl、Tex2和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框Text3后其中输出两个数的和。如图14所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc2.vbp，窗体文件名为ylc2.frm。

问答题以下数列：1，1，2，3，5，8，13，21…的规律是从第3个数开始，每个数都是其前面两个数之和。在考生文件夹下有一个工程文件sit5．vbp。窗体中已经给出了所有控件，如图所示。请编写适当的事件过程完成如下功能：选中一个单选按钮后，单击“计算”按钮，则计算出上述数列第n项的值，并在文本框中显示，n是选中的单选按钮后面的数值(提示：因计算结果较大，应使用长整型变量)。注意：不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一个单选按钮，并单击“计算”按钮以获得一个结果；必须使用窗体右上角的关闭按钮结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。

问答题在考生文件夹下有一个工程文件T507.vbp，其窗体上有一个文本框，名称为Text1；还有一个命令按钮，名称为C1，标题为“计算”，如图所示。有一个函数isprime()可以在程序中直接调用，其功能是判断参数a是否为素数，如果是素数，则返回True，否则返回False。请编写适当的事件过程，使得在运行时，单击“计算”按钮，则找出小于2000的最大素数，并显示在Text1中。注意：考生不得修改isprime()函数过程和控件的属性。试题源程序：1PrivateFunctionisprime(aAsInteger)AsBoolean2DimflagAsBoolean3flag=True4b%=25Dowhileb%＜=Int(a/2)Andflag6IfInt(a/b%)=a/b%Then7flag=False8Else9b%=b%+110EndIf11Loop12isprime=flag13EndEunction

问答题要求：请勿改动程序中的任何内容，只在Function Fun()和End Function之间填入你编写的若干语句。最后把修改后的文件按原文件名存盘。

问答题(1)在名称为Form1的窗体上画两个标签(名称分别为lblName和lblAge，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为txtName和txtAge，Text属性均为空白)和一个命令按钮(名称为cmdDisplay，标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如图3-68所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为vbsjl．vbp，窗体文件名为vbsjl．frm。(2)在名称为Form1的窗体上画一个文本框，名称为txtlnput，无初始内容；再画一个图片框，名称为picOutput。请编写适当的事件过程，使得在运行时，在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容，运行时的窗体如图3．69所示。程序中不能使用任何变量。注意：保存时必须存放在考生文件夹下，工程文件名为vbsj2．vbp，窗体文件名为Vbsj2．frm。

问答题在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘输入正整数到文本框中。在“除数”框架中选择一个单选按钮，然后单击“处理数据”命令按钮，将大于文本框中的正整数，并且能够被所选除数整除的5个数添加到列表框List1中，如图所示。在窗体文件中已经给出了全部控件，但程序不完整。要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。

问答题在名称为Forml的窗体上画一个文本框，名称为Textl，其宽度为1000；再画一个滚动条，名称为HSl。其刻度值的范围是1000～2000。请编写滚动条的Change事件过程，程序运行后，如果移动滚动框，则可按照滚动条的刻度值改变文本框的宽度。运行时的窗体如图2-77所示。程序中不能使用任何变量，事件过程中只能写一条语句。注意：保存时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．Frm

问答题在考生文件夹下有一个工程文件sjt4．vbp，Forml窗体中有一个文本框，名称为Textl；请先在窗体上添加两个框架控件，名称分别为F1、F2，标题分别为“性别”、“身份”；然后在F1中添加两个单选按钮控件Op1、Op2，标题分别为“男”、“女”；其次在F2中添加两个单选按钮控件Op3、0p4，标题分别为“学生”、“教师”；最后再添加一个命令按钮，名称为C1，标题为“确定”，如图所示。清编写适当的事件过程，使得运行时，在F1、F2中各选一个单选按钮，然后单击“确定”按钮，就可以按照下表把结果显示在文本框中。最后把修改后的文件以原来的文件名存盘。注意：考生不得修改窗体文件中已经存在的程序和Textl的属性，在结束程序运行之前，必须进行能够产生上表中一个结果的操作。必须用窗体右上角的关闭按钮结束程序，否则无成绩。

问答题(1)在名称为Form1的窗体上添加一个名称为L1，标题为“业余爱好”的标签，再添加一个名称为Ch1的复选框数组，含3个复选框，它们的Index属性分别为0、1、2，标题依次为“体育”、“音乐”、“美术”，请设置复选框的属性，使其初始状态如下表所示。程序运行后的窗体如图所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名保存为sjt1．frm。(2)在名称为Form1的窗体上添加一个名称为Text1的文本框；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Show和Hide，标题分别为“显示”、“隐藏”，请编写适当的事件过程，使程序运行时，单击“隐藏”菜单项，文本框消失；单击“显示”菜单项，文本框重新出现，程序运行后的窗体如图所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。