admin 管理员组

文章数量: 1086019


2024年3月27日发(作者:register寄存器)

1、单击命令按钮运行宏m1:ro "m1"

2、标签Tda标题设置为系统当前日期:n=Date

3、使“保存”按钮CmdSave变为可用:d=True

将输入焦点移到"CmdEdit"命令按钮:us

4、将文本框tText的内容作为窗体中标签bTitle的标题显示:

n=Me!tText

5、窗体加载时窗体标题属性为系统当前日期:n=Date

6、打开窗体、单击"计算"按钮(名为bt),事件过程使用ADO数据库技术计算出表对

象"tEmp"中党员职工的平均年龄,然后将结果显示在窗体的文本框"tAge"内并写入外部文

件中。

If Count=0 Then

tAge=sage

7、将tStudent表中的全部记录显示出来:Select * From tStudent

8、窗体加载时窗体标题属性为系统当前日期:n=Date

9、消息框:MsgBox"请重新输入口令!",vbOkquit

10、输入框:k=InputBox("请输入大于0的整数值")

预览输出报表对象"rEmp":port "rEmp",acViewPreview

11、CaseIs>=3

"rEmp",acViewPreview

预览输出报表对象"rEmp":port

12、Dim f(19) As Integer

f(i)=f(i-1)+f(i-2)

tData=f(19)

13、单击"刷新"按钮,窗体记录源改为查询对象"qEm":

Source="qEmp"

单击"退出"按钮,关闭窗体:

14、窗体"fEmp"的"加载"事件中设置标签"bTitle"以红色文本显示:

n=vbRed

实现报表预览输出:mdPnt acViewPreview

15、消息框:MsgBox"报表预览",vbQuestion+vbYesNo,"确认"

16、动态设置窗体记录源为查询对象"qEmp":Source="qEmp"


本文标签: 窗体 按钮 记录 输入 标题