(1)在名称为Forml的窗体中建立一个标题为“显示结果”、名称为Commandl的命令按钮,要求程序运行后,如果单击“显示结果”按钮,则执行语句Forml.Print“显示结果”;如果单击窗体,则执行语句Form1.Cls,如图32—1所示。注意:保存时必须存放在考生文件夹下,窗体文件名为s11.frm,工程文件名为sj1.vbp。(2)在名称为.Forml的窗体上建立一个垂直滚动条,名称为VSl,其最大值为50,最小值为0。要求程序运行后,每次移动滚动块时,都执行语句Form1.PrintVSl.Value,如图32—2所示(程序中不能使用任何变量)。注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数;如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整: Function Prime(inputvar As Integer)As Integer For i=2 To inputvar-1 If inputvar Mod i=【 】Then Go To comfinish End If Next i Prime=inputvar Print"素数" GoTo【 】 comfinish: Prime=inputvar Print"合数" finish: End Function
在名称为Form1的窗体上画一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2;两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“读人数据”和“计算保存”,如图3—6所示。要求程序运行后,如果单击“读人数据”按钮.则读人in.txt文件中的100个整数,放人一个数组中(数组下界为1),同时在文本框中显示出来;如果单击“计算保存”按钮,则计算数组中大于或等于400并且小于800的所有数之和,并将结果在文本框Text1中显示出来,同时把结果存入考生文件夹的result.txt文件中(在prog.bas中的putdata过程可以把结果存人result.txt文件)。注意:文件必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名为sj5.vbp,计算结果存入result.txt文件中,否则没有成绩。
在考生文件夹下有一个工程文件execise52.vbp,相应的窗体文件为execise52.frm,此外还有一个名为in52.txt的文本文件,其内容如下:132423365858169854531442522473269122637545760728051327。程序运行后单击窗体,将把文件in52.txt中的数据输入到二维数组Mat中,在窗体上按5行、5列的矩阵形式显示出来,并输出矩阵右上-左下对角线上的数据,如下图所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能正确运行。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() CommonDialog1.Flags=cdlOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt |Batch Files (*.bat)|*.bat" CommonDialog1.Filterlndex=2 CommonDialog1.ShowOPen MsgBox CommonDialog1.filename End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是 ______。
建立控件时系统自动给控件一个名称,第一个建立的命令按钮名称是【 】。
为了使标签能自动调整大小以显示全部文本内容,应把标签的【 】属性设置为True。
以下语句的输出结果是 ______。 Print Format$("32545","000,000.00")
如果要将文本框作为密码框使用,应设置的属性为( )。
在考生文件夹下有文件in6.txt,文件中有几行汉字。请在窗体Form1上绘制一个文本框,名称为Text1,能显示多行;再绘制一个命令按钮,名称为Cmd1,标题为“保存”。并编写适当的事件过程,使得在加载窗体时,把in6.txt文件的内容显示在文本框中,然后在文本的最前面手工插入一行汉字:“计算机等级考试”,如下图所示。最后单击“保存”按钮,可以把文本框中修改过的内容存到文件out6.txt中。注意:只能在最前面插入文字,不能修改原有文字。文件必须存放。在考生文件夹中,以execise6.vbp为文件名存储工程文件,以execise6.frm为文件名存储窗体文件。
设a=5,b=4,c=3,d=2,则表达式3>2*b Or a=c And b<>c Or c>d的值是
在考生文件夹下有一个工程文件sj5.vbp,把inl.txt和in2.txt文件中的整数分别读入a1和a2数组中。请先装人工程文件sj5.vbp,然后完成以下操作:在名称为Forml的窗体上画3个命令按钮,其名称为Commandl、Command2和Command3,标题分别为“读取数据”,“求和”和“保存”。程序运行后,如果单击“读取数据”按钮,则从inl.txt和in2.txt文件中各读取25个整数,分别放入a1和a2两个数组中;如果单击“求和”按钮,则把两个数组中的对应下标的元素相加,其结果放人第3个数组中(即:第一个数组的第n个元素加上第2个数组的第n个元素,其结果作为第3个数组的第n个元素。这里的n为1,2,…,25),然后计算第3个数组各元素之和,并把所求得的和在窗体上显示出来;如果单击“保存”按钮,则把所求得的和存入考生文件夹的out5.txt文件中。运行界面如图59—6所示。注意:设置适当的控件属性并编写适当的程序代码,将代码窗口中的代码补充完整,使其实现上述功能。考生不得修改窗体文件中已经存在的程序,必须把求得的结果用“保存”按钮存入考生文件夹下的out5.txt文件中,否则没有成绩。存盘时,工程文件名仍为sj5.vbp,窗体文件名仍为sj5.frm。
以下程序段的输出结果是【 】。 x=5 print int(x)+0.6
为了在运行时把“d:/pie”文件夹下的图形文件“a. jpg”装入图片框Picturel,所使用的语句为【 】。
窗体上有一个名称为CDl的通用对话框,一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下: Private Sub Commandl Click() CD1.FileName="" CD1.Filter=“All Files丨*.*丨(*.Doc)丨*.Doc丨(*.Txt)丨*.Txt” CD1.Filterlndex=2 CD1.Action=l End Sub 关于以上代码,叙述错误的是( )。
结构化程序设计方法的特点大致可分为三点,下列选项中,______不是其特点。
在窗体上有3个菜单,名称分别为Read、Arg和Save,标题分别为“读人数据”、“计算显示”和“保存”,一个文本框,名称为Textl,MultiLine属性设置为True,ScrollBars属性没置为2。程序运行时的窗体界面如图16—7所示。如果执行“读人数据”命令.则读入sjin.txt文件中的50个整数,放人一个数组中,数组的下界为1;如果执行“计算显示”命令,则把该数组中下标为奇数的元素在文本框中显示出来,求出它们的平均数,并把所求得的和在文本框中显示出来;如果执行“保存”命令,则把所求得的平均值存人考生文件夹下的sjout.txt文件中。在考生文件夹下有一个工程文件sj5.vbp。请将程序中有问号的地方用相应的代码补完整,并将代码前的所有注释符(即“'”号)去掉。注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名仍为sj5.vbp.窗体文件名仍为sj5.frm。
下列程序的执行结果为Private Sub Command1_Click() Dim FirStr As String FirSt="abcdef" Print Pat(FirStr)End SubPrivate Function Pat(xStr As String)As String Dim tempStr As String,strLen As Integer tempStr=" " strLen=Len(xStr) i=1 Do While i<=Len(xStr)-3 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen -i+1,1) i=i+1 Loop Pat=tempStrEnd Function
(1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。在窗体上有一个名称为Labell的标签,一个名称为,Timerl的计时器,一个名称为HScrolll的滚动条,还有一个名称为Cornmandl、标题为“开始”的命令按钮。要求程序运行后,单击开始按钮,则标签中的文本根据计时器中设定的时间间隔交替变更的文本分别是“Windows操作系统”和“UNLX/Linux”,如果改变滚动条中滚动块的位置,则文本交替变换的速度也随之变化。程序运行时窗体界面如图11—5所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。(2)在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm,该程序是不完整的。在窗体中有一个名为Imagel的图像框,还有两个命令按钮,名称分别是Commandl和Command2,标题分别是“纵向拉伸”和“横向拉伸”。要求程序运行后,单击Commandl按钮,则图像框变高;单击Command2按钮,则图像框变宽。程序运行界面如图11—6所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为Cl、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-205所示)。程序运行后,如果单击“读入数据”按钮,则利用题目中提供的ReadDatal、ReadData2过程读入datainl.txt和datain2.txt文件中的各20个整数,分别放入两个数组Arrl和Art2中;如果单击“计算”按钮,则把两个数组中对应下标的元素相加,其结果放入第三个数组中(即第一个数组的第n个元素与第二个数组的第n个元素相加,其结果作为第三个数组的第,1个元素。这里的,l为l,2,…,20),最后计算第三个数组各元素之和,并把所求得的和在窗体上显示出来;如果单击“存盘”按钮,则调用题目中给出的WriteDate过程将计算结果存入考生文件夹下的dataout.txt文件中。注意:请仔细阅读已有程序。考生不得修改窗体文件中已经存在的程序,必须把求得的结果单击“存盘”按钮存入考生文件夹下的dataout.txt文件中,否则没有成绩。最后把修改后的文件以原来的文件名存盘。