在vb.net中，DateDiff（）函數(shù)是有什么用的？又是怎么用的？

分類: 電腦/網(wǎng)絡(luò) 程序設(shè)計 其他編程語言

創(chuàng)新互聯(lián)建站"三網(wǎng)合一"的企業(yè)建站思路。企業(yè)可建設(shè)擁有電腦版、微信版、手機版的企業(yè)網(wǎng)站。實現(xiàn)跨屏營銷，產(chǎn)品發(fā)布一步更新，電腦網(wǎng)絡(luò)+移動網(wǎng)絡(luò)一網(wǎng)打盡，滿足企業(yè)的營銷需求！創(chuàng)新互聯(lián)建站具備承接各種類型的成都網(wǎng)站設(shè)計、網(wǎng)站制作項目的能力。經(jīng)過十多年的努力的開拓，為不同行業(yè)的企事業(yè)單位提供了優(yōu)質(zhì)的服務(wù)，并獲得了客戶的一致好評。

解析:

DateDiff 函數(shù)

返回 Variant (Long) 的值，表示兩個指定日期間的時間間隔數(shù)目。

語法

DateDiff(interval, date1, date2[, firstdayofweek[, firseekofyear]])

DateDiff 函數(shù)語法中有下列命名參數(shù)：

部分 描述

interval 必要。字符串表達式，表示用來計算date1 和 date2 的時間差的時間間隔

Date1□date2 必要；Variant (Date)。計算中要用到的兩個日期。

Firstdayofweek 可選。指定一個星期的第一天的常數(shù)。如果未予指定，則以星期日為第一天。

firseekofyear 可選。指定一年的第一周的常數(shù)。如果未予指定，則以包含 1 月 1 日的星期為第一周。

設(shè)置

interval 參數(shù)的設(shè)定值如下：

設(shè)置 描述

yyyy 年

q 季

m 月

y 一年的日數(shù)

d 日

w 一周的日數(shù)

ww 周

h 時

n 分鐘

s 秒

firstdayofweek 參數(shù)的設(shè)定值如下：

常數(shù) 值 描述

vbUseSystem 0 使用 NLS API 設(shè)置。

vbSunday 1 星期日（缺省值）

vbMonday 2 星期一

vbTuesday 3 星期二

vbWednesday 4 星期三

vbThursday 5 星期四

vbFriday 6 星期五

vbSaturday 7 星期六

常數(shù) 值 描述

vbUseSystem 0 用 NLS API 設(shè)置。

vbFirstJan1 1 從包含 1 月 1 日的星期開始（缺省值）。

vbFirstFourDays 2 從第一個其大半個星期在新的一年的一周開始。

vbFirstFullWeek 3 從第一個無跨年度的星期開始。

說明

DateDiff 函數(shù)可用來決定兩個日期之間所指定的時間間隔數(shù)目。例如，可以使用 DateDiff 來計算兩個日期之間相隔幾日，或計算從今天起到年底還有多少個星期。

為了計算 date1 與 date2 相差的日數(shù)，可以使用“一年的日數(shù)”(y) 或“日”(d)。當 interval 是“一周的日數(shù)”(w) 時，DateDiff 返回兩日期間的周數(shù)。如果 date1 是星期一，DateDiff 計算到 date2 為止的星期一的個數(shù)。這個數(shù)包含 date2 但不包含 date1。不過，如果 interval 是“周”(ww)，則 DateDiff 函數(shù)返回兩日期間的“日歷周”數(shù)。由計算 date1 與 date2 之間星期日的個數(shù)而得。如果 date2 剛好是星期日，則 date2 也會被加進 DateDiff 的計數(shù)結(jié)果中；但不論 date1 是否為星期日，都不將它算進去。

如果 date1 比 date2 來得晚，則 DateDiff 函數(shù)的返回值為負數(shù)。

firstdayofweek 參數(shù)會影響使用時間間隔符號 “W” 或 “WW” 計算的結(jié)果。

如果 date1 或 date2 是日期文字，則指定的年份成為該日期的固定部分。但是，如果 date1 或 date2 用雙引號 (" ") 括起來，且年份略而不提，則在每次計算表達式 date1 或 date2 時，當前年份都會插入到代碼之中。這樣就可以書寫適用于不同年份的程序代碼。

在計算 12 月 31 日和來年的 1 月 1 日的年份差時，DateDiff 返回 1 表示相差一個年份，雖然實際上只相差一天而已。

如何正確理解VB.NET函數(shù)調(diào)用

1. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

2. MessageBoxA(ByVal hwnd As Integer,

ByVal text As String, ByVal

lpcaption As String, ByVal

wtype As Integer) As Integer

3. End Function

首先integer被作為32位數(shù)據(jù)替代了long(long是64位)

System是Net語言中的一個族，System.Runtime.InteropServices是system中的一個類。System.Runtime.InteropServices.DLLimpor是其中的一個方法。調(diào)用DLL的API

接口，這個的意思就是vb6的lib"user32", share是共享的意思，例如：

1. Public Class classA

2. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

MessageBoxA(ByVal h As Integer,

ByVal m As String, ByVal c As

String, ByVal type As Integer) As Integer

3. End Function

4. End Class

你可以這樣調(diào)用 classA.MessageboxA 但是如果沒有這個share 在class后打點就沒有MessageboxA的成員出現(xiàn)了 ，現(xiàn)在你就象以前一樣的使用他吧。

其實上面這個VB.NET函數(shù)調(diào)用方法并不正確，我們?nèi)耘f要使用API聲明，只是換了一各形式

如果你認為這就是VB.NET就錯了，看看這個：

system.WinForms.MessageBox.Show("對話內(nèi)容寫在這里", "標題寫在這里", messagebox.OK BitOr messagebox.IconAsterisk)

這就是面向?qū)ο?，你已?jīng)完成了所有的任務(wù)。不需要任何的API聲明。不需要寫多余的代碼。

1. messagebox.IconAsterisk=驚嘆號圖標

2. messagebox.IconError=錯誤圖標

3. messagebox.IconExclamation=警告圖標

4. messagebox.IconHand=錯誤圖標

5. messagebox.IconInformation=提示圖標

所經(jīng)點NET就是打點到達，在族后面打點，在類后面打點，在對象后面打點。第二個問題就是類與類之間相互的關(guān)系，Net在網(wǎng)上處理人與人的關(guān)系，在程序語言中處理類與類的關(guān)系。倒底是加不加share,倒底是類后面打點,還是Dim成一個對象（把他當一個變量吧）再說，是等于class,還是New class.是dim xxx as class=new class 還是dim xxx as new class

就是這樣VB.NET函數(shù)調(diào)用將更簡單，不須要研究一些很難的東西。

vb.net 編寫一個函數(shù)

注意：參數(shù)為動態(tài)數(shù)組；

Private Function MyF(ByRef d() As Integer)

ReDim d(4, 13) As Integer

Dim i As Integer

Dim j As Integer

Dim n As Integer

Dim MyNum(4) As Integer

For i = 1 To 4

MyNum(i) = 0

Next i

Randomize

For i = 1 To 4

For j = 1 To 13

n = Int(Rnd * 4 + 1)

Do While MyNum(n) = 13

n = Int(Rnd * 4 + 1)

Loop

d(i, j) = n

MyNum(n) = MyNum(n) + 1

Next j

Next i

End Function