如果要让一个文本框的初值设置为当前日期且不能更改，则在该文本框的（）事件中设置代码为This.Value=DATE（），同时要将它的（）属性设置为.F.。
第1题：
要在文本框中显示当前日期和时间，应当设置文本框的控件来源属性为______。
A．=Date0
B．=Time()
C．=Now0
D．=Year()
第2题：
若要在文本框中显示当前的日期和时间，应在文本框的控件来源属性中设置( )。
A．=Date()
B．=Time()
C．=Now()
D．=Year()
第3题：
要在文本框中显示当前日期和时间，应当设置文本框的控件来源属性为 ______.
A．=Date()
B．=Time()
C．40122.430607
D．=Year()
第4题：
对考生文件夹下的“学生住宿”管理数据库设计一个表攀“bd2”，表单标题为“宿舍查询”，表单中有一个标签、3个文本框和两个命令按钮：“查询”和“关闭”。
运行表单时，在第一个文本框里输入某学生的学号，单击查询按钮，则在第二个文本框内会显示该学生的“姓名”，在第3个文本框里会显示该学生的“宿舍名称”。
如果输入的某个学号对应的学生不存在，则在第二个文本框内显示“该生不存在”，第三个文本框不显示内容；如果输入的某个学号对应的学生存在，但没有该学号的宿舍编号，则在第二个文本框内显示该生的“姓名”，第三个文本框显示“该生不住校”。
单击“关闭”按钮关闭表单。
【考点指引】本大题主要考查表单的设计及文本框和命令按钮等控件的使用，在查询的时候注意将查询结果保存到CURSOR中。
【操作步骤】
①选择【文件】→【新建】命令，选择“表单”，单击“新建文件”按钮打开表单设计器，在表单属性窗口中将“Caption”属性值修改为“宿舍查询”；单击表单控件工具栏上的“标签”控件图标，为表单添加一个标签Label1；单击表单控件工具栏上的“命令按钮”控件图标，为表单添加两个命令按钮Command1和Command2；单击表单控件工具栏上的“命令按钮”控件图标，为表单添加两个命令按钮Command1和Command2。
②选择标签，在标签属性窗口中将标签Label1的Cap-tion属性值修改为“请输入学号”；分别选择命令按钮，在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“查询”，将命令按钮Command2的Caption属性值修改为“关闭”，如图94-1所示。双击命令按钮，在Click事件中输入代码：ThisForm．Release，用来关闭表单。
③双击“查询”命令按钮，在Click事件中输入代码：
SELECT*INTO CURSOR aa FROM学生WHERE学号=ALLTRIM(ThisForm．Textl．Value)
IF ISNULL(aa．学号)THEN
ThisForm．Text2．Value="该生不存在"
ThisForm．Text3．Value=""
ELSE
ThisForm．Text2．Value=ALLTRIM(aa．姓名)
IF EMPTY(aa．宿舍编号)THEN
ThisForm．Text3．Value="该生不住校"
ELSE
SELECT宿舍名称INTO CURSOR bb FROM宿舍WHERE宿舍编号=ALLTRIM(aa．宿舍编号)
ThisForm．Text3．Value=ALLTRIM(bb．宿舍名称)
ENDIF
ENDIF
④选择【表单】→【执行表单】命令，系统首先要求保存该表单文件，在弹出的“另存为”对话框中输入表单文件名 “bd2”，保存在考生文件夹下，然后运行表单。
第5题：
如果文本框的Enabled属性被设置为False，则运行时
A．文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上
B．文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容
C．文本框中的文本将变成灰色，用户仍然能改变文本框中的内容
D．文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容
第6题：
对考生文件夹下的“学生住宿”管理数据库设计一个表单myf，表单标题为“宿舍查询”，表单中有
3个文本框和2个命令按钮“查询”和“关闭”。
运行表单时，在第一个文本框里输入某学生的学号(S1—S9)，单击查询按钮，则在第二个文本框内会显示该学生的“姓名”，在第三个文本框里会显示第三个学生的“宿舍号”。
如果输入的某个学生的学号对应的学生不存在，则在第二个文本框内显示“该生不存在”，第三个文本框不显示内容；如果输入的某个学生的学号对应的学生存在，但在宿舍表中没有该学号对应的记录，则在第二个文本框内显示该生的“姓名”，第三个文本框显示“该生不住校”。
单击“关闭”按钮关闭表单。
双击命令按钮“查询”编写该控件的Click事件程序代码如下：
******命令按钮Command1(查询)的Click事件代码*****
SET TALK OFF
OPEN DATABASE 学生住宿管理
USE学生
GO TOP
LOCATE FOR 学生.学号==ALLTRIM(Thisform.Text1.Value)
IF 学生.学号＞ALLTRIM(Thisform.Text1.Value)
Thisform.Text2.Value="该生不存在!"
Thisform.Text3.Value=""
ELSE
SELECT 学生.姓名;
FROM 学生;
WHERE 学生.学号=ALLTRIM(Thisform.Text1.Value);
INTO CURSOR temp
Thisform.Text2.Value=temp.姓名
USE 宿舍
LOCATE FOR 宿舍.学号==ALLTRIM(Thisform.Text1.Value)
IF宿舍.学号＞ALLTRIM(Thisform.Text1.Value)
Thisform.Text3.Value="该生不住校!"
ELSE
SELECT 学生.姓名.宿舍.宿舍;
FROM 宿舍学生;
WHERE 学生.学号=ALLTRIM(Thisform.Text1.Value)AND宿舍.学号=学生.学号;
INTO CURSOR temp
Thisform.Text2.Value=temp.姓名
Thisform.Text3.Value=temp.宿舍
ENDIF
ENDIF
CLOSEALL
SET TALK ON
***********************************************************
以同样的方法为“关闭”命令按钮编写Click事件代码；Thisform. Release。
保存表单文件为myf.scx到考生文件夹下表单运行结果如图3-109所示。
双击命令按钮“查询”，编写该控件的Click事件，程序代码如下：
******命令按钮Command1(查询)的Click事件代码*****
SET TALK OFF
OPEN DATABASE 学生住宿管理
USE学生
GO TOP
LOCATE FOR 学生.学号==ALLTRIM(Thisform.Text1.Value)
IF 学生.学号＞ALLTRIM(Thisform.Text1.Value)
Thisform.Text2.Value="该生不存在!"
Thisform.Text3.Value=""
ELSE
SELECT 学生.姓名;
FROM 学生;
WHERE 学生.学号=ALLTRIM(Thisform.Text1.Value);
INTO CURSOR temp
Thisform.Text2.Value=temp.姓名
USE 宿舍
LOCATE FOR 宿舍.学号==ALLTRIM(Thisform.Text1.Value)
IF宿舍.学号＞ALLTRIM(Thisform.Text1.Value)
Thisform.Text3.Value="该生不住校!"
ELSE
SELECT 学生.姓名.宿舍.宿舍;
FROM 宿舍,学生;
WHERE 学生.学号=ALLTRIM(Thisform.Text1.Value)AND宿舍.学号=学生.学号;
INTO CURSOR temp
Thisform.Text2.Value=temp.姓名
Thisform.Text3.Value=temp.宿舍
ENDIF
ENDIF
CLOSEALL
SET TALK ON
***********************************************************
以同样的方法为“关闭”命令按钮编写Click事件代码；Thisform. Release。
保存表单文件为myf.scx到考生文件夹下，表单运行结果如图3-109所示。
解析：本大题考查了表单常用控件的基本设置，在程序设计部分，可将查询结果存放到一个临时表中，然后通过文本框的Value属性值来显示查询结果。 第7题：
要在文本框中显示当前日期和时间，应当设置文本框的控件来源属性为______。
A．=Date()
B．=Time()
C．＝Now()
D．=Year()
第8题：
如果选中多个链接的文本框中的一个执行“Text-FitTextToFrame”命令，当前选中的链接文本框中的字体大小被调整。()
第9题：
在已建雇员表中有“工作日期”字段，假设当前雇员的工作日期为“1998-08-17”，若在窗体上添加一个文本框控件，并在其“控件来源”属性中输入表达式：=Str(Month([工作日期])) +"月"，则在该文本框控件内显示的结果是( )。
A．Str((Month(Date())) +”月”
B．08，+"月"
C．08月
D．8月
第10题：
如果文本框的SelStart属性值为-1，表示的含义为
A．光标定位在文本框的第一个字符位置上
B．从当前光标处向前选定一个字符
C．从当前光标处向后选定一个字符
D．错误属性值，该属性值不能为负数
