在考生文件夹中有文件execise74.vbp及其窗体文件execise74.frm。在名为Form1的窗体上有一个名称为Text1的文本框;两个复选框,名称分别为Chk1和Chk2,标题分别为“羽毛球班”和“足球班”:一个名称为Cmd1、标题为“确定”的命令按钮。要求程序运行后,如果只选中“羽毛球班”,单击“确定”命令按钮,则在文本框中显示:“报名参加羽毛球班”;如果只选中“足球班”,单击“确定?命令按钮,则在文本框中显示:“报名参加足球班”;如果同时选中“羽毛球班”和“足球班”,单击“确定”命令按钮,则在文本框中显示:“报名参加羽毛球班和足球班”(如下图所示);如果“羽毛球班”和“足球班”都不选,单击“确定”命令按钮,则在文本框中什么都不显示。本程序不完整,请补充完整,并能正确运行。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上放置两个列表框,名称分别为Listl和Ljst2。在Listl中添加“Iteml”…“Itern6”,并设置MultiSelect属性为2(要求在控件属性中设置实现)。再放置一个名称为Commandl、标题为“导出”的命令按钮。程序运行后,如果单击“导出”按钮,将Listl中选中的内容(至少三项)复制到List2中,并将对应的项从Listl中删除。如果选择的项数少于3项,用消息框提示“请选择至少3项”,如图63—1所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sjl.frm,工程文件名为sjl.vbp。(2)在名称为Forml的窗体上放置一个名称为Textl的文本框。程序运行后,用户在文本框中输入的英文字母一律用小写显示。如图63—2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
在考生文件夹中有一个工程文件execise106.vbp及窗体文件execise106.frm。请在名为Form1的窗体上绘制两个框架(如下图所示),其名称分别为Frame1和Frame2,标题分别为“交通工具”和“到达目标”。在Fmme1中绘制两个单选按钮,名称分别为opt1和opt2,标题分别为“飞机”和“火车”。在Frame2中绘制两个单选按钮,名称分别为Opt3和opt4,标题分别为“杭州”和“昆明”。绘制一个图片框,其名称为Pic1,宽度为2000,高度为5000。注意:不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的“关闭”按钮。最后按原文件名并在原文件夹中保存修改文件。
在考生文件夹中有工程文件st5.vbp及其窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一个文本框,名称为Textl、MultiLine属性为True、ScrollBars属性为2;两个命令按钮,名称分别为Commandl和Command2、标题分别为“读入”和“排列保存”,运行界面如图65—6所示。要求程序运行后,如果单击“读入”按钮,则从in.txt文件中读入50个整数,放入一个数组中(数组下界为1);如果单击“排列保存”按钮,则对这50个数从大到小进行排序,把排序后的全部数据在文本框Textl中显示出来,然后存人考生文件夹中的result.txt文件中(在程序中的标准模块mode5.bas过程可以把指定个数的数组元素存入result.txt文件)。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。文件必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名为sj5.vbp,排序结果存入result.txt文件,否则没有成绩。
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段( ),完成程序。 Private Sub Commandl Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=__________ Textl.Text=Textl.Text&arr(i)&Chr(13)&Chr(10) Next i Sum=0 For Each X__________ If X>50 Thell Print Tab(20):X Sum=Sum+X End If Next X Print Tab(20);“Sum=”;Sum End Sub
将一般窗体转换为MDI窗体的子窗体时要把MDIChild 属性的值设置为【 】。
在考生文件夹中有一个工程文件sjt5.vbp,如图1-48所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后。必须执行程序,并用“计算”按钮进行计算,否则无成绩。
用Print方法在Forml窗体中显示出4个#号的正确代码为( )。
在名为Form1的窗体上绘制一个名为Text1的文本框,再建立一个名为vbFormat的弹出式菜单,它含3个菜单项,标题分别为“加粗”、“斜体”和“下划线”,名称分别为vbMenu1、vbMenu2、vbMenu3。请编写适当的事件过程,在运行时当用鼠标右键单击文本框时,弹出此菜单,选中一个菜单项后,则进行菜单标题所描述的操作,如下图所示。注意:文件必须存放在考生文件夹中,工程文件名为execise53.vbp,窗体文件名为execise53.frm。
假定窗体上有一个标签,名为Labell,为了使该标签透明并且没有边框,则正确的属性设置为( )。
在名为Form1的窗体上绘制一个命令按钮,其名称为Cmd1,标题为Move,位于窗体的右下部。编写适当的事件过程,使程序运行后,每单击一次窗体,都使得命令按钮同时向左、向上移动100。程序的运行情况如下图所示。注意:不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise100.vbp,窗体文件名为execise100.frm。
要在形状控件Shape1中填充一种图案,可设置它的______属性。
请根据以下各小题的要求设计visualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Shapel的圆角矩形,高、宽分别为1000、2000。请利用属性窗口设置适当的属性满足以下要求:①圆角矩形中填满绿色(颜色值为&HOOOOFF00&或&HFF00&):②窗体的标题为“圆角矩形”。运行后的窗体如图1-17l所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。(2)在考生文件夹下有一个工程文件sjt2.vbp。窗体中已含有除计时器外的其他控件,还有一个过程subl,其功能是按照Textl中的通话时间计算通话费,并将其显示在Text2中。程序运行时,单击“通话开始”按钮,则在Textl中累加通话时间(每秒加1),单击“通话结束”按钮,则停止通话时间的累加;单击“计算通话费”按钮,则调用过程subl。要求:①在窗体上画一个计时器(如图1-172所示),并通过属性窗口设置适当属性。②编写三个按钮的Click事件过程。③编写计时器的事件过程。注意:要求程序中不得使用变量,每个事件过程中只能写一条语句,“计算通话费”按钮的事件过程中只允许调用过程subl。不得修改已经存在的内容和控件属性,最后把文件按原文件名存盘。
在考生文件夹下有一个工程文件sj5.vbp,其窗体上有一个命令按钮,名称为Commandl,标题为“添加”;一个文本框,名称为Textl。程序运行前,文本框的编辑区为空白;一个列表框,名称为Listl。在文本框中输入文本,若单击“添加”按钮,文本框中的文本被作为一个列表项被加入到列表框中,清空Textl,同时“添加”按钮变为无效;若在Textl输入内容,则使“添加”按钮变为有效,双击Listl中的某一项则删除该项。程序运行时的窗体界面如图56—5所示。要求:去掉程序中的注释符“'”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性,最后把修改后的文件以原来的文件名存盘。
代数式|e3×a+1gy13+siny2|对应的Visual Bask表达式是( )。
在概念设计阶段可用E-R图,其中“矩形框”表示实体,【 】表示实体间联系。
在考生文件夹中有一个工程文件execise3.vbp及其窗体文件execise3.frm。在名为Form1的窗体上有一个单选按钮数组,含3个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题:“深圳”、“昆明”和“西安”;再添加一个标题为Display的命令按钮,如下图所示。程序功能:在运行时,如果选中一个单选按钮后,单击Display按钮,则根据单选按钮的选中情况,在窗体上显示“我的大学在深圳”、“我的大学在昆明”或“我的大学在西安”。要求:(1)依次添加单选按钮;标题为“深圳”、“昆明”和“西安”;设初始选中的是“深圳”,添加命令按钮标题为Display。(2)去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分,也不得修改控件的其他属性。最后,按原文件名并在原文件夹中保存修改后的文件。
在考生文件夹中有一个工程文件execise95.vbp及窗体文件execise95.frm。请在名为Form1的窗体上绘制3个文本框,其名称分别为Text1、Text2和Text3,文本框内容分别设置为“计算机等级考试”、Visua1Basic和空白。然后绘制两个单选按钮,其名称分别为Opt1和Opt2,标题分别为Change和Join。编写适当的事件程序。程序运行后,如果选中Change单选按钮并单击窗体,则Text1文本框中内容与Text2文本框中内容进行交换,并在Text3文本框中显示OK(如下图所示):如果选中Join单选按钮并单击窗体,则把Text1和Text2的内容按Text1在前,Text2在后的顺序连接起来,并在Text3文本框中显示连接后的内容。修改后的文件仍按原文件名保存在原文件夹下。注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。
下面程序运行后,单击命令按钮,输出的结果是 Private Sub Command1_Click( ) Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2# For i = 1 To 4 a(i) =i Next For i = 2 To 6 b(i) =i Next str 1 = YAG (A)str 2 = YAG (B)Print "str1 ="; str1; "str2 ="; str2 End Sub Function YAG(a()As Integer) Dim t#,i% t=1 For i=LBound(a)TO UBound(A)t=t * a(i) Next YAG=t End Function