要使文本框获得输入焦点,则应采用文本框控件的
(1)在窗体上绘制一个名称为Textl的文本框,再绘制一个名称为Cmdl、标题为“计算”的命令按钮,如图44—3所示。要求程序运行后,单击命令按钮,将计算100~200之间所有素数之和,并在文本框中显示结果,同时把结果存人文件out.txt中(在考生文件夹中有标准模块mode.bas,其中的putdata过程可以把结果存入文件,而isprime函数可以判断整数X是否为素数,如果是素数,则函数返回True,否则返回False,考生可以把该模块文件添加到自己的工程中)。注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.vbp,结果存入result.txt文件,否则没有成绩。(2)新建一个工程文件,在窗体Forml上绘制一个列表框。名称为Listl,并输入3个表项“6”、“21”、“43”;绘制一个文本框,名称为Textl。请编写适当的事件过程,使得程序运行时,在列表框内选中一个数字并双击,则计算出1500以内能被该数整除的所有数之和,并在Textl中显示出来。注意:考生完成程序编写后,将工程文件与窗体文件保存到考生文件夹下,文件名分别为sj4.vbp与sj4.frm。程序运行时的窗体界面如图44—4所示。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在Forml的窗体上画一个名称为Picl的图片框,然后建立一个主菜单,标题为“命令”,名称为Com,该菜单有两个子菜单,其标题分别为“输出”和“删除”,名称分别为Pri和Del,编写适当的事件过程。程序运行后,如果单击“命令”菜单中的“输出”命令,则将图片框显示出来;如果单击“删除”命令,则隐藏图片框。程序的运行时的窗体界面如图11—1和图11—2所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sjl.frm。程序中不得使用任何变量。(2)在窗体上画一个列表框,名称为Listl,通过“属性”窗口向列表框中添加3个项目,分别为“足球…‘篮球”和“排球”。编写适当的事件过程,使程序运行后,每次单击列表框中的任何一项,则总在最后面添加一项“体育活动”。程序运行界面和运行效果分别如图11—3和图11—4所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sj2.vbp,窗体文件名为sj2.frm。程序中不得使用任何变量。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在Forml的窗体上画一个文本框,名称为Textl。画一个命令按钮,名称为C1。标题为“显示”,TabIndex属性为0。请为c1设置适当的属性,使得按Esc键时,可以调用cl的Click事件,该事件过程的作用是在文本框中显示“等级考试”,程序运行结果如图1-186所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。程序中不得使用任何变量。(2)在Forml的窗体上画一个名称为Textl的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“隐藏”,名称分别为Dis和Hid,编写适当的事件过程。程序运行后,如果单击“操作”菜单中的“显示”命令,则在文本框中显示“等级考试”:如果单击“隐藏”命令,则隐藏文本框。程序的运行情况如图1-187所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。程序中不得使用任何变量。
在窗体上绘制两个文本框,名称分别为Text1和Text2。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,若在Text1中每输入一个字符,则显示输入的内容,同时在Text2中显示一个“*”。若在Text2中每输入一个字符,则显示—今“*”,如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise40.vbp,窗体文件名为execise40.frm。
把窗体的KeyPreview属性设置为Frue,然后编写如下事件过程: Private Sub Form Key:Press(KevAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后,按键盘上的“A”键,则在窗体上显示的内容是( )。
执行以下程序段: a $="abbaedduba" For i=6 To 2 Step-2 X=Mid(a, i, i) Y=Left(a, i) z=Right(a, i) z=UCase(X&Y&z) Next i Print z 输出结果为______。
在窗体中添加一个列表框(ListBox1)和一个命令按钮,并编写如下代码: Private Sub Commandl_Click() Dim a, i, msg msg="Choose OK to add 100 items to your listbox." MsgBox msg For i=l To 100 a="a:" &i ListAddltem a Next i End Sub 程序完成的功能是 ( )
程序流程图(PFD0中的箭头代表的是______。
执行x$一InputBox(“请输人x的值”)时,在弹出的对话框巾输入123,在列表框Listl中选中一个列表项(数据为456),使结果为123456的语句是( )。
有如下SUB过程: Sub s(x As Single,y As Single) t =x x=t / y Y=t Mod y End Sub在窗体上添加一个命令按纽,然后编写如下事件过程: Private Sub Form_ Click() Dim a As Single Dim b As Single a=5 b=4 s a,b Print a,b End Sub则程序运行后,单击命令按纽,输出的结果为:【 】。
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timerl。要求每一秒在文本框中显示一次当前的时间。程序为: Private Sub Timer1_ ________TxtTime.text=Time End Sub 在下划线上应填入的内容是
1.在考生文件夹中有文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确的内容,然后删除?及所有注释符(即'号),但不能修改其他部分。存盘时不得改变文件夹和文件名。本题描述如下:窗体上有一个名称Text1的文本框,两个复选框,名称分别为Ch1和Ch2,标题分别为“足球”和“乒乓球”;一个名称为C1,标题为“确定”命令按钮。要求程序运行后,如果只选中Ch1,单击“确定”命令按钮,则在文本框中显示“我喜欢足球”:如果只选中Ch2,单击“确定”命令按钮,则在文本框中显示“我喜欢乒乓球”;如果同时选中Ch1和Ch2,然后单击“确定”命令按钮,则在文本框中显示“我喜欢足球和乒乓球”;如果Ch1和Ch2都不选,然后单击“确定”命令按钮,则在文本框中什么都不显示。程序运行界面如图2—1所示。2.在考生文件夹下有工程文件sjt4.vbp及窗体文件sjt4.frm,该程序是不完整的,请在有?号的地方填入正确的内容,然后删除?及所有注释符(即'号),但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:窗口中有一个名称为Picture1的图片框,一个名称为HScroll1的滚动条,3个命令按钮,名称分别为Command1,Command2和Command3,标题分别为“运行”、“暂停”和“结束”,一个计时器控件,名称为Timer1。程序运行后,单击“运行”按钮后,使小球围绕大球转动,并可以使用滚动条调节转动的速度;单击“暂停”按钮后,暂停小球的转动;按“结束”按钮结束程序。
在考生文件夹中有工程文件execise80.vbp及窗体文件execise80.frm。在名为Form1的窗体上有一个名为Image1的图像框。要求程序运行后。鼠标左键单击图像框,则图像框变大;鼠标右键单击图像框,则图像框变小。如下图所示。本程序不完整,请补充完整,并能正确运行。要求:去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
在Form1的窗体上绘制一个名为Text1的文本框,然后建立一个主菜单,标题为“操作”,名为vbOp,该菜单有两个菜单项,其标题分别为“显示”和“隐藏”,名称分别为vbDis和vbHide。编写适当的事件过程,使程序运行后;若单击“操作”菜单中的“显示”命令,则在文本框中显示VisualBasic:如果单击“隐藏?命令,则隐藏文本框。程序的运行情况如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise72.vbp,窗体文件名为execise72.frm。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Framel、标题为“框架”的框架,在框架内添加两个名称分别为Optionl、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”设置为被选中,框架为不可用。运行程序后的窗体如图1-114所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。(2)在名称为Forml的窗体上画一个名称为.Drive1的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,名称为.Labell、标题为“文件名”的标签和名称为Label2、BorderStyle为l的标签。窗体的标题设置为“文件系统控件”,如图1-115所示。请编写适当的程序,使得这三个文件系统控件可以同步变化,即当驱动器列表框中显示的内容发生变化时,目录列表框和文件列表框中显示的内容同时发生变化。单击文件列表框时,将选中的文件名显示在LabeL2中。注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
下面是求最大公约数的函数的首部( )。 Function fun(By Val x As Integer,ByVal y As Integer)As Integer 若要输出8、12、16这3个数的最大公约数,下面正确的语句是
能够改变窗体边框线类型的属性是( )。
如果在“立即”窗口中执行以下操作: a=8 b=9 print(a>B); 则输出结果为______。
用Dim(1,3 to 7,10)声明的是一个 ______ 维数组。