在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialogFlags=cdlOFNHideReadOnly CommonDialogFilter="All Files(*.*)｜*.*｜Text Files" &_ "(*.txt)｜*.txt｜Batch Files(*.bat)｜*.bat" CommonDialogFilterIndex=2 CommonDialogShowOPen MsgBox CommonDialogfilename End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。
在窗体上绘制一个列表框，名为List1，通过属性窗口向列表框中添加4个项目，分别为ltem1、Item2、Item3和Item4。编写适当的事件过程，使程序运行后，每次单击列表框中的任何一项，则总在最后面添加一项Item5。程序的运行情况如下图所示。注意：程序中不得使用任何变量c文件必须存放在考生文件夹中，工程文件名为execise42.vbp，窗体文件名为execise42.frm。
执行以下程序段，并输入1.23，则程序的输出结果应是【 】。 N=Str(InputBox(“请输入一个实数：”)) p=IiaStr(N，".") Print Mid(N，p)
在考生文件夹中有一个工程文件execise11.vbp及窗体文件execise11.frm。在名为Form1的窗体上有两个列表框，名称分别为List1和List2，在List2中已经预设了内容：还有两个命令按钮，名称分别为Cmd1和Cmd2,。标题分别为Add和Delete。如下图所示。程序的功能是在运行时，如果选中右边列表框中的一个列表项，单击Add按钮，则把该项移到左边的列表框中；若选中左边列表框中的一个列表项，单击Delete按钮，则把该项移回右边的列表框中。注意：文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容。但不得修改程序的其他部分，也不得修改控件的属性。最后，按原文件名并在原文件夹中保存修改后的文件。
请根据以下各小题的要求设计VsualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组，名称为cmdl，下标分别为0、1、2，Caption分别为“开始”、“停止”和“退出”，如图1-30(a)所示。通过属性窗口设置各命令按钮的属性，使得程序开始运行时，“停止”按钮不可见。“退出”按钮不可用．如图1-30(b)所示。注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjtl．frm，工程文件名为sjtl．vbp。(2)在名称为Forml的窗体上画两个名称分别为Commandl和Command2、标题分别为“打开”和“保存”的命令按钮，和一个名称为CDI的通用对话框，如图1-31所示。请在属性窗口中设置CDI的属性，使得打开通用对话框时，其初始路径是“C：＼”。再编写适当的事件过程，使得运行程序，分别单击“打开”或“保存”按钮时，相应地出现“打开”或“保存”对话框。要求程序中不得使用变量，每个事件过程中只能写一条语句。注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt2．frm，工程文件名为sjt2．vbp。
结构化系统设计阶段的目的是______。
有如下事件过程。 Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) If(Button And 3)=3 Then Print "OK" End If End Sub 程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是
输入任意长度的字符串，要求将字符顺序倒置，例如，将输入的“ABCDE”变换成 “EDCBA”。请把程序补充完整。 Private Sub Commandl_Click Dim a$，i％，c$，d$ a=InputBox$(“输入任意字符串”) n=Len(a) For i=1 to______________ c=Mid(a．i．1) Mid(a，i，1)=______________ ______________=c Next i Printa End Sub
在考生文件夹中有一个工程文件execise56.vbp和窗体文件execise56.frm。请在名为Form1的窗体上绘制3个文本框，其名称分别为Text1、Text2和Text3，文本框内容分别设置为“等级考试”、“计算机”和空白。然后绘制2个单选按钮，其名称分别为Opt1和Opt2，标题分别为“交换”和“连接”。编写适当的事件程序，使程序运行后，如果选中“交换”单选按钮并单击窗体，则Text1文本框中内容与Text2文本框中内容进行交换，并在Text3文本框中显示“交换成功”：如果选中“连接”单选按钮并单击窗体，则把Text1和Text2的内容按Text1在前，Text2在后的顺序连接起来，并在Text3文本框中显示连接后的内容，如下图所示。保存时，工程文件名为execise56.vbp，窗体文件名为execise56.frm。注意；不得修改已经给出的程序。在结束程序运行之前，必须选中一个单选按钮，并单击窗体，退出程序时必须通过单击窗体右上角的关闭按钮，否则可能无成绩。
在代码中定义了一个子过程： Sub P(a,b)...End Sub 下面 ______调用该过程的格式是正确的。
在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，然后编写如下代码：Dim SaveAll As StringPrivate Sub Command1 Click()Text1.Text=Left(UCase(SaveAll),4)End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)SaveAll=SaveAll＋Chr(KeyAscii)End Sub程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是【 】。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为CDl的通用对话框，通过属性窗口设置CDI的初始路径为C：＼，默认的文件名为None，标题为“保存等级考试”，如图1-44所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。(2)在名称为Forml的窗体上设计一个菜单。要求在窗体上添加名为menu0，标题为“菜单命令”的主菜单，再添加两个名称分别为“menul”、“menu2”，标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单，并且使程序运行时，menul子菜单不可用，menu2子菜单已经选中(运行时的效果如图1-45所示)。再编写适当的事件过程，使得程序运行时，单击“上一菜单项可用”，则“不可用菜单项”变为黑色(可用)。要求程序中不得使用变量，且只有一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．Frm
在窗体(名称为Form1，KeyPreview属性为Tree)上绘制一个列表框(名称为List1)和一个文本框(名称为Text1)。编写窗体的KeyDown事件过程。程序运行后，如果按A键，则从键盘上输入要添加到列表框中的项目(内容任意，不少于3个)：如果按D键，则从键盘上输入要删除的项目，将其从列表框中删除。程序的运行情况如下图所示。在考生文件夹中有一个工程文件execise75.vbp(相应的窗体文件名为execise75.frm)，可以实现上述功能。但本程序不完整，请补充完整。要求：去掉程序中的注释符…”，把程序中的问号“?”改为适当的内容，使其正确运行，但不得修改程序的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。
以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。在【 】和【 】处填入适当的内容，将程序补充完整。 Private Sub Form_Click() Dim x As Single，amax As Single，amin As Single x=InputBox("Enter a score") amax=x amin=x Do While【 】 If x＞amax Then amax=x End If If【 】Then amin=x End If x=InputBox("Enter a score") Loop Print"Max="；amax，"Min="；amin End Sub
在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签，其名称分别是Labell和Label2，标题分别为“最长单词的长度为”和“以该长度最后一次出现的单词是”；再画两个名称分别为Textl和Text2，初始值为空的文本框，如图1-75所示。程序功能如下：①如果单击“读数据”按钮，则将考生文件夹下in5．dm文件的内容读到变量s中(此过程已给出)；②如果单击“统计”按钮，则自动统计in5．dat文件(该文件中仅含有字母和空格，而空格是用来分隔不同单词的)中最长单词的长度，以及in5．dat中最后一个以该长度出现的单词，并将该单词的长度显示在Textl文本框内，将该单词显示在Text2文本框内。“读数据”命令按钮的Click事件过程已经给出，请为“统计”命令按钮编写适当的事件过程，实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行统计，且必须通过单击窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。
设窗体上有一个滚动条，要求单击滚动条右端的按钮一次，滚动块移动一定的刻度值，决定此刻度值的属性是（ ）。
在考生文件夹中有一个工程文件execise81.vbp及窗体文件execise81.frm。在名为Form1的窗体上已经绘制出所有控件，如下图所示。在Text1文本框中输入一个任意的字符串(要求串的长度≥10)，然后选择组合框中的3个截取运算选项之一。单击“确定”按钮，将截取运算后的结果显示在Text2中。窗体文件中已经给出了程序，但不完整，请去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容。注意：不得修改已经给出的程序。最后，按原文件名并在原文件夹中保存修改后的文件。
下列程序的输出结果为______。 Sub Prin() Dim B As String A=1 B=A & Space(4)& A Print A Print Trim(B) End Sub
(1)在考生文件夹中有一个工程文件sj3．vbp，相应的窗体文件为sj3．frm。在名为Form1的窗体上有一个命令按钮，其名称为Commandl，标题为“添加”；有一个文本框，名为Textl，初始内容为空白；此外还有一个列表框，其名称为Listl。程序运行后，如果在文本框中输入一个英文句子(由多个单词组成，各单词之间用一个空格分开)，然后单击命令按钮，程序将把该英文句子作为一个项目添加到列表框中，如图4l一4所示。该程序不完整，请补充完整。注意：去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其能正确运行，但不得修改程序的其他部分最后，按原文件名并在原文件夹中保存修改后的文件。(2)在考生文件夹中有工程文件sj4．vbp及窗体文件sj4．frm。在名为Forml的窗体上有2个框架、7个标签和7个文本框，所有控件已经画好。判断输入的条件是否为三角形，若是三角形，则在Textl中显示“是三角形”；在Text2中显示是何种三角形。单击“重新输入”按钮可以清空所有显示框，且按钮本身变为无效状态。当单击“判断并计算”按钮之后重新恢复为可用状态。程序运行情况如图41—5所示。该程序的功能是：根据给定的图形的三边的边长来判断图形的类型。若为三角形则同时计算出为何种三角形及三角形的周长和面积。注意：本程序不完整，请补充完整，并能正确运行。三角形存在的条件为任一边不为O且任两边之和大于第三边。若一边具有a2+b2=c2，则为直角三角形；若所有边具有a2+b2>c2，则为锐角三角形；若一边具有a2+b22，则为钝角三角形。去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。
下面是程序是计算给定函数的值，自变量x，y的值用InputBox函数输入，函数如下：程序不完整，请填空，将程序的补充完整 OptionExplicit DimxAsSingle DimyAsSingle DimzAsSingle PrivateSubCommand1_Click() x=Val(InputBox("x=")) y=Val(InputBox("y=")) PrivateSubCommand2_Click() If________Then z=x^2+y^2 ElseIf________Then z=x^2-2*y^2 ________ z=y^2-3*x^2 EndIf Form1．Print"当x，y的值为："；x，y Form1．Print"f(x，y)的值为:"：z Endsub