如果要把一个文本框对象的初值设置为当前日期,则在该文本框的Init事件中设置代码为()
第1题:
要在文本框中显示当前日期和时间,应当设置文本框的控件来源属性为 ______.
A.=Date()
B.=Time()
C.40122.430607
D.=Year()
第2题:
要在文本框中显示当前日期和时间,应当设置文本框的控件来源属性为______。
A.=Date0
B.=Time()
C.=Now0
D.=Year()
第3题:
要使一个文本框对象能够显示多行文字,应设置该对象的( )属性值为True。
A.Text
B.MultiLine
C.Style
D.Visible
第4题:
在已建雇员表中有“工作日期”字段,假设当前雇员的工作日期为“1998-08-17”,若在窗体上添加一个文本框控件,并在其“控件来源”属性中输入表达式:=Str(Month([工作日期])) +"月",则在该文本框控件内显示的结果是( )。
A.Str((Month(Date())) +”月”
B.08,+"月"
C.08月
D.8月
第5题:
若要在文本框中显示当前的日期和时间,应在文本框的控件来源属性中设置( )。
A.=Date()
B.=Time()
C.=Now()
D.=Year()
第6题:
如果选中多个链接的文本框中的一个执行“Text-FitTextToFrame”命令,当前选中的链接文本框中的字体大小被调整。()
第7题:
对考生文件夹下的“学生住宿”管理数据库设计一个表单myf,表单标题为“宿舍查询”,表单中有
3个文本框和2个命令按钮“查询”和“关闭”。
运行表单时,在第一个文本框里输入某学生的学号(S1—S9),单击查询按钮,则在第二个文本框内会显示该学生的“姓名”,在第三个文本框里会显示第三个学生的“宿舍号”。
如果输入的某个学生的学号对应的学生不存在,则在第二个文本框内显示“该生不存在”,第三个文本框不显示内容;如果输入的某个学生的学号对应的学生存在,但在宿舍表中没有该学号对应的记录,则在第二个文本框内显示该生的“姓名”,第三个文本框显示“该生不住校”。
单击“关闭”按钮关闭表单。
第8题:
如果将窗体中文本框的Password Char属性设置为一个字符,如星号(*),运行时,在文本框中输入的字符仍然显示出来,而不显示星号,原因可能是( )。
A.文本框的MultiLine属性值为True
B.文本框的Looked属性值为True
C.文本框的MultiLine属性值为False
D.文本框的Looked属性值为False
第9题:
要在文本框中显示当前日期和时间,应当设置文本框的控件来源属性为______。
A.=Date()
B.=Time()
C.=Now()
D.=Year()
第10题:
对考生文件夹下的“学生住宿”管理数据库设计一个表攀“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”,保存在考生文件夹下,然后运行表单。