以下程序运行后的输出结果是【 】。 Private Sub Form _ Click() i=10 ：j=0 Do j=j+1 i=i-1 Loop while i＞2 Print j； End Sub
下列 ______语向可以为动态数组分配实际元素个数。
假定建立了一个工程，该工程包括两个窗体，其名称分别为Form1和Fom2，启动窗体为Form1。在Form1上面画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示Form2，请在【 】和【 】处将程序补充完整。 Private Sub Command1_Click( ) 【 】 form2【 】 End Sub
(1)在考生文件夹下有一个工程文件sj3．vbp，其功能是：①单击“读数据”按钮，则将考生文件夹下in3．dat文件中的100个0～999之间的整数读入到数组a中。②单击“计算”按钮，则找出这100个整数中的所有水仙花数，并将它们的最大值与最小值分别显示在文本框Textl、Text．2中。(注：当一个数的值等于该数中的各位数字的立方和时，此数被称为水仙花数。如：所以153就是一个水仙花数)在窗体文件中已经给出了全部控件(如图49—4所示)和“读数据”命令按钮的事件过程以及判断一个数是否为水仙花数的通用过程。要求编写“计算”命令按钮的事件过程。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行前，必须进行“计算”，并且必须通过单击窗体右上角的“关闭”按钮结束程序，否则无成绩。最后，程序按原文件名存盘。(2)在考生文件夹下有一个工程文件sj4．vbp，在名称为。Forml的窗体上有两个标签与三个文本框，名称分别为Labell、Label2，Textl、Text2、Text3，其中三个文本框内空，两个标签的标题分别为“横坐标”、“纵坐标”。另设一命令按钮，名称为Commandl，标题为“到原点的距离”。编写相关程序，要求程序运行时在两个文本框中输入相应的点坐标，单击“到原点的距离”后，可以在Textl和Text2中显示该点的坐标，在Text3中显示该点到原点的距离。注意：请去掉程序中的注释符“'”，把程序中的“?”改为正确的内容。但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。
在Visual Basic中，用于管理文件系统的3个控件是文件列表框、目录列表框和【 】。
设在工程中有一个标准模块；并定义了如下类型： Type Stutype ino As Integer strname AS String*20 strsex As String*2 smark As Single End Type 在窗体上画一个名为Commandl的命令按钮，要求当执行事件过程Commandl_Click时，在C盘根目录下的随机文件Student．dat中写入一条记录。下列能够完成该操作的是( )。
(1)在名称为Forml的窗体上画一个名称为Textl的文本框，其高、宽分别为600、1800。请在属性框中设置适当的属性满足以下要求：Text1的字体为“隶书”，字号为“三号”；窗体的标题为“字体大小”，不显示最大化按钮和最小化按钮，如图49—1所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjl．vbp，窗体文件名为sjl．frm。(2)在Forml的窗体上画一个文本框，其名称为Textl；再画两个命令按钮，其名称分别为Commandl和Command2、标题分别为“显示”和“清空”，编写适当的事件过程。程序运行后，如果单击“显示”按钮，则在文本框中显示“模拟考试”，并使“清空”按钮可用。此时如果单击“清空”按钮，则清空文本框，同时该按钮变为不可用。程序中不得使用任何变量。程序运行时的窗体界面如图49—2和图49—3所示。注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．vbp。
下列数据结构中，按先进后出原则组织数据的是
把窗体的Key Preview属性设置为True，然后编写如下过程： Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyVode As Integer, ShiftAs Integer) Print Chr(KeyCode+2) End Sub 程序运行后，如果按“A”键，则输出结果______。
在考生文件夹下有一个工程文件sj5．vbp，在Form1的窗体中有一个标签，3个命令按钮和一个计时器。程序的功能是：运行时，单击“开始计数”按钮，就开始计数，每隔1秒，标签中的数加l，且该按钮不可用，“倒数计数”按钮可用；单击“倒数计数”按钮时，则倒数计数，且该按钮不可用，“开始计数”按钮可用，当倒数计数到0时，则停止计数，且“开始计数”按钮可用、“倒数计数”按钮不可用；单击“关闭”按钮，则关闭窗口。注意：修改适当的控件的属性，并去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件以原来的文件名存盘。程序运行时的窗体界面如图43—5所示。
在名为Form1的窗体中建立一个弹出式菜单(程序运行时不显示)，名为file，含两个菜单项，其名称分别为save、open，标题分别为“保存”、“打开”。编写适当的事件过程，使程序运行后，若用鼠标右键单击窗体，则弹出此菜单(如下图所示)。注意：程序中不能使用变量；文件必须存放在考生文件夹中，工程文件名为execise60.vbp，窗体文件名为exeGise60.frm。
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl，编写下列程序：DimY As IntegerPrivate Sub Commandl Click()Dim X As Integer x=2 Text1．Text=p2(pl(X)，Y) Text2．Text=pl(x)End SubPrivate Function pl(X As Integer)As Integer x+X+Y：y=x+Y pl=x+YEnd FunctionPrivate Function p2(X As Integer，Y As Integer)As Integer p2=2*X+YEnd Function当单击1次和单击2次命令按钮后，文本框Textl和Text2内的值分别为（ ）。
在考生文件夹下有工程文件sj5．vbp及窗体文件sj5．frm，该程序是不完整的。在名称为Forml的窗体上有3个Label控件和2个命令按钮，数据文件sjin．dat，存放工人的编号、姓名和年龄。按“开始”按钮后，能从考生文件夹下的sjin．dat中读出数据并把年龄小于平均年龄的工人的所有数据写入考生文件夹下的sjout．dat文件中；执行完毕，“开始”按钮变成“完成”，且无效，如图37—5所示。注意：请在有“?”的地方填入正确内容，然后删除“?”及所有注释符(即“'”号)，但不能修改其他部分。存盘时不得改变文件名和文件夹，相应的dat文件也保存到考生文件夹下，否则没有成绩。
设在界面上放置了一个滚动条Hscrolll和一个标签控件Labell，请补齐以下代码，要求每次单击滚动条两端箭头，或滚动条滑块与两端箭头之间的空白区域时，滚动条的值能够反映在标签中。 Private Sub Hscrolll______________ Labell．Caption=Hscrolll______________ End Sub
已知a=5，b=／，c=12，下列表达式的值为True的是（ ）。
在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程。 Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是
概念模型是现实世界的第一层抽象，这一类最著名的模型是______。
设有声明语句： Dim b(-1 To 10，2 To 9，20)AS Integer则数组b中全部元素的个数（ ）。
在窗体上有两个文本框控件和一个命令按钮，名称分别为Text1、Text2和Command1，以下程序实现的功能是当单击Command1按钮时，将把Text2控件中的文本全部选中，并把焦点设置在该文本框中。程序运行时的界面如图20-4所示，以下两空应填()。PrivateSubCommand1_Click()TextSelStart=0Text________=Len(TextText)Text_______EndSub
在名为Form1的窗体上放置两个列表框，名称分别为List1和List2。在List1中添加“1”、“2”…“10”，并设置MultiSelect属性为2(要求在控件属性中设置)。再放置一个名为Cmd1，标题为“复制”的命令按钮。程序运行后，若单击“复制”按钮，将List1中选中的内容(至少两项)复制到List2中(如下图所示)。若选择的项数少于两项，用消息框提示“请选择至少两项”。注意：文件必须存放在考生文件夹中，窗体文件名为execise43.frm，工程文件名为execise43.vbp。