1樓：網友
dim myvar
myvar = now ' myvar 包含當前的日期和時間。
weekday 函式。
返回代表一星期中某天的整數。
weekday(date, [firstdayofweek])
引數。date
可以代表日期的任意表示式。如果 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 = #october 19, 1962# ' 分派日期。
myweekday = weekday(mydate) '由於 myweekday 包含 6,mydate 代表星期五。
2樓：匿名使用者
自己編子程式才行。
vb怎麼在標籤上顯示當前系統星期幾
3樓：鬆鬆一號
private sub form_click()dim a(7) as string, b(7) as stringa(1) = "日": a(2) = "一": a(3) = "二":
a(4) = "三": a(5) = "四": a(6) = "五":
a(7) = "六"
for i = 1 to 7
b(i) = "星期" & a(i)
next i
n = weekday(now)
select case n
case n = 1 to 7
label1 = b(n)
end select
end sub
在介面裡建乙個標籤，把**複製進**器就ok了。
4樓：我不是豔陽高照
private sub label1_click()d = weekday(now)
select case d
case 1
星期天"case 2
星期一"case 3
星期二"case 4
星期三"case 5
星期四"case 6
星期五"case 7
星期六"end select
end sub
vb中可否直接獲得當前日期是星期幾
5樓：網友
ds=weekday(date())
if ds=1 then
df="星期日"
elseif ds=2 then
df="星期一"
elseif ds=3 then
df="星期二"
elseif ds=4 then
df="星期三"
elseif ds=5 then
df="星期四"
elseif ds=6 then
df="星期五"
elseif ds=7 then
df="星期六"
end if
df就是當前的星期數。
6樓：網友
weekday(date())返回值是代表星期日，7代表星期六。
7樓：不懂就問
可以啊，是個函式我忘了，你自己查一下。
為什麼vb獲取星期幾時要減一
8樓：閃星
直接參照下面的列表轉化就ok了。
假如weekday(date)返回3，那麼就是 星期二。
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 星期六。
9樓：
因為西方習慣是星期日做為一星期開始的第一天，中國是以星期一做為乙個星期的第一天。不過現在大部分人都是以星期天做為一星期的第一天了，日曆上也是這樣顯示了。
10樓：網友
因為預設的是週日為每星期的第一天。
你可以這樣改weekday(now, vbmonday)，這樣就預設週一是每星期的第一天了。
vb函式編寫今天星期幾
11樓：襲季雅茹溶
用weekday
函式即可實現，你可以指定星期日（數值1）為乙個星期的第一天（或者不指定），那麼返回值1就表示星期日，2
表示星期一，..
等等；如果你指定星期一（數值2）為乙個星期的第一天，那麼返回值1就表示星期一，2
表示星期二，..
等等；比如今天是2015年12月18日星期五，函式weekday(now,1)將返回6，而weekday(now,2)將返回5
vb函式編寫今天星期幾
12樓：網友
用weekday 函式即可實現，你可以指定星期日（數值1）為乙個星期的第一天（或者不指定），那麼返回值1就表示星期日，2 表示星期一，..等等； 如果你指定星期一（數值2）為乙個星期的第一天，那麼返回值1就表示星期一，2 表示星期二，..等等；
比如今天是2015年12月18日星期五，函式weekday(now, 1)將返回6，而weekday(now, 2)將返回5
vb中怎麼顯示今天的日期 星期和 時間?
13樓：網友
command1_click函式里輸入：
星期忘了。
vb程式設計顯示星期幾
14樓：匿名使用者
private sub command1_click()dim i as long
i = weekday(now)
select case i
case 1
星期天"case 2
星期一"case 3
星期二"case 4
星期三"case 5
星期四"case 6
星期五"case 7
星期六"end select
end sub
用vb如何表達星期幾？
15樓：網友
dim a as integer,week as stringa = weekday(now)
select case a
case 1
week = "星期日"
case 2
week = "星期一"
case 3
week = "星期二"
case 4
week = "星期三"
case 5
week = "星期四"
case 6
week = "星期五"
case else
week = "星期六"
end select
今天是大雪嗎，今天是大雪有什麼說法
是的，今天是大雪節氣，往後的日子會越來越冷的，而且雪也會越下越大的。付費內容限時免費檢視回答 立春 立是開始的意思,立春就是春季的開始。雨水 降雨開始，雨量漸增。驚蟄 蟄是藏的意思。驚蟄是指春雷乍動，驚醒了蟄伏在土中冬眠的動物。春分 分是平分的意思。春分表示晝夜平分。清明 天氣晴朗，草木繁茂。穀雨 ...
今天是農曆幾月幾日,今天是什麼日子,今天幾月幾號星期幾
今天是公曆bai2017年2月4日星du期六,農曆 雞年 正月 初八日,zhi dao六九第1天。公曆2017 2 4 查詢資訊如回下 答公曆 2017年2月4日星期 六寶瓶座 農曆 雞年 正月 初八日 四柱 丁酉 壬寅 壬戌 節氣 六九第1天 生誕 江東神誕 二十八宿 婁 甲子納音 大海水 距離今...
今天是農曆幾月幾日,今天是什麼日子,今天幾月幾號星期幾
今天是2016年農曆六月十七日,陽曆7月20號,星期三。也被稱為漢族的灶王節,當然十里不同俗,百里不同風。各地民俗不同 今天7月20日,農曆6月17日,星期三,頭伏第四天。今天是農曆幾月幾日,今天是什麼日子,今天幾月幾號星期幾 今天是2016年12月1日,星期四,農曆丙申年十一月初三,猴年。12月1...