欧非资源网：安全、免费、专业放心的资源下载站！ 最新软件|软件分类

excel怎么制作表格 office 2020激活版下载

• 网站首页安卓应用安卓游戏电脑软件office教程

Office专区Word专区Excel专区PPT专区电脑专区手机专区其他专区

您的位置：欧非资源网 > 其他专区 > Access > Access日期控件的示例代码

Access日期控件的示例代码

时间：2018-10-16 00:44作者：admin来源：未知人气：632我要评论(0)

我的日期控件的使用：
界面上有三个东西：1.qsr为：起始日期的文本框2.jsr为结束日期的文本框3.rq为日历控件。
1、日期控件平常隐藏起来。双击起始日期或结束日期时日历控件才显示（界面的问题）。
2、对应的填上相应的日期。
以下是源码，大家多做交流：
Private Sub jsr_DblClick(Cancel As Integer)
Me.rq = Me.jsr
Me.rq.Top = Me.jsr.Top + Me.jsr.Height
Me.rq.Visible = True
End Sub
Private Sub qsr_DblClick(Cancel As Integer)
Me.rq = Me.qsr
Me.rq.Top = Me.qsr.Top + Me.qsr.Height
Me.rq.Visible = True
End Sub
Private Sub rq_DblClick()
If Me.rq.Top = Me.jsr.Top + Me.jsr.Height Then
Me.jsr = Me.rq
DoCmd.GoToControl "jsr"
Else
Me.qsr = Me.rq
DoCmd.GoToControl "qsr"
End If
Me.rq.Visible = False
End Sub
Private Sub 主体_Click()
Me.rq.Visible = False
End Sub

相关阅读 ​access怎么做点击选择学历的效果​access怎么取消冻结字段​access怎么冻结字段​access怎么删除子数据表​access怎么在表格中插入子数据表​access设置快速访问栏在功能区下方显示​access设置快速访问栏在功能区上方显示​access怎么将设计视图加到快速访问栏​access怎么将导出Excel表格加到快速访问栏​access怎么将数据表视图加到快速访问栏

文章评论

查看所有0条评论>>

发表评论

提交评论

分类索引

• WPS教程
• Outlook
• Visio
• OneNote
• Access
• Publisher
• SharePoint
• Project
• EndNote

热门文章 Microsoft Office Access 2019 官方版激活版 免费下载如何设计一个简单的Access登录窗体Access创建数据库实现图解教程access怎么求平均成绩

最新文章 ​access怎么做点击选择学历的效果​access怎么取消冻结字段 ​access怎么冻结字段​access怎么删除子数据表​access怎么在表格中插入子数据表​access设置快速访问栏在功能区下方显示

人气排行 Microsoft Office Access 2019 官方版激活版 免费下载如何设计一个简单的Access登录窗体Access创建数据库实现图解教程access怎么求平均成绩怎么在Access报表的页面页脚区添加一个计算控件Access 2007、2010、2016三个版本的使用心得Access查询标准(条件)详解电脑没有access怎么办？ access文件打不开怎么办？