在表单FORM1中有一个编辑框EDIT1,一个文本框TEXT1和一个命令按钮COMMAND1,现要使文本框显示编辑框中被选定的内容,应在COMMAND1的CLICK事件中编写的代码是()。
第1题:
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:
Private Sub Commandl Click()
Text3=Text1+Text2
End Sub
Private Sub Form1 Load()
Text1=" "
Text2=" "
Text3=" "
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
第2题:
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:
Private Sub Command1 Click()
Text3=Text1+Text2
End Sub
Private Sub Forml Load()
Text1=""
Text2=""
Text3=""
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
第3题:
设计一个表单名和文件名均为“bd2”的表单,所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题为“外币市值情况”。表单中有一个文本框、一个表格和两个命令按钮“查询”和“关闭”。
运行表单时,在文本框text1中输入货币代码,然后单击“查询”,则表格中会显示出外汇账户相应的账户信息及持有外币相当于人民币的价值数量。注意,某种外币相当于人民币数量的计算公式:人民币价值数量一该种外币的“买入价”*该种外币的“数量”。
单击“关闭”按钮关闭表单。
【考点指引】本大题主要考查表单的设计,重点是文本框和表格控件的使用和命令按钮事件代码的编写。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,将Caption属性值修改为“外币市值情况”;单击表单控件工具栏上的“文本框”控件图标,为表单添加l个文本框Textl,单击表单控件工具栏上的“命令按钮”
控件图标,为表单添加两个命令按钮Command1和Command2,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件。
②分别选择两个命令按钮,在按钮属性窗口中将Command1的Caption属性值修改为“查询”、Command2的Caption属性值修改为“关闭”,如图98-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm. Release,用来关闭表单。
③选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“""”,将“RecordSourceType”属性值修改为“1”。
④双击“查询”命令按钮,在Click事件中输入代码:
SELECT*,买入价*数量AS价值INTO CURSOR tmp FROM外汇账户WHERE货币代码=ThisForm.Textl.Value
ThisForm.Grid1.RecordSourceType=1
ThisForm.Grid1.RecordSource="tmp"
ThisForm.Grid1.Refresh
⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。
第4题:
在“表单控件”工具栏上可以创建一个()控件来保存单行文本。
第5题:
在表单form1中有两个文本框text1和text2,其value初值均为"无",form1的click事件代码如下:a=this.text1.value-this.text2.valuethis.print[a]表单运行后,在text1、text2中分别输入111和222,然后单击表单,则表单左上角显示()。
第6题:
在表单form1中有两个文本框text1和text2,其初值均为空,另有一个命令按钮command1,command1的click事件代码如下:a=val(thisform.text1.value)-val(thisform.text2.value)thisform.print[a]表单运行后,在text1、text2中分别输入456和123,然后单击命令按钮,则输出结果为()。
第7题:
在表单form1中有三个文本框text1、text2、text3(它们的value初值均为{})和一个命令按钮command1,命令按钮的click事件代码如下:x=thisform.text1.valuey=thisform.text2.valuethisform.text3.value=y-x表单运行后,在text1中输入11/12/2006,在text2中输入11/10/2006,然后单击command1,则text3显示()。
第8题:
0
22
50
100
第9题:
{^2006/11/6}4
2006/11/2
2006/11/64
{^2006/11/2}
第10题:
111222
-111
222
111-222
第11题:
T+32
T32
t
97
第12题:
11/10/200611/12/2006
11/12/200611/10/2006
2
-2
第13题:
设计名为formbook的表单(控件名为 form1,文件名为 formbook)。表单的标题设为“图书情况统计”。表单中有1个组合框(名称为Combo1)、1个文本框(名称为Text1)和2个命令按钮“统计” (名称为 Command1)和“退出” (名称为Command2)。
运行表单时,组合框中有3个条目“清华”、“北航”、“科学” (只有3个出版社名称,不能输入新的)可供选择,在组合框中选择出版社名称后,如果单击“统计”命令按钮,则文本框显示出“图书”表中该出版社图书的总数。
单击“退出”按钮关闭表单。
第14题:
使用下图,表单名为Form1,表单中有两个命令按钮(Commandl和Command2)、两个标签、两个文本框(Text1和Text2)。
如果在运行表单时,要使表单的标题显示“登录窗口”,则可以在Form1的Load事件中加入语句
A.THISFORM.CAPTION=“登录窗口”
B.FORM1.CAPTION=“登录窗口”
C.THISFORM.NAME=“登录窗口”
D.FORM1.NAME=“登录窗口”
第15题:
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?
程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为:同学们,你们好。
略
第16题:
在表单Form1中有一个文本框text1,text1的InteractiveChange事件代码如下:CHAR1=ALLTRIM(THIS.VALUE)ASC1=ASC(CHAR1)+32THIS.VALUE=CHR(ASC1)该表单运行后,在文本框中输入一个大写ASCII码“T”,则文本框中显示内容将是()。
第17题:
在表单form1中有三个文本框text1、text2、text3(它们的value初值均为"无")和一个命令按钮command1,命令按钮的click事件代码如下:thisform.text3.value=thisform.text1.value-thisform.text2.value表单运行后,在text1、text2中分别输入{^2006/11/6}和4,然后单击command1,则text3显示()。
第18题:
在表单form1中有一个列表框list1和一个文本框text1,form1的load事件代码如下:Thisform.list1.additem(“123”)Thisform.list1.additem(“123”)Thisform.text1.value=””list1的interactivechange事件代码如下:Thisform.text1.value=Thisform.text1.value-Thisform.list1.value表单运行后,在list1中先选择456,再选择123,则text1显示的内容是()。
第19题:
在表单FORM1中有一个文本框TEXT1,TEXT1的INIT事件代码如下:THIS.VALUE=0TEXT1的VALID事件代码如下:S=0FORi=1TOTHIS.VALUEIFi%5=0S=S+iENDIFENDFORTHIS.VALUE=S在TEXT1中输入22,然后按回车键,TEXT1中将显示()。
第20题:
579
456123
123456
321654
第21题:
333.00
456123
123456
-333.00
第22题:
THISFORM.TEXT1.VALUE=THISFORM.EDIT`1.VALUE
THISFORM.TEXT1.VALUE=THISFORM.EDIT`1.SELTEXT
THISFORM.TEXT1.SELTEXT=THISFORM.EDIT`1.VALUE
THISFORM.TEXT1.SELTEXT=THISFORM.EDIT`1.SELTEXT
第23题:
〈TEXTAREA NAME=“text”VALUE=“这是一个多行文本框”〉〈/TEXTAREA〉
〈INPUT TYPE=text VALUE=“这是一个多行文本框”NAME=“text1”〉
〈INPUT TYPE=textarea NAME=“text1”VALUE=“这是一个多行文本”〉
〈TEXTAREA NAME=“text”COLS=20 ROWS=5〉这是一个多行文本框〈/TEXTAREA〉