问答题(1)在考生文件夹下有一个工程文件sit3．vbp，相应的窗体文件为sit3．frm。在名称为Forml的窗体上有一个名称为Text1的文本框和名称为Command1、标题为“确定”的命令按钮，一个名称为List1的列表框和两个名称分别为Option1和Option2、标题分别为“添加”和“删除”的单选按钮，如图2．3(a)所示。程序运行后，如果选择单选按钮Optionl并在文本框中输入一个字符串，然后单击“确定”命令按钮，则把文本框中的字符串添加到列表框中，并清除文本框，如图2—3(b)所示；如果选择列表框中的一项和单选按钮Option2，并单击“确定”命令按钮，则删除列表框中所选择的项目，如图2．3(c)所示；如果不选择列表框中的项目，或者没有在文本框中输入字符串，则单击“确定”命令按钮后，将显示一个信息框“未输入或未选择项目”，如图2—3(d)所示。该程序不完整，请把它补充完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。(2)在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sit4．frm。在窗体上有一个命令按钮，其名称为Commandl，标题为“计算”。程序运行后，如果单击命令按钮，程序将根据下面的公式计算π的值：n／4=1．1／3+1／5．1／7+……，所提供的窗体文件已给出了命令按钮的事件过程，程序运行结果如图2．4所示。该程序不完整，请把它补充完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。

问答题请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框，名称为Text1，内容为“VB程序设计”；再画两个命令按钮，其名称分别为Command1和Command2，标题分别为“扩大”和“缩小”，如图3—93所示，编写适当的事件过程。程序运行后，每单击Command1命令按钮一次，文本框中文本的字体扩大1．2倍；每单击Command2单选按钮一次，文本框中文本的字体缩小1．2倍。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjjt1．frm。(2)在名称为Form1的窗体上画一个列表框，其名称为List1，通过属性窗口向列表框中输入9个项目，分别为10、20、30、40、50、60、70、80、90；画一个文本框，其名称为Text1，初始内容为空白；再画一个水平滚动条，其名称为HScroll1，Min属性和Max属性分别为0和100，如图3—94(a)所示，编写适当的事件过程。程序运行后，如果单击列表框中的某个项目，则在文本框中显示该项目内容，并把滚动条的滚动框移到相应的位置，如图3—94(b)所示。要求：不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

问答题请根据以下各小题的要求设汁Visua1Basic应用程序(包括界面和代码)。(1)在名称为Forml、标题为“鼠标光标形状”的窗体上画一个名称为Text1的文本框。请通过属性窗口设置适当属性，使得程序运行时，鼠标在文本框中时，鼠标光标为箭头(Arrow)形状；在窗体中其他位置处，鼠标光标为十字(Cross)形状。注意：存盘时必须存放在考生文件夹下，工程义件名为sjtl．vbp，窗体文件名为sjtl．frm。(2)在名称为Forml的窗体上画两个标签，名称分别为Label1、Label2，标题分别为“扦始位置”、“选中的字符数”；画三个文奉框，名称分别为Text1、Text2、Text3，再画一个名称为Commandl，标题为“显示选中信息”的命令按钮。程序运行时，存Text1中输入若干字符，并用鼠标选中一些字符后，单击“显示选中信息”按钮，则把选中的第一个字符的顺序号显示在Text2中，选中的字符个数显示在Text3中，如图2．139所示。要求：画出所有摔什，编写命令按钮的Click事件过程。注意：要求程序中小得使用变量，事什过程中只能写两条语句，分别用于显示第一个字符的顺序号和显示选中的字符个数。存龠时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

