复选框的Value属性为0时,表示该复选框( )。
执行下面程序,第一行输出结果是【 】,第二行输出结果是【 】。 Option Explicit Private Sub Form_Click( ) Dim A As Integer A=2 Call Sub1 (A) End Sub Private Sub1 (x As Integer) x=x*2+1 If x<10 Then Call Sub1(x) End If x=x,2+1 Print x End Sub
Microsoft Visual Basic 0包括三种版本,其中不包括 ______。
在名为Form1的窗体上建立一个文本框,名为Text1;建立一个命令按钮,名为Cmd1,标题为“计算”的,如下图所示。要求程序运行后,如果单击“计算”按钮,则求出1~30之间所有可以被7整除的数的乘积并在文本框中显示出来,结果存入考生文件夹中的out117.txt文件中。在考生的文件夹中有一个mode.bas标准模块,该模块中提供了保存文件的过程putdah,考生可以直接调用。注意:文件必须存放在考生文件夹中,窗体文件名为execisell7.frm,工程文件名为execise117.Vbp。
单击一次命令按钮,下列程序代码的执行结果为( )。 Private Sub Commandl_Click() Dima As Integer,b As Integer,CASInteger a=2:b=3:c=4 PrintP2(c,b,A) End Sub PrivateFunctionPl(X As Integer,y As Intege;z As Integer) P1=2*x+y+3*Z End Function Priva
下列程序段的执行结果为 A=2 B=5 If A * B < 1 Then B=B - 1 Else B= - 1 Print B -A > 0
阅读程序: Function Fun(a As Integer) Static c b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Command1_Click()Dim a As Integer a=2 For i=1 To 2 Print Fun(a); Next End Sub 运行上面的程序,单击命令按钮,输出结果为
设有如下的用户定义类型:TypeStudentnumberAsStringnameAsStringageAsIntegerEndType则以下正确引用该类型成员的代码是()。
在名为Form1的窗体上绘制一个文本框(其名称为Text1,MultiLine属性为True,初始内容为空白)、两个命令按钮(其名称分别为Cmd1和Cmd2,标题分别为“添加两条记录”和“显示所有记录”,如下图所示。编写适当的事件过程,程序运行后,如果单击“添加两条记录”命令按钮,则向考生文件夹下的in37.txt文件中添加两条记录,该文件是一个用随机存取方式建立的文件,共有3个记录,新添加的记录作为第4、第5个记录;如果单击“显示所有记录”命令按钮,则把该文件中的全部记录(包括原来的3个记录和新添加的2个记录,共5个记录)在文本框中显示出来。随机文件in37.txt中的每个记录包括3个字段,分别为姓名、电话号码和邮政编码,其名称、类型和长度分别为:名称类型长度Name字符串8Tel字符串10PostLong其类型定义为:PrivateTypePalInfoNameAsString*8TelAsString*10PostAsLongEndType变量定义为:DimPalAsPalInfo要求:(1)单击“添加两条记录”按钮,则打开随机文件in37.txt,向文件中添加第4、第5个记录。这两条记录依次为(其中的字母必须是小写字母):zhang68831295100042wang68159032100037(2)单击“显示所有记录”按钮,则在文本框中显示in37.txt文件中的5个记录,每个记录显示一行。(3)存盘时必须存放在考生文件夹中,工程文件名为execise37.vbp,窗体文件名为execise37.frm。
要从自定义对话框Form2中退出,可以在该对话框的“退出”按钮Click事件过程使用( )语句。
下列程序执行后,按住Cbl键并在文本框中输入a,则在窗体上输出的结果为 ______。 Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print keyCode, Shift End Sub
在窗体上有一个文本框控件,名称为TxtTime,一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序如下: Private Sub Timerl () TxtTime.text=Fime End Sub 在下划线上应填入的内容是( )。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2。启动窗体为 Form1,在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,在横线处将程序补充完整。 Private SubCommand1_Click() Unload Form1 Form2.【 】 End Sub
在名为Form1的窗体上绘制一个名为Lab1的标签,标题为“确认”;再绘制两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为Yes和No,高均为400、宽均为1000,如下图所示。请在属性窗口中设置适当属性满足以下要求;(1)窗体标题为“确认”;窗体标题栏上不显示最大化和最小化按钮。(2)在任何情况下,按回车键都相当于单击Yes按钮:按Esc键都相当于单击No按钮。注意:文件必须存放在考生文件夹中,工程文件名为execise87.vbp,窗体文件名为execise87.frm。
在名为Form1的窗体上建立一个名称为Text1的文本框,然后建立两个主菜单,其标题分别为“食列表”和“帮助”,名称分别为vbMenu和vbHelp,其中“食品列表”菜单包括“洋葱”、“鸡蛋”和“鲜奶”3个菜单项,名称分别为vbMenu1、vbMenu2和vbMenu3。程序运行后,如果在“食品列表:的下拉菜单中选择“洋葱”,则在文本框内显示:“慢速运输”;如果选择“鸡蛋”,则在文本框内显示:“中速运输”;如果选择“鲜奶”,则在文本框内显示:“快速运输”运行结果(如下图所示)。注意:不能使用任何变量,直接显示字符串:文件必须存放在考生文件夹中,窗体文件名为execise39.frm,工程文件名为execise39.vbp。
在考生文件夹中有工程文件execise23.vbp及窗体文件execise23.frm。在名为Form1、标题为“求和程序”的窗体上有3个Labe1控件、2个Text控件和3个命令按钮(如下图所示)。该程序的主要功能是求从1到Text1中用户输入的任意自然数n的累加和。要求:(1)刚启动工程时,Result和Clear按钮均为灰色。(2)可以在输入框内输入任意自然数(n值太大时,运算时间将很长,建议不超过9位)。在输入数的同时Result按钮按钮变为可用。当输入为非数值时,累加结果为0。(3)单击Result按钮可以在Text2中显示累加和,且该框内的文字不可修改:同时Result按钮变灰,Clear按钮变为可用。(4)单击Clear按钮,输入框和显示框均显示“0”。(5)单击Close按钮结束程序的运行。本程序不完整,请补充完整,并能正确运行。要求:去掉程序中的注释符“”’,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果是( )。Private Sub p1(n As Integer)For i=n To 1 Step-1x=String(i,"*")Print xNext iEnd SubPrivate Sub Command1_Click()p1(3)End SubA)*B)C)D)
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【 】语句。
一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程,其定义格式为: Form1中定义的过程: Private Sub Fun1() ...... End Sub Func中定义的过程: Public Sub Fun2() ...... End Sub 若要在窗体For2g调用Porm1和Func中分别建立的自定义过程,则调用格式正确的是 ( )
下列关于控件焦点的叙述中正确的是( )。
