假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。 Private Sub Form_Click() Static x As Integer Cis Print"Mousepointer Property is now:;X Forml【 】=x X=K+1 If x=15 Then x=0 End Sub
模块独立性概念是模块化、抽象,【 】这些软件工程基本原理的直接产物。
在名为Form1的窗体—上建立一个文本框(名称为Text1,MultiLine属性为True,ScrollBars属性为2)和两个命令按钮(名称分别为Cmd1和Cmd2,标题分别为Read和Save),如下图所示。要求程序运行后,如果单击Read按钮,则读入in5.txt文件中的100个整数,放入—个数组中(数组下界为1),同时在文本框Text1中显示出来:如果单击Save按钮,则计算其中前50个数之和,并把求和结果在文本框Text1中显示出来,同时把结果存入考生文件夹中的文件out5.txt中。在考生的文件夹下有标准模块mode.bas,其中的putdata过程可以把结果存入指定的文件,考生可以把该模块文件添加到自己的工程中,直接调用此过程。注意:文件必须存放在考生文件夹中,窗体文件名为execise5.frm,工程文件名为execise5.vbp,计算结果存入out5.txt文件,否则没有成绩。
面向对象的程序设计方法是把【 】封装起来作为一个对象,并为每一个对象设置所需要的【 】。
下面程序的功能是统计字符串中"i"的个数,请填空。 Sub COU() Dim n As Integer a$="Beijing University of Technology" n=Len(a$) For i=1 To n b$=Mid$(a$, i, 1) If 【 】 Then x=x + 1 Next Print "x="; x End Sub
对变量名说法不正确的是______。
在结构化分析方法中,用于描述系统中所用到的全部数据和文件的文档称为【 】。
若窗体上的图片框中有一个命令按钮,则此按钮的Left属性是指( )。
下列程序段的功能是输入一元二次方程ax2+bx+c=0(a≠0)的3个系数a、b、c,并判断它根的情况,请将程序补充完整。 Dim a As Single,b As Single,c As Single Dim delta As Single a=txtA. Text:b=txtB. Text:c=txtC. Text delta=【 】 If delta>0 Then lblResult. Caption="有两个不相等的实根" Elself delta=0 Then lblResult. Caption="有两个相等的实根" 【 】 lblResult. Caption="没有实根" End If
在名为Form1的窗体上建立两个名称分别为Cmd1和Cmd2,标题分别为“读取”和“连接”的命令按钮。编写适当的事件过程,使程序运行后,单击“读取”按钮,可通过输入对话框输入两个字符串,存入字符串变量char1、char2中(char1、char2应定义为窗体变量),若单击“连接”按钮,则把两个字符串连接为一个字符串(顺序不限)并在信息框中显示出来(如下图所示)。注意:在程序中不得使用任何其他变量;文件必须存放在考生文件夹中,窗体文件名为execise38.frm,工程文件名为execise38.vbp。
在考生文件夹下有一个工程文件execise44.vbp(相应的窗体文件为execise44.frm),在该工程中为考生提供了一个通用过程,考生可以直接调用。请在窗体上绘制一个名为Text1的文本框;绘制一个名为Cmd1、标题为“计算”的命令按钮;再绘制两个单选按钮,名称分别为Opt1和Opt2、标题分别为“求100到500之间能被5整除的数之和”和“求100到500之间能被9整除的数之和”,如下图所示。编写适当的事件过程,使得在运行时,选中一个单选按钮,再单击“计算”按钮,就可以按照单选按钮后的文字要求计算,并把计算结果放入文本框中,最后把已经修改的工程文件和窗体文件以原来的文件名存盘。注意:考生不得修改窗体文件中已经存在的程序,退出程序时必须通过单击窗体右上角的“关闭”按钮。在结束程序运行之前,必须至少进行一种计算,否则不得分。
下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 PIivate Sub Commandl Click() X=Val(Textl.Text) If _________Then Print x Else Textl.Text="" End If End Sub
忆知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在【 】和【 】处填处所需的内容,使产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如: 1 2 3 4 1 2 3 4 1 2 3 4 l 2 3 4 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 Private Sub Command1_Click() Dim a(4,4) For k=1 To 4 For j=1 To 4 a(k,j)=j Print a(k,j); Next Print Next For k=2 To 4 For j=1 To【 】 t=a(j,k) a(j,k)=【 】 a(k,j)=t Next Next For k=1 To 4 Print a(k,1);a(k,2);a(k,3);a(k,4) Next End Sub
窗体中有图片框(Pieture1)和计时器(Timer1)两个控件。运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左,向右移动100twip。请填空。 Private Sub Form_ Load() Picture1_icture=LoadPicture(“c:/pic/mouth.ico”) 【 】.Interval=2000 End Sub Private Sub Timer1_ Timer() Static x,y As Integer x=x+100 y=y+100 Pictuer1.Move [x, y] End Sub
在面向对象方法中,_____________是具有相似性质的对象的集合。
窗体上有Text1、Text2两个文本框及一个命令按钮Commandl,编写下列程序: Dim y As Integer Private Sub Commandl _Click() Dim x As Integer x=2 Text1.Text=p2(p1(x),y):Text2.Text=p1(x) End Sub Private Function p1(x As Integer)As Integer x=x+y:y=x+y p1=x+yEnd FunctionPrivate Function p2(x As Integer,y As Integer)As Integer p2=2*x+yEnd Function 程序运行后,第一次单击和第二次单击命令按钮后,文本框Text1和Text2内的值分别是( )。
(1)在名称为Forml的窗体上绘制一个标签和两个单选按钮。标签的名称为Labell,初始时内容为空。单选按钮的名称分别为Optionl、Option2,标题分别为“Iternl”和“Item2”。编写适当的事件过程,使得程序运行时Optionl按钮被选中,标签中显示“选中Iternl”,如图24—1所示。如果单击Option2按钮,标签中显示的内容为“选中Item2"。程序中不得使用任何变量。注意:保存时必须存放在考生文件夹下,窗体文件名为sjl.frm,工程文件名为sjl.Vbp。(2)在名称为FOrml的窗体上,绘制一个形状控件和一个命令按钮。形状控件为圆形,名称为Shapel。命令按钮为Commandl,标题为“变正方形”。编写适当的事件过程,使得程序运行时,单击命令按钮,圆形将隐藏起来,显示正方形。程序中不得使用任何变量。程序运行时的窗体界面如图24—2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
如果A为整数且|A|>=10,则打印“OK”,否则打印“Error”,表示这个条件的单行格式If语句是( )。
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为Fl和F2,标题分别为“交通工具”和“到达目标”。在Fl中画两个单选按钮,名称分别为Opl和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为op3和004,标题分别为“广州”和“昆明”。画一个文本框,其名称为Textl。编写适当事件过程。程序运行后,选择不同单选按钮并单击窗体后在文本框中显示结果见表1-3。程序的运行情况如图1-153所示。存盘时以原文件名存盘。注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。(2)在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为Textl、Text2和Text3,文本框内容分别设置为“计算机”、“等级考试”和空白。然后画两个单选按钮,其名称分别为Opl和Op2,标题分别为“交换”和“连接”(如图1-154所示),编写适当的事件程序。程序运行后,如果选中“交换”单选按钮并单击Text3文本框,则Textl文本框中的内容与Text2文本框中的内容进行交换,并在Text3文本框中显示“交换成功”;如果选中“连接”单选按钮并单击Text3文本框,则把Textl和Text2的内容按Textl、Text2的顺序连接起来,并在Text3文本框中显示连接后的内容。存盘时,按原文件名存盘。注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,然后单击Text3。退出程序时必须通过单击窗体右上角的关闭按钮,否则无成绩。
设有下列二叉树:对此二义树前序遍历的结果为