问答题在考生文件夹下有一个工程文件sjt5.vbp，其窗体中有一个实心圆。程序运行时，当用鼠标左键单击窗体任何位置时，实心圆则向单击位置直线移动；若用鼠标右键单击窗体，则实心圆停止移动。窗体文件中已经给出了全部控件，但程序不完整。 要求：请在程序中的横线处填写正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。 [题目提供的源程序] Dim stepy As Integer '纵向移动增量 Dim stepx As Integer '横向移动增量 Const LEFT_BUTTON=1 Private Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) Dim x0 As Integer, y0 As Integer, a As Single, radius As Integer radius=Shape1.Width/2 '圆的半径 If Button=LEFT_BUTTON Then x0=Shape1.Left+radius '圆心的x坐标 y0=Shape1.Top+radius '圆心的y坐标 If x=x0 Then stepy=Sgn(y-y0)*50 stepx={{U}} {{U}} {{/U}} {{/U}} Else a=(y-y0)/(x-x0) '斜率 stepx=Sgn(x-y0)*50 {{U}} {{U}} {{/U}} {{/U}}=a * stepx If Abs(stepy)＞Abs(stepx) Then stepy=Sgn(y-y0)*50 stepx=stepy/a End If End If {{U}} {{U}} {{/U}} {{/U}}=True Else {{U}} {{U}} {{/U}} {{/U}}=False End If End Sub Private Sub Timer1_Timer() Shape1.Move Shape1.Left+stepx, Shape1.Top+{{U}} {{U}} {{/U}} {{/U}} End Sub

问答题请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为。Form1，标题为“图书”的窗体上画1个名称为Cmb1的下拉式组合框。下拉列表中有“少儿读物”“传记文学”和“武侠小说”3个表项内容。运行后的窗体如图3—14所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。(2)在名称为Form1的窗体上，画1个能根据标题内容自动调整大小的标签，其名称为Label1，标题为VisualBasic，字号为14号字。再画2个名称分别为Command1、Command2，标题分别为“放大”“缩小”的命令按钮。效果如图3—15所示。要求：编写适当的事件过程，使得每单击“放大”按钮一次，Label1中所显示的标题内容自动增大3个字号；每单击“缩小”按钮时，Label1中所显示的标题内容自动缩小3个字号。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

问答题请根据以下各小题的要求设计VisaulBasic应用程序(包括界面和代码)。1．在窗体(名称为Form1)上画1个列表框(名称为L1)和1个水平滚动条(名称为HS1，Min属性为0，Max属性为100，SmallChange属性为2，LargeChange属性为10)，编写适当的事件过程。程序运行后，如果把滚动框移到某个位置，然后单击窗体，则在列表框中显示“滚动条的当前值是：xx”，如图1—1所示，其中xx是滚动框所在的位置。存盘时，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。2．在名称为Form1的窗体上画一个文体框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能：1)在文本框中可以显示多行文本2)在文本框中显示垂直滚动条3)文本框中显示的初始信息为“程序设计”4)在文本框中显示的字体为三号规则黑体5)窗体的标题为“设置文本框属性”。完成设置后的窗体如图1—2所示。要求：不编写任何代码。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

问答题在下有一个工程文件sjt5.vbp，界面如图所示，其功能如下：①单击“读数据”按钮，则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数，共计120个整数)读到数组a中；②单击“计算”按钮，则对每组数求平均值，并将所求各级数的平均值截尾取整后存入s数组中；③单击“显示”按钮，则将所求各组数的平均值显示在文本框架Text1中；④单击“存盘”按钮则把计算结果存盘。在给出的窗体文件中已经有了全部控件，且“读数据”、“显示”和“存盘”按钮的Click事件过程已经给出，请为“计算”按钮编写适当的事件过程以实现上述功能。注意：不得修改已经存在的程序，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。

问答题注意：下面出现的“考生文件夹”均为c：/wexam/25160001。(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即'号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：在窗口中有一个RichText文本框控件和一个文本框控件，名称分别为rtx1和Text1，两个命令按钮，名称分别为Command1和Command2，标题分别为“加入SJT01.TXT”、“统计字符个数”。要求程序运行后，单击command1将考生文件夹下的sjt01.txt的内容显示到rtx1中；单击“统计字符个数”按钮统计rtx1中有多少个字符，将结果显示在Text1中。程序运行结果如图13-4所示。(2)在考生文件夹下有工程文件sjt4.vbp及窗体文件sjt4.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即'号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：在窗体上有一个名为Image1的图像框，要求程序运行后，鼠标左键点击图像框，则图像框变大；鼠标右键点击图像框，图像框变小。设计界面如图13-5所示。

问答题在考生文件夹下有一个工程文件sjt5．vbp，窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮，有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”：再画2个名称分别为Text1和Text2、初始内容都为空的文本框，并且可多行显示，有乖直滚动条，如图3-47所示。程序功能如下：1)单击“读数据”按钮，则把考生文件夹下in5．dat文件中的100个正整数读入数组A，并将它们显示在Text1文本框中；2)单击“排序”按钮，则首先将这100个数中的所有完全平方数放入数组B中，并将它们按降序排列显示在Text2文本框中。提示：一个整数若是另一个整数的平方，那么它就是完全平方数。如144=122，所以144就是一个完全平方数。要求：去掉注释符，把?改为正确内容，并添加代码使得“排序”命令按钮的Click事件过程可以实现上述功能。提示：Sort过程可以把求出的完全平方数进行排序，可以直接调用。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行“排序”，且须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

