有一个工程文件ylc5.vbp，窗体上有一个单选按钮数组，含3个没有标题的单选按钮。为单选按钮添加标题“语文”、“数学”、“英语”；再添加一个标题为“显示”的命令按钮，运行后将根据单选按钮的选中情况，在窗体上显示“我喜欢语文”、“我喜欢数学”、“我喜欢英语”。要求单选按钮的初始值为英语。运行后如图21所示。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体文件名为ylc5.frm。
在窗体上有一个文本框Text1和一个标签Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图所示)，则空白处应填入的内容是()。PrivateSubText1_____________________()Labell．Caption=Text1．TextEndSub
以下程序代码用来实现如下功能：单击命令按钮弹出对话框，在其中输入正数后单击确定，弹出一个提示信息显示刚才输入的正数，否则提示"error"。请填空。Private Sub Command1_Click()Dim a As Integer，b As Stringa=InputBox("请输入一个正数")If a ＞ 0 Then______Elseb=MsgBox("error"，0)End IfEnd Sub
(1)在名称为Forml的窗体上建立一个二级下拉菜单。一级菜单的标题为“文件”，名称为vbFile，有效；二级菜单有两项，一项标题为“打开”，名称为“vbOpen”，有效，命令执行的快捷方式为Crtl+N，一项标题为“保存”，名称为“VbSaVe”，执行快捷键方式为Ctrl十S，有效，另一项标题为“关闭”，名称为“vbClose”，无效，命令执行的快捷方式为Ctrl+C。程序运行时，窗体界面如图56—1所示。注意：存盘时必须存放到考生文件夹下，工程文件名为sjl．vbp，窗体文件名为sjl．frm。(2)在名称为Forml的窗体上绘制一个名为Textl的文本框控件和一个名为Timerl的计时器控件，程序运行后，文本框中显示的是当前的日期和时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变，如图56—2所示。注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．Vbp。
在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框，然后编写如下程序； ( ) Private Sub Commandl_Click() Dim x，y，z As Integer x=5：y＝7：z=O Text1．Text="" Call Pl(x，y，z) TextText＝Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End Sub
顺序查找一般是指在【 】中查找指定的元素。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Textl的文本框，其高、宽分别为400、2000。运行后的窗体如图1-109所示。请在属性框中设置适当的属性满足以下要求：①Textl的字体为“黑体”，字号为“四号”：②窗体的标题为“输入”，不显示最大化按钮和最小化按钮。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。(2)在名称为FormI的窗体上画一个名称为Image1的图像框，利用属性窗口装入考生目录下的图像文件picl．bmp，并设置适当属性使其中的图像可以适应图像框大小；再画两个命令按钮，名称分别为Commandl、Command2，标题分别为“向右移动”、“向下移动”。请编写适当的事件过程，使得在运行时，每单击“向右移动”按钮一次，图像框向右移动100；每单击“向下移动”按钮一次，图像框向下移动100。运行时的窗体如图1-110所示。要求程序中不得使用变量，事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
在考生文件夹下有一个工程文件sj5．vbp，相应的窗体文件为sj5．frm，此外在考生文件夹下还有一个名为in5．txt的文本文件，其内容如下：10，11，12，13，14，15，16，17，18，19，20，21，22，23，24，25，26，27，28，29，30，31，32，33，34程序运行后，双击窗体，将把文件in5．txt中的数据输人到二维数组Arr中，在窗体上按5行×5列的矩阵形式显示出来，并在其下显示该矩阵左上一右下对角线的右上部分。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并使之能正确运行。程序运行效果如图2-5所示。要求：去掉程序中的注释符“'”把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
设工程中有2个窗体：Form1、Foma2，Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为“XSLNCER”，所有菜单项都可见：否则看不到“成绩录入”菜单项。为此，某人在Form1窗体文件中编写如下程序：PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenIfTex1．Text=“XSLNCER”ThenForm2．input．Visible=TrueElseForm2．input．Visible=FalseEndIfEndIfForm1．HideForm2．ShowEndSub程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是()。
(1)在考生目录下有一个工程文件sjt3．vbp，窗体文件中已给出所有控件和部分程序，如图1-118所示。要求：①利用属性窗口设置适当的属性，使Text1、Text2中数据右对齐；②请编写适当的程序完成以下功能：在Textl中输入40(度数)，选择一个单选按钮，单击“计算”按钮，则根据所选择的单选按钮，计算出相应的正弦、余弦值(保留3位小数，第4位截去，π取3．14159)，并显示在Text2中。注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须进行一种计算，在Textl中输入的必须是40，必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后程序按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp，窗体上已经给出所有控件。程序运行时，单击“开始”按钮，则汽车图标向右运动：单击“停止”按钮则汽车停止运动：移动滚动条上的滚动框，可以改变汽车的运动速度(滚动框向右移动，速度减慢)。如图1-119所示。要求如下：去掉程序中的注释符，把程序中的?改为正确的内容。提示：窗体上有一个计时器，计时器的事件过程每执行一次，汽车向右移动10，程序通过改变计时器控件的Interval属性来改变汽车的运动速度。注意：不得修改控件的属性。最后按原文件名存盘。
在名为Form1的窗体上建立一个名为Cmd1，宽度为1000、高度为500，标题为“显示”的命令按钮。编写适当的事件过程，使程序运行后，若单击“显示”命令按钮，则在窗体上显示“计算机等级考试”。运行结果如下图所示。注意：不要使用任何变量，直接显示字符串；文件必须存放在考生文件夹中，窗体文件名为execise101.frm，工程文件名为execise101.vbp。
下列程序段的执行结果为（ ）。 a=1 b=0 Select Case a Case 1 Select Case b Case 0 Print“* *0* *” Case 1 Print“* *1* *” End Select Case 2 Print“* *2* *” End Select
(1)在名称为Form1的窗体上画一个计时器，其名称为Timerl；再画一个图像框，其名称为Image1，在该图像框中装入一个图形文件．pic．icol然后画一个水平滚动条，其名称为HScrolll，Min属性值为100，Max属性值为1200，LargeChange属性值为100，SmallChange属性值为25，编写适当的事件过程。程序运行后，可以使图像框闪烁，其闪烁速度可以通过滚动条调节。要求：图像框的闪烁可以通过图像框交替地显示和隐藏来实现。程序中不得使用变量，每个事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3．vbp，窗体文件名为sjt3．frm。(2)在考生目录下有一个工程文件sjt4．vbp，包含了所有控件和部分程序，如图1-93所示。要求如下：①利用属性窗口设置适当的属性：为Listl列表框添加三个项目：宋体、黑体、楷体GB2312；Textl文本框设置初始值为“计算机”；Hscrolll水平滚动条设置最小值和最大值分别为10、50。②去掉程序中的注释符，把程序中的?改为正确的内容，完成以下功能：如果在列表框中选择一种字体，然后移动滚动条中的滚动框，则可使文本框中的文字按所选择的字体显示，并可随着滚动框的移动放大或缩小：如果不选择字体直接移动滚动框，则显示一个信息框，提示“请选择字体”。注意：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
编写如下事件过程：Private Sub Form_ KeyDown(KeyCode As Integer，Shift As Integer) If (Button And 3)= 3 Then Print "AAAA" End IfEnd Sub程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为______。
在考生文件夹下有一个工程文件execise41.vbp，相应的窗体文件为execise41.frm，此外还有一个名为in41.txt的文本文件，其内容如下：32437658281298573l42536475869713243546576879805937。程序运行后，单击窗体，将把文件in.txt中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，并输出矩阵左上一右下对角线上的数据，如下图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。注意：去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘，
(1)在考生文件夹下有一个工程文件sj3．vbp，窗体中有两个图片框，名称分别为Pic1和Pic2，其中的图片分别是一个黑色正方形和一个红色长方形，还有一个计时器控件。名称为Timerl，一个命令按钮，名称为Conmmandl，标题为“出发”。窗体文件中给出了两个事件过程，但并不完整，要求设置计时器控件的属性，使其在初始状态下不计时；设置计时器的属性，使其每隔1秒调用17imer事件过程一次。去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使得程序在运行时单击“出发”按钮，则黑色正方形每隔1秒向右移动一次，当到达Pic2的左边时停止移动。程序运行时的窗体界面如图25—3所示。注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sj4．vbp，窗体上已经有一个文本框，名称为Textl；一个命令按钮，名称为Coimmandl、标题为“输出”。请画两个单选按钮，名称分别为Optionl和Option2，标题分别为“Iteml”和“1tem2”；再画两个复选框，名称分别为Checkl和Check2，标题分别为“Item3”和“Item4”。请编写适当的事件过程，使得在运行时，单击“输出”按钮后实现下面的要求：根据选中的单选按钮和选中的复选框，在，Textl中显示“Item1包含Itera3”或“Item2包含1tem3和1tem4”等，如图25—4所示。注意：不得修改已经给出的程序和已有控件的属性。在结束程序运行之前，必须选中一个单选按钮和至少一个复选框，并单击“输出”按钮。必须使用窗体右上角的关闭按钮结束程序，否则无成绩。
窗体上有一个按钮和一个列表框，执行下列程序后的输出结果为【 】。Private Sub Command1_Click()List1.Addltem"China"List1.Addltem"USA"List1.Addltem"Japan"，1Print List1.List(2)End Sub
当在滚动条内拖动滚动块时触发（ ）。A．KeyUp事件 B。KeyPress事件C．Scroll事件D．Change事件22．下面程序的输出结果是（ ）。Private Sub Commandl Click() Ch$=“ABCDEF”End SubPrivate Sub proc(ch As String) S="" For k=Len(ch)To 1 Step-l s=s＆．Mid(ch，k，1) Next k ch=SEnd Sub
鼠标移动经过控件时，将触发控件的______事件。