设计如图4-1所示的表单,实时显示当前的日期和时间。


第1题:
设计一个如图1-1所示的“教师信息浏览”表单。

④打开“代码编辑”窗口添加“首记录”按钮Command1的Click事件代码如图1-2所示的代码编辑框中命令的作用是:当记录指针指向表中第一条记录时“上一条”按钮不可用“下一条”和“末记录”按钮均可用。
⑤添加“上一条”按钮Command2的Click事件代码如图1-3所示的代码编辑框中命令的作用是:当记录指针向上移动一条记录时如果移到表的第一条记录“上一条”按钮和“首记录”按钮不可用而另外2个按钮可用:如果没有移到表的第一条记录则所有按钮都可用。
⑥添加“下一条”按钮Command3的Click事件代码如图1-4所示的代码编辑框中命令的作用是:当记录指针向下移动一条记录时如果移到表的最后一条记录“下一条”按钮和“末记录”按钮不可用而另外2个按钮可用;如果没有移到表的最后一条记录则所有按钮都可用。
⑦添加“末记录”按钮Command4的Click事件代码如图1-5所示的代码编辑框中命令的作用是:当记录指针指向表的最后一条记录时“下一条”按钮不可用但“上一条”按钮和“末记录”按钮均可用。
⑧给表单命名后运行表单。
④打开“代码编辑”窗口,添加“首记录”按钮Command1的Click事件代码,如图1-2所示的代码编辑框中命令的作用是:当记录指针指向表中第一条记录时,“上一条”按钮不可用,“下一条”和“末记录”按钮均可用。
⑤添加“上一条”按钮Command2的Click事件代码,如图1-3所示的代码编辑框中命令的作用是:当记录指针向上移动一条记录时,如果移到表的第一条记录,“上一条”按钮和“首记录”按钮不可用,而另外2个按钮可用:如果没有移到表的第一条记录,则所有按钮都可用。
⑥添加“下一条”按钮Command3的Click事件代码,如图1-4所示的代码编辑框中命令的作用是:当记录指针向下移动一条记录时,如果移到表的最后一条记录,“下一条”按钮和“末记录”按钮不可用,而另外2个按钮可用;如果没有移到表的最后一条记录,则所有按钮都可用。
⑦添加“末记录”按钮Command4的Click事件代码,如图1-5所示的代码编辑框中命令的作用是:当记录指针指向表的最后一条记录时,“下一条”按钮不可用,但“上一条”按钮和“末记录”按钮均可用。
⑧给表单命名后,运行表单。
第2题:
设计如图4-6所示的表单:可改变口令字符,输入的口令以口令字符形式显示,而真实口令显示在下方。

④打开“代码编辑”窗口添加“输入口令”文本输入框Text1的LostFocus事件代码该事件的代码如下:
ThisForm.Label4.Caption=This.Value
⑤添加“改变口令字符”文本框的InteractiveChange事件代码该事件的代码如下:
ThisForm.Text1.PasswordChar=This.Value
④打开“代码编辑”窗口,添加“输入口令”文本输入框Text1的LostFocus事件代码,该事件的代码如下:
ThisForm.Label4.Caption=This.Value
⑤添加“改变口令字符”文本框的InteractiveChange事件代码,该事件的代码如下:
ThisForm.Text1.PasswordChar=This.Value
第3题:
A.修改日期和时间
B.显示当前的日期和时间
C.显示磁盘最近访问日期和时间
D.设置日期和时间
第4题:
针对表“库存量.dbf”,设计可添加和浏览记录的表单,如图5-17所示:表单无标题栏:显示第一条记录时,“上一条”按钮不可用;显示末条记录时,则“下一条”按钮不可用。利用“添加记录”按钮可追加新记录。

④打开“代码编辑”窗口添加“上一条”按钮CommandGroup1.Command1的Click事件代码如图5-18所示。
⑤打开“代码编辑”窗口添加“下一条”按钮CommandGroup1.Command2的Click事件代码如图5-19所示。
⑥打开“代码编辑”窗口添加“添加记录”按钮CommandGroup1.Command3的Click事件代码如图5-20所示。
⑦添加“退出”按钮Command1的Click事件代码如图5-21所示。

④打开“代码编辑”窗口,添加“上一条”按钮CommandGroup1.Command1的Click事件代码,如图5-18所示。
⑤打开“代码编辑”窗口,添加“下一条”按钮CommandGroup1.Command2的Click事件代码,如图5-19所示。
⑥打开“代码编辑”窗口,添加“添加记录”按钮CommandGroup1.Command3的Click事件代码,如图5-20所示。
⑦添加“退出”按钮Command1的Click事件代码,如图5-21所示。
第5题:
设计一个通话计费程序,假设每分钟通话费用为0.20元,初始时,开始时间、结束时间、通话分钟和应付金额都为空。单击“开始”按钮,显示开始时间:单击“计费”按钮,显示结束时间、通话分钟和应付金额(每分钟0.20元,不满1分钟按1分钟计费)。表单样式如图 3-7所示。

④打开“代码编辑”窗口添加Form1的Init事件代码如图3-8所示。
⑤添加“开始”按钮Command1的Click事件代码如图3-9所示。
⑥添加“计费”按钮Command2的Click事件代码如图3-10所示。
⑦添加“关闭”按钮Command3的Click事件代码代码如下:
release thisform
④打开“代码编辑”窗口,添加Form1的Init事件代码,如图3-8所示。
⑤添加“开始”按钮Command1的Click事件代码,如图3-9所示。
⑥添加“计费”按钮Command2的Click事件代码,如图3-10所示。
⑦添加“关闭”按钮Command3的Click事件代码,代码如下:
release thisform.