问答题在考生文件夹下有一个数据库文件“samp3．accdb”，里面已经设计了表对象“tEmp”、窗体对象“fEmp”、宏对象“mEmp”和报表对象“rEmp”。同时，给出窗体对象“fEmp”的“加载”事件和“预览”及“打印”两个命令按钮的单击事件代码，请按以下功能要求补充设计。 (1)将窗体“fEmp”上的标签“bTitle”以“特殊效果：阴影”显示。 (2)已知窗体“fEmp”上的3个命令按钮中，按钮“btl”和“bt3”的大小一致且左对齐。现要求在不更改“bt1”和“bt3”大小位置的基础上，调整按钮“bt2”的大小和位置，使其大小与“bt1”和“bt3”相同，在水平方向左对齐“bt1”和“bt3”，竖直方向在“bt1”和“bt3”之间的位置。 (3)在窗体“fEmp”的“加载”事件中设置标签“bTitle”以红色文本显示；单击“预览”按钮(名为“bt1”)或“打印”按钮(名为“bt2”)，事件过程传递参数调用同一个用户自定义代码(mdPnt)过程，实现报表预览或打印输出；单击“退出”按钮(名为“bt3”)，调用设计好的宏“mEmp”，以关闭窗体。 (4)将报表对象“rEmp”的记录源属性设置为表对象“tEmp”。 注意：不要修改教据库中的表对象“tEmp”和宏对象“mEmp”；不要修改窗体对象“fEmp”和报表对象“rEmp”中未涉及的控件和属性。 程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计，不允许增删和修改其他位置已存在的语句。

问答题考生文件夹下有一个工程文件sjt5．vbp。在窗体Form1上有两个标题分别是“产生数据”和“重新排列”的命令按钮，有两个标题为“原始数据”和“排列数据”的标签。程序功能如下。①单击“产生数据”按钮，则随机产生20个一位整数，存入数组a中，并同时显示在Text1中。②单击“重新排列”按钮，则重新排列数组a中的元素：使等值的元素相邻存放，并且保持它们在数组a中首次出现的相对次序；最后将排列结果显示在Text2中。某一次运行结果如图所示。请将“审新排列”按钳的Click事件过程中的注释符去掉，把“?”改为正确内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。

问答题(1)请在名称为Form1的窗体上添加一个名称为H1的水平滚动条，并在属性窗口中设置它的属性值，使其满足下列要求：它的最小刻度值为1，最大刻度值为100，在程序运行时，用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sitl．vbp，窗体文件名为sitl．frm。(2)在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框，初始内容均为空；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单卜含有两个菜单项，名称分别为Copy和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在程序运行时，单击“复制”选项菜单，则把Text1中的内容复制到Text2中，单击“清除”选项菜单，则清除Text2中的内容(即在Text2中填入空字符串)。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

问答题注意：下面出现的“考生文件夹”均为c：/wexam/25160001。请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框，名称为Text1：再画两个命令按钮，名称分别为C1和C2，标题分别为“隐藏”和“显示”。请编写适当的事件过程，使得在运行时，如果单击“隐藏”按钮，则文本框消失，而如果单击“显示”按钮，则文本框显示出来，如图9-1和图9-2所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。(2)在窗体上画两个文本框，名称分别为Text1和Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在Text1中每输入一个字符，则显示一个“*”，同时在Text2中显示输入的内容，如图9-3所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

问答题在名称为Form1的窗体上添加一个名称为Shape1的形状控件，位置在窗体的顶部，在属性窗口中将其设置为圆形。添加一个名称为Timer1的计时器，在属性窗口中将其设置为禁用，时间间隔为0.5秒，窗体如图所示。请编写窗体的Load事件过程和计时器的事件过程，使得程序一开始运行，计时器即变为可用，且每隔0.5秒形状控件向下移动100。注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在下，工程文件名保存为sjt2.vbp，窗体文件名保存为sjt2.frm。

