一、基本操作题，请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)

1、在名称为Form1的窗体上添加一个名称为Label1，标题为“口令”的标签;添加一个名称为Text1的文本框;再添加三个命令按钮，名称分别为Command1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。程序运行时，在Textl中输入若干字符，单击“隐藏口令”按钮，则只显示与字符同样数量的“*”(如图2所示);单击“显示口令”按钮，则正常显示输入的字符(如图l所示)，单击“重新输入”按钮，则清除Textl中的内容，并把光标定位到Textl中。

要求：请按要求添加所有控件，编写命令按钮的Click事件过程，程序中不得使用变量，在“显示口令”、“隐藏口令”按钮的事件过程中只能写1条语句。存盘时必须存放在考生文件夹下，工程文件名为sit2.vbp，窗体文件名为sjt2.frm。

2、在名称为Forml的窗体上添加一个名称为Pl的图片框，请编写适当的事件过程，使得程序在运行时，每单击一次图片框，就在图片框中输出“单击图片框”，每单击图片框外的窗体一次，就在窗体中输出“单击窗体”，运行时的窗体如图所示。要求在程序中不得使用变量，每个事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjr2.vbp，窗体文件名保存为sjt2.frm。

二、简单应用题

3、在考生文件夹下有一个工程文件sjt3.vbp。窗体上有个钟表图案，其中代表指针的直线的名称是Linel，还有一个名称为Labell的标签和其他一些控件(如图1所示)。在程序运行时，若用鼠标右键单击圆的边线，则指针恢复到起始位置(如图1所示);若用鼠标左键单击圆的边线，则指针指向鼠标单击的位置(如图2所示);若鼠标左键或右键单击其他位置，则在标签上输出“鼠标位置不对”。

文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。程序中的0ncircle函数的作用是判断鼠标单击的位置是否在圆的边线上(判断结果略有误差)，是则返回True，否则返回False。符号常量如、yO是圆心距窗体左上角的距离;符号常量radius是圆的半径。

注意：不能修改程序中的其他部分和各控件的属性。最后将修改后的文件按原文件名存盘。

4、在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时，选中List1中若干个列表项(如图l所示)，单击“选中”按钮则把选中的项目移到List2中，单击“显示”，则在Text1文本框中显示这些选中的城市(如图2所示)。已经给出了所有控件和程序，但程序不完整。

要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。

三、综合操作题

5、在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前l3.项。数列产生的规律是：数列的前2项是小于l0的正整数，将此两数相乘，若乘积<10，则以此乘积作为数列的第3项;若乘积≥l0，则以乘积的十位数为数列的第3项，以乘积的个位数为数列的第4项。再用数列的最后两项相乘，用上述规则形成后面的项，直至产生了第l2项。窗体上部从左到右3个文本框的名称分别为Textl、Text2、Text3，窗体下部的文本框名称为Text4。程序运行时，在Textl、Text2中输入数列的前两项，Text3中输入要产生的项数n，单击“计算”按钮则产生此数列的前n项，并显示在Text4中。如图所示。

已经给出了全部控件，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。

注意：不得修改原有程序和控件的属性。最后把修改后的文件按原文件名存盘。

相关推荐：