在考生文件夹下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;有三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“输入”、“计算显示”和“保存”,运行界面如图45—5所示。在给定程序中有一个函数过程isPrimeNum,其功能是判断参数是否为素数,如果是素数,则返回True,否则返回False。请将程序中有问号(即“?”)的地方替换为相应的代码,使得在运行时,单击“输入”按钮,弹出“输入”对话框,单击“计算显示”按钮,则找出大于输人参数的最小素数,并显示在Textl中;单击“保存”按钮,则把Textl中的计算结果存入考生文件夹下的out5.txt文件中。注意:去掉程序中的注释符“'”,把程序中的“?”改为正确的内容,使其实现下述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。考生不得修改isPrimeNum函数过程和控件的属性,必须把计算结果通过“保存”按钮存入out5.txt文件中,否则无成绩。
窗体中有一个命令按钮,然后编写下列事件过程:Private Sub Command1_Click()x=0Do Untilx=-1a=InputBox("请输入第一个数字a的值")a=Val(A)b=InputBox("请输入第二个数字b的值")b=Val(B)x=InputBox("请输入第三个数字x的值")x=Val(x)a=a+b+xLoopPrint aEnd Sub在程序运行后,单击命令按钮,在对话框中分别输入5,4,8,5,8,-1,输出的结果是______。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。1.在考生文件夹下打开工程sjt3.vbp,在窗体Form1上建立一个名称为Text1的文本框和一个名称为Command1,标题为“计算”的命令按钮(如图2—1所示)。程序运行后,单击“计算”命令按钮,通过在对话框输入整数10,放入整形变量a中,然后计算a!,(提示:运算结果应放入Long型变量中),在文本框中显示结果,并把结果存入文件out3.txt中。在考生文件夹中有一个标准模块mode.bas,该模块中提供了保存文件的过程putdata,考生可以直接调用。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt3.frm,工程文件名为sjt3.vbp。2.在名称为Form1的窗体上画一个驱动器列表框,其名称为Driver1,再画一个目录列表框,其名称为Dir1;然后添加一个文件列表框,名称为File1。请设置适当的控件属性和编写适当的事件过程,使得在运行时,实现驱动器列表框、目录列表框和文件列表框的同步操作,且在列表框中只显示后缀名为exe的文件;如果双击文件列表框中的文件,则执行该文件(如图2—2所示)。程序中不得使用任何变量。已知;可以用Shell函数来运行可执行文件。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是______。
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标签L1和L2,标题分别为“口令”和“允许次数”;一个命令按钮C1,标题为“确定”;两个文本框名称分别为Text1和Text2,其中Text1用来输入口令(输入时,显示“*”),无初始内容Text2的初始内容为3,如图3—1所示。程序给出了C1的事件过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确内容,使得在运行时,在Text1中输入口令后,单击“确定”按钮,如果输入的是“123456”则在Text1中显示“口令正确”;如果输入其他内容,单击“确定”后,弹出错误提示对话框,并且Text2中的数字减1。最多可输入3次口令,若3次都输入错误,则禁止再次输入。注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu),然后为其设计两个子菜单项“增加菜单”(Name属性值为mnuAdD)和“减少菜单”(Name属性值为mnuDel),另外设置一个标题为空的菜单项<控件数组),其Name属性值为mnuDyn,Index值为0,Visible属性值为False;然后编写以下程序来实现增加和减少菜单项的功能,完成程序。 Dim Inxld As Integer Private Sub mnuAdd_Click() Dim mnuc As String mnuc=InputBox("input caption") InxId;InxId+1 【 】mnuDyn(InxID) mnuDyn(InxlD),Calption=mnuc mauDyn(InxID).Visible=True End Sub Private SubmnuDel_Click() Dim i As Integer If【 】Then MsgBox "菜单项已全部被删除" Else Unload mnuDyn(InxID) InxId=InxId-1 End If End Sub
在考生文件夹中有一个工程文件execise57.vbp及其窗体文件execise57.frm。请在名为Form1的窗体上绘制两个单选按钮(名称分别为Opt1和Opt2,标题分别为“添加项目”和“删除项目”)、一个列表框(名为List1)和一个文本框(名为Text1)。编写窗体的Click事件过程。程序运行后,如果选择“添加项目”单选按钮,然后单击窗体,则从键盘上输入要添加的项目(内容任意,不少于3个)后,会添加到列表框中;如果选择“删除项目”单选按钮,然后单击窗体,则从键盘上输入要删除的项目后,会将其从列表框中删除。程序的运行情况如下图所示。本程序不完整,请补充完整。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为适当的内容,使其正确运行,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
下列数据模型巾,具有坚实理论基础的是( )。
下列程序的功能是:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。 请填空。 Sub PrintOuto Dim a As Integer a=MsgBox(“输出结果?”,vblnformation+vbYesNo,“提示:”) If a________Then Print”Myresult” End IfFnd S11h
建立一个新的标准模块,应该选择( )下的“添加模块”命令。
在考生目录下有一个工程文件sjt5.vbp,其窗体如图1-53所示。考生目录下有一个in5.dat文件,文件中有5个运动员的姓名、7个裁判的打分和动作的难度系数。每人的数据占一行,顺序是:姓名、7个分数、难度系数。程序运行时,单击“输入”按钮,可把in5.dat文件中的5个姓名读入数组athlete中,把5组得分(每组7个)和难度系数读入二维数组a中(每行的最后一个元素是难度系数),并把这些数据显示在Textl文本框中;单击“选出冠军”按钮,则把冠军的姓名和成绩分别显示在文本框Text2、Text3中。成绩的计算方法是:去掉一个最高分和一个最低分,求剩下得分的平均分,乘以3再乘以难度系数;单击“存盘”按钮,则把冠军姓名和成绩存入考生目录下的out5.dat文件中。要求:去掉程序中的注释符,把程序中的?改为正确的内容(程序中getmark函数的功能是计算并返回第一个运动员的最后得分),并编写“选出冠军”按钮的Click事件过程。注意:不得修改已经存在的程序和控件的属性,在结束程序运行前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。
下列数据库技术的术语与关系模型的术语的对应关系中正确的是______。
4.【 】是数据库设计的核心。
下面程序运行后,输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer,I As Integer Callmysub(a(),5) Mysuba() ForI=1 to 4 Prin
在参数传递过程中,使用关键字来修饰参数,可以使之按值传递,此关键字是( )
在考生文件夹中有一个工程文件execise104.vbp及窗体文件execise104.frm。在名为Form1的窗体中有两个图片框,名称分别为P1和P2,其中的图片分别是一个航天飞机和一朵云彩;有一个计时器,名为Timer1有一个命令按钮,名为Cmd1,标题为“发射”。并给出了两个事件过程,但并不完整,要求:(1)设置计时器的属性,使其在初始状态下不计时。(2)设置计时器的属性,使其每隔0.1秒调用Timer事件过程一次。(3)去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使得在运行时单击“发射”按钮,则航天飞机每隔0.1秒向上移动一次,当到达云彩的下方时停止移动,如下图所示。注意:不能修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
具有3个结点的二叉树有
一个类可以直接或间接的祖先中继承所有的属性和方法.采用这个方法可以提高了软件的【 】。
(1)在名称为Forml的窗体上画一个名称Checkl的复选框数组(Index属性从0开始),含4个复选框,其标题分别为“Iternl”、“Item2”、“Itern3”和“Item4”。利用属性窗口设置适当的属性,使“Iteml”未选,“Item2”、“Item3”被选中,“Item4.”为灰色,程序运行时的窗体界面如图64—1所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sj1.frm。(2)在窗体上画一个命令按钮。其名称为Commandl,标题为“清空标题”,编写适当的事件过程。程序运行后,窗体的标题为“模拟考试”,如图64—2所示,如果单击命令按钮,则清除窗体的标题,如图64—3所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
在窗体上有一个文本控件,名称为TextTime,一个计时器控件,名称为Timerl。要求每一秒在文本框中显示一次当前的时间。PrivateSubTimerlTextTime.Text=TimeEndSub在横线上应填上的内容是()。
