在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String，n As Integer str=UCase(Chr(KeyAscii)) n=Len(str) Text1．Text=String(n，str) End Sub 程序运行后，如果在文本框中输入字母“P”，则在文本框中显示的内容为( )。
设有如下的记录类型： Type Student Number As String Name As String Age As Integer End Type 则能正确引用该记录类型变量的代码是( )。
(1)在考生文件夹中有一个工程文件sj3．vbp和一个窗体文件sj3．frm。窗体上有一个名为Textl的文件框，一个标题为“计算”、名称为Commandl的命令按钮和一个组合框。请在名为Combo1的组合框中输入3个列表项：“5”、“9”和“13”(列表项的顺序不限，但必须是这3个数字)，程序运行情况如图36—3所示。请编写适当的事件过程，使得程序运行时，在组合框中选定一个数字后，单击“计算”按钮，则计算4000以内能够被该数整除的所有数之和，并放入Textl中。最后，按原文件名存盘(提示：由于计算结果较大，应使用长整型变量)。注意：不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须至少进行一次计算。必须用窗体右上角的关闭按钮结束程序，否则无成绩。(2)在考生文件夹中有一个工程文件sj4．vbp及窗体文件sj4．frm。在名为Forml的窗体上有一个圆和一条直线(直线的名称为Linel)构成一个钟表的图案；有两个命令按钮，名称分别为Commandl和Command2，标题分别为“开始”和“暂停”；还有一个名为Timerl的计时器。程序运行时，钟表指针不动，单击开始按钮，则钟表上的指针(即Linel)开始顺时针旋转(每秒转6。，一分钟转一圈)；单击暂停按钮，则指针暂停旋转。运行时的窗体如图36—4所示。请设置计时器的适当属性，使得每秒激活计时器的Timer事件一次；编写两个按钮的Click事件过程。文件中已经给出了所有控件和部分程序，不得修改已有程序和其他控件的属性；编写的事件过程中不得使用变量，且只能写一条语句。最后，按原文件名并在原文件夹中保存修改后的文件。注意：保存时必须存放到考生文件夹下，工程文件名为sj4．vbp，窗体文件名为sj4．frm。
在考生文件夹下有一个工程文件sjt5,vbp。其窗体中有一个名称为Textl的文本框数组，下标从0开始。程序运行时，单击“产生随机数”按钮，就会产生10个3位数的随机数，并放入Textl数组中，如图1-25(a)所示；单击“重排数据”按钮，将把Textl中的奇数移到前面，偶数移到后面，如图1-25(b)所示。文件中已经给出了所有控件和部分程序。要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。提示：在“重排数据”按钮的事件过程中有对其算法的文字描述，请仔细阅读。
下列程序段的执行结果为（ ）。 I=9 X=5 Do I=I+1 x=X+2 Loop Until 1>=7 Print“I=”；I： Print“x=”：x
在名为Form1的窗体上绘制一个文本框，名为Text1，无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名为Op，此菜单下含有两个菜单项，名称分别为Dis和Hid，标题分别为“显示”和“隐藏”。请编写适当的事件过程，使得在运行时，单击“显示”，菜单项：则在文本框中显示“等级考试”；如果单击“隐藏”命令，则隐藏文本框。运行时的窗体如下图所示。注意：文件必须存放在考生文件夹中，工程文件名为execise102.vbp，窗体文件名为execiSe102.frm。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Labell的标签，标签的宽和高分别为2000、300，有边框，并利用属性窗口设置适当的属性，使其居中显示“等级考试”，并使标签的外观如图1-226所示。运行后的窗体见图1．226。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。(2)在名称为Forml的窗体上画一个名称为Imagel的图像框，有边框，并可以自动调整装入图片的大小以适应图像框的尺寸；再画三个命令按钮，名称分别为Commandl、Command2、Cornmand3，标题分别为“红桃”、“黑桃”、“清除”。在考生目录下有两个图标文件，其名称分别为“Misc34．ico”和“Misc37．ico”。程序运行时，单击“红桃”按钮，则在图像框中显示红桃图案(即Misc34．ico文件，如图1-227所示)；单击“黑桃”按钮，则在图像框中显示黑桃图案(即Misc37．ico文件)；单击“清除”按钮，则清除图像框中的图案。请编写相应控件的Click事件过程，实现上述功能。注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
在考生文件夹下有一个工程文件sjt5．vbp，相应的窗体文件为sjt5．frm，此外还有一个名为datain．txt的文本文件，其内容如下：32437658281298573142536475869713243546576879805937程序运行后单击窗体，将把文件datain．txt中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，并输出矩阵右上．左下对角线上的数据，如图1-70所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
叙述中错误的是（ ）。
要选择多个不相领的控件，按住【 】咸SHIFT 键不放，再单击要选择的控件。
决定一个窗体有无控制菜单的属性是( )。
在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程： PriVate Sub Commandl_CUck() Dimalt(1 To 100)As Integer Fori=1 To 100 arr(i)=Int(Rnd*1000) Nexti Max=arr(1) Min=arr(1) Fori=1 To 100 If [12] Then Max=arr(i)
下面不是Visual Basic的数据类型。
以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Pfivate Sub Commandl_Click() x=Valflbxt1．Text) If______________Then Print x Else ______________ Text1．Fext=“” EndIf End Sub
在考生文件夹下有工程文件sj5．vbp及窗体文件sj5．frm，该程序是不完整的。在名称为Forml的窗体上有3个Label控件和2个命令按钮，命令按钮的名称为Commandl与Command2，标题为“读取”与“保存并退出”。考生文件夹下的数据文件in5.txt存放一些字符。要求程序运行时，按“读取”按钮后，从考生文件夹下的in5．txt中读出数据并识别出其中的非字母元素，按“保存并退出”按钮后，将非字母元素写入考生文件夹下的out5．txt文件中(以标准格式在一行中输出)；执行完毕，“读取”按钮变成“完成”，且无效(变灰)，单击“保存并退出”按钮，程序结束，如图29—5所示。注意：请将程序代码补充完整，但不能修改其他部分。存盘时不得改变文件名和文件夹，相应的txt文件也保存到考生文件夹下，否则没有成绩。
下列程序执行后，变量X的值为（ ）。Dim fl，b，c，d As SingleDim X As Singlefl=10b=30If b>fl Then d=fl：fl=b：b=dEnd IfIf b>C Then X=bElse If fl>c Then X=CElse X=aEnd If
在考生文件夹中有工程文件execise67.vbp及窗体文件execise67.frm。在名为Form1的窗体上有3个Labe1控件和两个命令按钮，Labe1控件均为提示信息。命令按钮名称分别为Cmd1和Cmd2，标题分别为Quit和Begin。程序运行后，单击Begin按钮，程序自动利用循环计算1+1/2+1/3+...+1/10的结果，并把结果写入到考生文件夹中out67.dat文件中。执行完毕，Begin按钮变成End按钮，且无效(变灰)，参见下图。要求：在有问号“?”的地方填入正确内容，然后删除“?”及所有注释符“'”，但不得修改其他部分。保存时不得改变文件名和文件夹。
在Form1窗体上绘制一个名为Text1的文本框，然后建立一个主菜单，标题为“操作”，名为vbOp，该菜单有两个菜单项，其标题分别为“显示”和“清除”，名称分别为vbDis和vbClear。编写适当的事件过程，使程序运行后，若单击“操作”菜单中的“显示”命令，在文本框显示VisualBasic；如果单击“清除”命令，则清除文本框中显示的内容。程序的运行情况如下图所示。注意：文件必须存放在考生文件夹中，工程文件名为execise9.vbp，窗体文件名为execise9.frm。
(1)考生文件夹中有工程文件sjt3．vbp。在窗体上有名称为Combo1的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图1-32(a)所示，单击“输入正整数”按钮，通过输入对话框输入一个正整数，再单击“判断”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图1-32(b)所示的是输入56且选中的组合框选项为“判奇偶数”时显示的信息框。在给出的窗体文件中已经有了全部控件，但程序不完整，要求：按照题目要求设置组合框的有关属性，去掉程序中的注释符，把程序中的?改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。(2)在考生目录下有一个工程文件sjt4．vbp。窗体上有一大一小两个名称分别为Shape2、Shapel的Shape控件。请在属性窗口中将Shapel控件设置为圆形，并将其颜色设置为红色(颜色值为&H000000FF&)，如图1-33所示。要求：当单击窗体时，Shapel移动到矩形(即Shape2)左上角，再次单击窗体，则Shapcl移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：在属性窗口中设置有关的属性值，去掉程序中的注释符，把程序中的?改为正确的内容。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
已知A$=“Welcome”，下列语句操作能够正确执行的是( )。