设为首页
|
收藏本站
|
繁体中文
|
手机版
整站搜索
资讯
技巧
源码
行业
设备(待改)
资源
信息库(待改)
产品
作品(待改)
活动
培训(视频)
平台(待改)
二级(待改)
互动(作废)
交易
Access培训
-
Access开发平台
-
Access行业开发
首页
资讯
技巧
源码
行业
资源
活动
关于
技巧
ACCESS数据库
启动/设置/选项/背景
修复/压缩
安全/加密/解密
快捷键
版本升级/其它等
数据表
命名方式/设计规范
表设计
查询
Sql语言基础
选择查询
更新查询
删除查询
追加查询
生成表查询
交叉表查询
SQL特定查询
查询参数
查询综合应用
界面/窗体/控件
标签
文本框
命令按钮
组合框/列表框
选项组/复选框/选项按钮
选项卡
子窗体
窗体本身/综合应用
其它
报表打印
报表设计
高级报表
模块/函数/VBA/API/系统
VBA基础
内置函数
调试/跟踪/Debug
模块/类模块
API/COM/系统相关
字符数字日期
网络通信游戏
加密解密安全
文件处理
经典算法
宏/菜单/工具栏/功能区
宏/脚本
菜单/工具栏
功能区/Ribbon
图表/图形/图像/多媒体
图表
图形/图像
音频
视频/动画
DAO/链接表/ADO/ADP
DAO/链接表/ODBC
ADO/RDO
ADP
ActiveX/第三方控件/插件
Treeview树控件
ListView列表控件
Toolbar工具栏控件
微软其它控件
Dbi-Tech
CodeJock
Grid++Report
FastReport
ComponentOne
加载项/插件/Addin
OFFICE集成/导入导出/交互
Excel导入导出/交互
Word导入导出/交互
PPT交互
Outlook控制/邮件
Text文本文件/INI/CSV
PDF/SWF/XML格式
CAD格式
Sharepoint/其它Office
SqlServer/其它数据库
表
视图
存储过程/触发器
函数
用户/权限/安全
调试/维护
SqlServer其它/综合
发布/打包/文档/帮助
开发版/运行时
打包/发布/部署
开发文档/帮助制作
Access完整行业系统
采购管理系统
销售管理系统
仓库管理系统
人力资源管理HRM
CRM管理系统
MRP/ERP管理系统
BRP/流程优化
其它管理系统
心得/经验/绝招
其它/杂项
Excel技巧
Excel应用与操作
Excel开发编程
Word技巧
Word应用与操作
Word开发编程
Outlook技巧
Outlook应用与操作
Outlook开发编程
热门文章
如何计算出本月的最后一天
了解access中的相除(..
Access算出每个月的天..
ACCESS-VBA编程 ..
如何取得Double值各个..
一行代码得到中英混和字符串..
最新文章
Access或VB VBA..
关于VBA的0、""(空字..
Access导出函数Out..
Access日期与日期区间..
RecordSource ..
Access子窗体事件控制..
联系方式
Access交流网(免费Access交流)
QQ:18449932
网 址:
www.access-cn.com
当前位置:
首页
>
技巧
>
模块/函数/VBA/API/系统
>
VBA基础
VBA基础
[函数]vba计算月初,月末和本月天数
Function firstDayOfMonth(myDate As Date) As Date
firstDayOfMonth = CDate(Format(myDate, "yyyy-m-1"))
End Function
Function lastDayOfMonth(myDate As Date) As Date
lastDayOfMonth = DateAdd("d", -1, DateAdd("M", 1, firstDayOfMonth(myDate)))
End Function
Function DaysInMonth(myDate As Date) As Integer
DaysInMonth = DateDiff("d", firstDayOfMonth(myDate), lastDayOfMonth(myDate)) + 1
End Function
'? firstDayOfMonth("2003-2-4")
' 2003-2-1
'? lastDayOfMonth("2003-2-4")
' 2003-2-28
'? DaysInMonth("2003-2-4")
' 28
发布人:huanghai-Access中国
分享到:
点击次数:
更新时间:2013-08-16 16:40:36 【
打印此页
】 【
关闭
】
上一条:
如何恢复Outlook中已删除的邮件?
下一条:
access求出某个数值靠近0或者5
相关文章
•
Access或VB VBA判断数组的值是否为空的几种方法
•
关于VBA的0、""(空字符串)、Null、Empty、与 Nothing 的区别
•
Access导出函数OutPutto解释
•
Access日期与日期区间的筛选
•
RecordSource SourceObject ControlSource属性的区别
•
Access子窗体事件控制父窗体
•
事件change和AfterUpdate的区别
•
代码修改完善方法示例(初学者必读)
热门文章
[2004-11-23]
局域网如何获取某一机器的日期和时间
[2008-11-26]
新手来看:为什么数字计算结果总是错误?变量类型声明的重要性
[2013-08-15]
access求出某个数值靠近0或者5
[2009-05-11]
VBA语句集400句(七部分)
[2005-08-16]
初识VBA:第四课 计算器代码的编写
[2009-05-23]
Format 集合
热门产品