在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后,在列表中添加若干列表项。当双击列表框中的某个项目时,在标签Labe1中显示所选中的项如图所示。请在空白处填入适当的内容,将程序补充完整。 PrivateSubForm_Load() List1.AddItem"北京" List1.Addltem"上海" List1.AddItem"河北" EndSub PrivateSubList1________() Labe1.Caption=________ EndSub
在考生文件夹下有一个工程文件execise21.vbp(相应的窗体文件为execise21.frm),在该工程中为考生提供了一个通用过程,考生可以直接调用。请在窗体上绘制一个名为Text1的文本框;绘制一个名为Cmd1,标题为“计算”的命令按钮:再绘制两个单选按钮,名称分别为Opt1和Opt2,“求500到600之间能被3整除的数之和”标题分别为“求300到500之间能被3整除的数之和”、“求500到700之间能被7整除的数之和”,如下图所示。编写适当的事件过程,使得在运行时,选中一个单选按钮,再单击“计算”按钮,就可以按照单选按钮后的文字要求计算,并把计算结果放入文本框中,最后把已经修改的工程文件和窗体文件以原来的文件名存盘。注意:考生不得修改窗体文件中已经存在的程序,退出程序时必须通过单击窗体右上角的“关闭”按钮。在结束程序运行之前,必须至少进行一种计算,否则不得分。
下列各选项说法错误的是( )。
下列程序段的执行结果为( ), n=0 Fori=1 To 3 Forj=5 To 1Step-1 n=n+1 Nextj,i Printn;j;I
不能脱离控件(包括窗体)而独立存在的过程是( )。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为Opl的单选按钮数组,含三个单选按钮,它们的标题依次为“选择1”、“选择2”、“选择3”,其下标分别为0、l、2,初始状态下,“选择2”为选中状态。运行后的窗体如图1-100所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.fian。(2)在窗体上建立一个二级菜单,第一级含两个菜单项,标题分别为“编辑”、“帮助”,名称分别为edit、help。其中“编辑”菜单含有子菜单,共有三个菜单项,其标题依次为“剪切”、“复制”、“粘贴”,名称分别为“cut”、“copy”、“paste”(如图1-10l所示)。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
在考生文件夹下有一个工程文件sj5.vbp,其窗体上有一个命令按钮,名称为Commandl、标题为“添加”;一个文本框,名称为Text1。程序运行前,文本框的编辑区为空白;一个列表框,名称为Listl。在文本框中输入文本,若单击“添加”按钮,文本框中的文本被作为一个列表项被加入到列表框中,如图19—5所示。若.双击文本框,则使文本框中的内容为空,且使“添加”按钮变为无效。注意:去掉程序中的注释符“'”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性,最后把修改后的文件以原来的文件名存盘。
在考生文件夹下有一个工程文件sj5.vbp,窗体上有两个文本框,名称分别为Textl、Text2,都可以多行显示;三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件夹下的in5.dat文件中的50个整数读到数组中,并在Textl中显示出来;“排序”按钮的功能是对这50个数按升序排序,并显示在T'eXt2中;“存盘”按钮的功能是把排好序的50个数存到考生目录下的out5.dat文件中。如图9—5所示。在窗体中已经给出了全部控件和部分程序代码,要求阅读程序并去掉程序中的注释符,把程序中的?改为正确的内容,并编写”排序”按钮的Click事件过程。注意:使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后将修改后的文件按原文件名存盘。
在窗体上画一个名称为File的文件列表框,并编写如下程序: Private Sub File1_DblClick( ) x=Shell(File1.FileName,1) End Sub以下关于该程序的叙述中,错误的是
在名为Form1的窗体上绘制一个名为Lab1、标题为空白、BorderStyle属性为1、Visible属性为False的标签,一个名为Text1、Text属性为空白的文本框和一个名为Cmd1、标题为“显示”的命令按钮。然后编写命令按钮的Click事件过程,使程序运行后,在文本框中输入严计算机等级考试”,然后单击命令按钮,则文本框消失,并在标签内显示文本框中的内容。运行后的窗体如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise31.vbp,窗体文件名为execise31.frm。
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Textl中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也可以分解为11和13,要求取含有最小素数的组合,如图1-38所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程IsPrime用来判断一个数是否为素数,如果是,返回值为True,否则返回值为False。注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且运行时在文本框中输入23456,单击“分解为”按钮,将结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
自顶向下设计是把______结合起来交叉进行。
在考生文件夹中有工程文件sj5.vbp及其窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一个文本框,名称为Textl、MultiLine属性为True、ScrollBars属性为2;两个命令按钮,名称分别为Commandl和Command2、标题分别为“读取”和“计算保存”,程序运行时的窗体界面如图28—5所示。要求程序运行后,如果单击“读取”按钮,则读入in.txt文件中的50个整数放人一个数组中(数组下界为1),同时在文本框中显示出来;如果单击“计算保存”按钮,则计算大于或等于500的所有数的平均数,并把求得的结果在文本框Textl中显示出来,同时把该结果存人考生文件夹中的文件out.txt中。(在考生文件夹下的标准模块mode.bas中的writedata过程可以把结果存入指定的文件。)注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。文件必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名为sj5.vbp,计算结果存入out.txt文件,否则没有成绩。
下列哪个是满足要求的正确表达式:年龄在20到60之间(包括年龄20~60在内)或工资少于500的女职工( )。
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的,要求将程序补充完整,但不能修改其他部分。修改后的程序文件都保存,存盘时不得改变文件夹和文件名。在窗体上有一个名为一rextl的文本框,两个命令按钮,名称分别为Commandl、Command2、标题分别是“读取”和“加密保存”,要求程序运行后,单击“读取”按钮,将考生文件夹下文本文件in5.txt中的文本信息读入文本框Text1中;单击“加密保存”按钮,将Text1中的英文字母加密转换,将转换后的结果显示到Text1中并保存到考生文件夹下的out5.txt文件中。转换方式为转换成该字母对应字母表中前一个位置的字母。例如,转换前的字母是“b”,则转换后的是“a”,转换前的是“G”,转换后的是“F”。程序运行时的窗体界面如图69—5所示。注意:文件必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名sj5.vbp,加密的结果存入out5.txt,否则没有成绩。
单击一次命令按钮后,下列程序的执行结果是( )。 Private Sub Commandl_Click() s=P(1)+P(2)+P(3)+P(4) Print s End Sub Public FunctionP(N As Integer) Static Sum Fori=1To N Sum=Sum+i Nexti P=Sum End Function
(1)在名称为Forml的窗体上建立一个二级下拉菜单。一级菜单的标题为“编辑”,名称为vbEdit,有效。二级菜单有两项,一项标题为“复制”,名称为vbCopy,有效,命令执行的快捷方式为Crtl+C;另一项标题为“粘贴”,名称为vbPaste,无效,命令执行的快捷方式为Ctrl+P。程序运行时,窗体界面如图69一1所示。注意:存盘时必须存放到考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sjl.frm。(2)在名称为Forml的窗体上画一个文本框,其名称为Textl,然后通过属性窗口设置窗体和文本框属性;文本框中显示的初始信息为“模拟考试”,字体为四号、常规、黑体,并有删除线,文本框可以显示多行文本且只有垂直滚动条。不编写任何代码。程序运行时的窗体界面如图69—2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
设有代码如下,当双击窗体内的某个位置时,命令按钮Command1和命令按钮Command2的标题分别为11、【 】。 Private SubForm_Load() CommandCaption = "1" CommandCaption = "2" End Sub Private Sub Form_Click() CommandCaption = "11" End Sub Private Sub Form_DblC1ick( ) Commandcaption = 22 End Sub
数列:1,1,2,3,5,8,13,21,…的规律是从第3个数开始,每个数是它前面两个数之和。在考生文件夹下有一个工程文件execise36.vbp(相应的窗体文件为execise36.frm)。窗体Form1中已经给出于所有控件,如下图所示;编写适当的事件过程完成以下功能:选中一个单选按钮后,单击“显示结果”按钮,则计算出上述数列的第n项的值(n是选中的单选按钮后面的数值),并显示在文本框中。(提示:因计算结果较大,应使用Long型变量。)注意:不能修改已经给出的程序和已有的控件的属性;在结束程序运行之前,必须选中一个单选按钮,并单击“显示结果”按钮获得一个结果;必须使用窗体右上角的“关闭”按钮结束程序,否则无成绩。最后把修改后的文件按原文件名存盘。
下列程序段的输出结果为______。Dim S1(5)As Integer,S2(5)As Integer,S3(5)As Integer N=4 ForI=1 To N S1(I)=I L=N+i-I S2(I)=L NextI S3(5)=0 ForK=1 To N S3(K)=S1(K)*S2(K) S3(5)=S3(5)+S3(K) NextK PrintS1(3)=S1(5);S1(2) PrintS2(4)=S3(
