(1)在名称为Forml的窗体上添加一个名称为Framel、标题为“框架”的框架,在框架内添加两个名称分别为Optionl、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。运行程序后的窗体如图57—l所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjl.vbp,窗体文件名保存为sjl.frm。(2)在名称为Forml的窗体上添加一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为Labell、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件系统控件”,如图57—2所示。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时.目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将在Label2中显示选中的文件名。注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sj2.vbp,窗体文件名保存为sj2.frm。
单击窗体上的命令按钮Command1,【 】 Private Sub Command1_Click() a= "10" b=20 c=Val(A)+b Print c End Sub
在名为Form1的窗体上建立一个名为Text1的文本框,将MultiLine属性设置为Tree,ScrollBars属性设置为2。再建立两个名称分别为Cmd1和Cmd2的命令按钮,标题分别为Read和Save,如下图所示。程序运行后,如果单击Read按钮,则读入in46.txt文件中的100个整数,放入一个数组中(数组下界为1),并在文本框Text1中显示出来;如果单击“保存数据”按钮,则把数组中的前50个数据在文本框Text1中显示出来,并存入考生文件夹中的文件out46.txt中(考生文件夹中有标准模块prog.bas,其中的putdata过程可以把指定个数的数组元素存入out46.txt文件,考生可以把该模块文件添加到自己的工程中)。注意:文件必须存放在考生文件夹中,窗体文件名为execise46.frm,工程文件名为execise46.vbp。结果存入out46.txt文件,否则没有成绩。
(1)在考生文件夹中有工程文件sj3.vbp及其窗体文件sj3.frm,该程序是不完整的。在窗体上有两个单选按钮,名称分别为Opl和Op2,标题分别为“斜体”和“黑体”,一个文本框,名称为Textl,字体为宋体,字号为四号字,还有一个命令按钮,名称为Commandl,标题为“切换”。要求程序运行后,在文本框中输入“测试结果”,并选择一个单选按钮,单击“切换”按钮后,会根据所选的单选按钮来切换文本框中所显示的汉字字体,程序运行时的窗体界面如图32—3所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号)但不能修改其他部分。存盘时不得改变文件名和文件夹。(2)在考生文件夹下有一个工程文件sj4.vbp,窗体上有一个名为Textl的文本框和一个名为Commandl的命令按钮,标题是“计算”。程序运行后,单击“计算”命令按钮,通过对话框输入整数12,放入整型变量a中,然后计算l+2+3+…+a,(提示:运算结果应放入Long型变量中),如图32—4所示。在文本框中显示结果,并把结果存入文件out4.txt中。在考生文件夹中有一个标准模块mode4.bas,该模块中提供了保存文件的过程WriteData,考生可以直接调用。注意:去掉程序中的注释符“'”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘
文件的打开和关闭语句分别是:【 】和【 】。
15除以2余数的-3次方的VB表达式为______。
在名为Form1的窗体上建立一个文本框(名称为Text1,MultiLine属性为Tree,ScrollBars属性为2)和两个命令按钮(名称分别为Cmd1和Cmd2,标题分别为Read和Save),如下图所示。要求程序运行后,如果单击Read按钮,则读入in43.txt文件中的100个整数,放入一个数组中(数组下界为1),同时在文本框中显示出来:如果单击Save按钮,则计算数组中前50个数的平均值(结果四舍五入为整数),并把结果在文本框Text1中显示出来,同时把结果存入考生文件夹中的文件out43.txt中(在考生的文件夹下有标准模块mode.bas,其中的putdata过程可以把结果存入指定的文件,考生可以把该模块文件添加到自己的工程、中,直接调用此过程)。注意:文件必须存放在考生文件夹中,窗体文件名为execise43.frm,工程文件名为execise43.vbp。计算结果存入out43.txt文件,否则没有成绩。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Call sub1(-15.1,2.54) End Sub Public Function sub1(a As Integer,ByVa1 b As String) As Integer a=Val(B)sub1=a Print sub1 End Function 程序运行后,单击命令按钮,在窗体上输出的是
在考生文件夹中有一个工程文件esecise61,vbp(相应的窗体文件名为exeeise61.fnn),请装入该文件,在名为Form1的窗体上绘制两个命令按钮(其名称分别为Cmd1和Cmd2,标题分别为Add和Delete),再绘制一个列表框(名称为List1)和一个文本框(名称为Text1)。编写适当的事件过程,使程序运行后,如果单击Add命令按钮,则从键盘上输入要添加到列表框中的项目(内容任意,不少于3个);如果单击Delete命令按钮,则从键盘上输入要删除的项目,并将其从列表框中删除。程序的运行情况如下图所示。提供的窗体文件可以实现上述功能。但本程序不完整,请补充完整。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为适当的内容,使其正确运行,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
以下程序需要实现的功能是:在C盘根目录下建立一个名为Students.txt的顺序文件。单击命令按钮后,输入4个学生的个人信息,包括name、sex和age,将这些信息写入文件中。请填空。 Private Sub Form_Click() Open【 】For Output As #1 For i=1 To 4 name=InputBox("姓名") age=InputBox("年龄") sex=InputBox("性别") Write【 】 Next i Close #1 End Sub
1.在窗体上画1个组合框(名称为Cbl,设置为简单组合框)和1个命令按钮(名称为C1,标题为“添加”),编写适当的事件过程。程序运行后,在组合框中输入一个列表项,单击命令按钮后,程序检查组合框的下拉列表,如果列表中没有此项,则把此项添加到列表中;如果有此项,则通过信息框提示“此项已存在”,并清除输入的内容。程序的运行情况如图2—1所示。存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。2.在窗体上画一个名称为L1的列表框,通过属性窗口向列表框中添加3个项目,分别为“123”、“456”和“789”。编写适当的事件过程。程序运行后,每次双击列表框中的任何一项,则总在最后面添加一项,该项的内容为前面所有项之和。程序的运行情况如图2—2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt4.frm,工程文件名为sjr4.vbp。
用下面的语句定义数组元素的个数为 ______。 Option Base 1 Dim Arr6(-2 to 6, -1 to 5)As Integer
(1)请在窗体上面画两个文本框,其名称分别为Textl和Text2,文本框内容设置为“模拟考试”和“顺利通过”。然后画两个单选按钮,其名称分别为Optionl和Option2,标题分别为“交换”和“连接显示”,编写适当的事件程序。程序运行后,如果选中“交换”单选按钮,则交换显示Textl和Text2中的内容;如果选中“连接显示”单选按钮,则连接后的内容显示在Textl中,初始状态不选中任何单选按钮。如图12—3所示。存盘时,工程文件名为Sj3.vbp,窗体文件名为sj3.frm。注意:在结束程序运行时,必须先选中一个单选按钮,并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮,并将连接显示后的结果输出到考生文件夹下的out.txt文件中,否则可能无成绩。(2)在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm,在窗体上有两个命令按钮,名称分别为Commandl与Command2、标题分别为“读取文本”、“保存”。另有一个文本框,文本框的名称为Text1,Text属性为空,可多行显示。要求在运行程序时,单击“读取文本”按钮,可以读入考生文件夹下的in4.txt并显示在文本框中;单击“保存”按钮,可以把文本框中的数据存到考生文件夹下的另一个文件out4.txt中。程序运行时的窗体界面如图12—4所示。注意:请在有“?”号的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
(1)在名称为Forml的窗体上绘制一个名称为Commandl的命令按钮,标题为“打开”,再绘制一个名称为CommonDialogl的通用对话框。程序运行后,如果单击“打开”,则弹出打开文件对话框。请按下列要求设置属性并编写代码。设置适当属性,使对话框的标题为“打开”;设置适当属性,使对话框的“文件类型”下拉式组合框中有两行:“文本文件”和“所有文件”,如图38—l所示,默认的类型是“文本文件”;编写代码,使得单击“打开”按钮可以弹出“打开”对话框。要求:程序中不得使用变量,事件过程中只能写一条语句。注意:存盘时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sjl.frm。(2)在名称为Forlml的窗体上绘制一个名为Picl的Picture控件和一个命令按钮,名称为Commandl、标题为“移动图片框”,如图38—2所示。要求编写适当的事件过程,使得程序运行时,每单击按钮一次,图片框向右移动150。要求:程序中不得使用变量,事件过程中只能写一条语句。注意:存盘时必须存放在考生文件夹下,工程文件名为sj2.vbp,窗体文件名为sj2.frm。
(1)在考生文件夹下有一个工程文件sit3.vbp,相应的窗体文件为sjt3.frm。其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击命令按钮(名称为Commandl,标题为“输出最小值”),即可求出其最小值,并在窗体上显示出来(如图1-132所示)。这个程序不完整,请把它补充完整,并能正确运行。要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个命令按钮和一个文本框。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。要求:请勿改动程序中的任何内容,只在FunctionFun()和EndFunction之间填入编写的若干语句。最后把修改后的文件按原文件名存盘。
下列程序执行后,变量x的值为( )。 Dim a,b,C,d As Single DimXAs Single a=10:b=30:C=400 Ifb>aThen d=a:a=b:b=d EndIf Ifb>c Then x=b ElseIfa>c Then x=C Else x=a EndIf
软件需求分析—般应确定的是用户对软件______。
在名为Form1的窗体上绘制一个文本框(名称为Text1,Text属性为“京”,Font属性为“宋体”)和一个水平滚动条(名称为HS1)。在属性窗口中对滚动条设置如下属性:Min10Max100LargeChange5SmallChange2编写适当的事件过程,使程序运行后,若移动滚动条上的滚动框,则可扩大或缩小文本框中的“京”字。运行后的窗体如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise90.vbp,窗体文件名为execise90.frm。
在窗体上有一个名称为List1的列表框和一个名称为Commandl的命令按钮,并编写有如下事件过程: Private Sub Form_Load() List1.Addltem“Item1”:List1.Addltem“Item2”:List1.Addltem“Item3” End Sub Private Sub Commandl_Click() List1.List(List1.ListCount)=“New Item” End Sub 程序执行时,单击命令按钮,其结果为( )。
要使复选框以变成灰色的方式显示,则需把它的【 】属性设置为“Grayed”。