问答题在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均使用默认名称。程序的功能是：①如果单击“读数据”命令按钮，则把考生文件夹下in5．dat文件中两组已按升序方式排列的数(每组30个数)分别读入数组A和B，并分别将它们显示在Text1、Text2中；②如果单击“合并”命令按钮，则将A、B两个数组合并为另一个按升序方式排列的数组C，并将合并后数组C中的数据依升序方式显示在Text3中。窗体中给出了所有控件(如图3—155所示)以及“读数据”命令按钮的Click事件过程，请完善“合并”命令按钮的Click事件过程，使其实现上述功能。注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行合并操作，且必须通过窗体右上角的“关闭”按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

问答题在考生文件夹下有一个工程文件sjt5．vbp，已给出了所有控件(如图3．141所示)和部分程序。程序运行时，请按以下顺序操作：1)单击“读入文件”按钮，把考生目录下的文件in5．dat中的内容读入内存并显示在上面的文本框(Text1)中；2)单击“加密”按钮，则可对Text1中的内容进行加密并显示在下面的文本框(Text2)中。3)单击“存结果"按钮则把Text2中的内容存到out5．dat文件中。加密规则：对于第奇数个字符，若是字母，则把它变为它后面的字符(若为“Z”则变为“A”)，不是字母则不变；对于第偶数个字符，若是字母，则把它变为它前面的字符(若为“A”则变为“Z”)，不是字母则不变。大小写字母都遵循此规则。例如：若原有的字符是：AbbaZOHa-MnnKYzx则加密后的字符是：BaczAFGb-NmojXaw已经给出“存结果”按钮的Click事件过程和函数isletter，函数isletter(aAsString)判断变量a中是否为一个字母，若是则返回True，否则返回False，可以直接调用。请编写“读入文件”按钮和“加密”按钮的Click事件过程，以实现上述功能。(in5．dat文件中只含英文单词和空格，不分段落和行)注意：考生不得修改已经存在的程序，必须用“存结果"按钮存储加密结果，否则无成绩。最后，按原文件名把程序存盘。

问答题在考生文件夹下有一个工程文件sjt4.vbp。窗体上的控件如图所示。程序运行时，若选中“累加”单选按钮，则“10”、“12”菜单项不可用，若选中“阶乘”单选按钮，则“1000”、“2000”菜单项不可用(如图所示)。选中菜单中的一个菜单项后，单击“计算”按钮，则相应的计算结果在文本框中显示(例如，选中“累加”和“2000”，则计算1+2+3+…+2000，选中“阶乘”和“10”，则计算10!)。单击“存盘”按钮则把文本框中的结果保存到考生文件夹下的out4.dat文件中。要求：编写“计算”按钮的Click事件过程。注意：不得修改已经存在的程序，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。

问答题中有一个工程文件sjt4.vbp。窗体上有两个文本框和一个标题为“运算”的命令按钮。程序的功能是，当程序运行时，单击“运算”按钮，能够产生10个1～100之间的随机整数，并显示在上面一个文本框中，然后，程序从中找出一个最大值，并将最大值与第1个数互换位置，最后把结果显示在下面一个文本框中。下图为程序某次运行的结果。程序已经给出，但不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。

问答题(1)在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sjt3．frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮；两个水平滚动条，名称分别为Hscroll1和Hscroll2，其Max属性均为100，Min属性均为1；四个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“运算数1”、“运算数2”、“运算结果"和空白；此外还有一个包含四个单选按钮的控件数组，名称为Optionl，标题分别为“+”、“．”、“*”和“／”，如图3—129(a)所示。程序运行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击计算按钮，相应的计算结果将显示在Label4中，程序运行情况如图3．129所示。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分，也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。(2)在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sjt4．frm。在窗体上有一个命令按钮，其名称为Command1，标题为“输／k／显示”；此外还有一个文本框，其名称为Text1，初始内容为空白。程序的功能是，程序运行后，单击命令按钮，显示输入对话框，在对话框中输入某个月份的数值(1～12)，然后单击“确定”按钮，即可在文本框中输出该月份所在的季节。例如输入5，将输出“5月份是夏季”，如图3．130所示。程序不完整，请补充完整。要求：去掉程序中的注释符，把程序中的“?”改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。