输入某一天的日期,怎样知道这一天是星期几 输入某一天的日期,怎样知道这一天是星期几 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 返回代表指定日期的指定日期部分的整数。语法DATEPART ( datepart , date ) 参数datepart是指定应返回的日期部分的参数。下表列出了 Microsoft® SQL Server™ 识别的日期部分和缩写。 Weekday 函数 返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几。语法Weekday(date, [firstdayofweek])Weekday 函数语法有下列的命名参数:部分 描述 date 必要。能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。 Firstdayofweek 可选。指定一星期第一天的常数。如果未予指定,则以 vbSunday 为缺省值。 设置firstdayofweek 参数有以下设定值:常数 值 描述 vbUseSystem 0 使用 NLS API 设置。 VbSunday 1 星期日(缺省值) vbMonday 2 星期一 vbTuesday 3 星期二 vbWednesday 4 星期三 vbThursday 5 星期四 vbFriday 6 星期五 vbSaturday 7 星期六 返回值Weekday 函数可以返回以下诸值:常数 值 描述 vbSunday 1 星期日 vbMonday 2 星期一 vbTuesday 3 星期二 vbWednesday 4 星期三 vbThursday 5 星期四 vbFriday 6 星期五 vbSaturday 7 星期六 Weekday 函数示例本示例使用 Weekday 函数将日期转换为星期几。Dim MyDate, MyWeekDayMyDate = #February 12, 1969# ' 指定一日期。MyWeekDay = Weekday(MyDate) ' MyWeekDay 的值为 4,因为 MyDate 是星期四。 MsgBox WeekdayName(Weekday(Date)) 用weekdayname与weekday函数:在VB的环境下WeekdayName(Weekday(Date), True, vbUseSystemDayOfWeek) 忘了还有在sql下:select datename(dw,getdate()) Public Function GetWeekDay(d as Date) as integer GetWeekDay=WeekDay(d)-1end Function WAVE 转换成ALAW格式的动态链接库谁有呀 有API可以解决这个问题吗? 高分求救发送值为&H82的字符 怎样将字符串(如12:10:02:735)转换为DATE类型 怎样删除一个表里的所有记录和设置默认值? 难道正的没人了???高手快出现吧!! 批量修改数据表内容的sql语句问题 怎样生成XXX.dll,100分 关于利用WINSOCK控件共享或动态链接数据库的问题? 我怎么知道某个过程的运行时间? 如何在Form里控制Frame控件的移动,象移动Form得modal窗体一样 如何用vb编写一个可以定时执行某个程序,我想通过计划任务来完成!在线等~
DATEPART ( datepart , date ) 参数
datepart是指定应返回的日期部分的参数。下表列出了 Microsoft® SQL Server™ 识别的日期部分和缩写。
返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几。语法Weekday(date, [firstdayofweek])Weekday 函数语法有下列的命名参数:部分 描述
date 必要。能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。
Firstdayofweek 可选。指定一星期第一天的常数。如果未予指定,则以 vbSunday 为缺省值。
设置firstdayofweek 参数有以下设定值:常数 值 描述
vbUseSystem 0 使用 NLS API 设置。
VbSunday 1 星期日(缺省值)
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
返回值Weekday 函数可以返回以下诸值:常数 值 描述
vbSunday 1 星期日
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六
本示例使用 Weekday 函数将日期转换为星期几。Dim MyDate, MyWeekDay
MyDate = #February 12, 1969# ' 指定一日期。
MyWeekDay = Weekday(MyDate) ' MyWeekDay 的值为 4,因为 MyDate 是星期四。
WeekdayName(Weekday(Date), True, vbUseSystemDayOfWeek)
GetWeekDay=WeekDay(d)-1
end Function