在VB.NET中如何將日期類型轉(zhuǎn)化為String型?

在你對日期/時間進(jìn)行格式化時，控制面板中的地區(qū)與語言選項部分的設(shè)置會影響你所得到的結(jié)果。那些設(shè)置用來初始化DateTimeFormatInfo對象，這個對象與當(dāng)前線程的文化有關(guān)，并提供控制格式的值。

成都創(chuàng)新互聯(lián)公司從2013年開始，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項目做網(wǎng)站、網(wǎng)站設(shè)計網(wǎng)站策劃，項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命，1280元西華做網(wǎng)站,已為上家服務(wù),為西華各地企業(yè)和個人服務(wù),聯(lián)系電話:18982081108

Dim dateTimeInfo as DateTime = DateTime.Now

MessageBox.Show (dateTimeInfo)

Dim strMonth as String = dateTimeInfo.ToString("F")

MessageBox.Show(strMonth)

上面的代碼定義了日期時間變量dateTimeInfo并將其值設(shè)為當(dāng)前日期/時間。然后，我再定義字符串變量strMonth并將dateTimeInfo的值轉(zhuǎn)換為"帶長時間的完整日期/時間"格式下的字符串。

下面是一個標(biāo)準(zhǔn)日期格式說明符列表：

d：短日期

D：長日期

t：短時間

T：長時間

f：帶短時間的完整日期/時間

F：帶長時間的完整日期/時間

g：帶短時間的一般日期/時間

G：帶長時間的一般日期/時間

M或m：月-日

R或r：RFC1123

s：遵守ISO 8601的可分類日期/時間

u：國際可分類日期/時間

U：帶長時間的完整日期/時間。（此格式與F相同，但它用于國際GMT時間。）

Y或y：年-月

vb中的日期與時間數(shù)據(jù)怎么轉(zhuǎn)化為數(shù)值？？？20世紀(jì)前的，對應(yīng)負(fù)數(shù)的那部分

Dim d As Double

d = CDbl(日期時間變量)

VB處理日期時，是把整數(shù)部分和小數(shù)部分分開來處理的，整數(shù)部分代表日期，小數(shù)部分代表時間。當(dāng)處理20世紀(jì)前的日期時，只是整數(shù)部分（也就是日期）變?yōu)樨?fù)數(shù)，小數(shù)部分（也就是時間）仍然是照常處理的。因此就會出現(xiàn)這種情況：

cdbl(#1899-12-28 23:59:59#) = -2.99998842592593

cdbl(#1899-12-29 0:0:0#) = -1

時間相差1秒，數(shù)值卻相差十萬八千里！

vb如何把數(shù)值轉(zhuǎn)化為時間格式

vb把數(shù)值轉(zhuǎn)化為時間格式:

VB.net 中 取系統(tǒng)時間

Dim datestr As String = ""

datestr = Format(Now(), "yyyy/MM/dd H:mm:ss ffff")

用戶定義的日期/時間格式（Format 函數(shù)）

轉(zhuǎn)化代碼：

Dim t As Integer, t1 As Integer, t2 As Integer, s As String

Dim tim As Date

Dim i As Integer, j As Integer

Private Sub Command1_Click()

s = InputBox("分鐘數(shù)：", "輸入", 67)

If s = "" Then Exit Sub

t = Val(s)

If t = 0 Then Exit Sub

t1 = t \ 60

t2 = t Mod 60

s = t1 ":" t2

tim = Format(s, "hh:mm:ss")

Text1.Text = tim

Timer1.Interval = 1000

Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()

Dim tt1 As Integer, tt2 As Integer, tt3 As Integer, tt As String

tt = Text1.Text

tt1 = Val(Left(tt, Len(tt) - 6))

tt2 = Val(Mid(tt, Len(tt) - 4, 2))

tt3 = Val(Right(tt, 2))

tt3 = tt3 - 1

If tt3 0 Then tt3 = 59: tt2 = tt2 - 1

If tt2 0 Then tt2 = 59: tt1 = tt1 - 1

If tt1 0 Then Timer1.Enabled = False: Exit Sub

tt = tt1 ":" tt2 ":" tt3

tim = Format(tt, "hh:mm:ss")

Text1.Text = tim

End Sub

在VB中如何將時間格式轉(zhuǎn)換成數(shù)值類型

把當(dāng)前時間轉(zhuǎn)為雙精度值：

Dim n As Double

n = Now

或者直接用

n = CDbl(Now)

誰知道用vb 怎么把日期型轉(zhuǎn)換成常規(guī)性數(shù)值

日期 date 類型 8字節(jié)

所以你可以用 cdbl 轉(zhuǎn)換成 double 就可以了

vb.net中日期類型怎么從字符串轉(zhuǎn)換

Dim a As String

Dim b As Date

a = "2016-11-18"

b = CDate(a)

本例中最主要的就是CDate()函數(shù)，這個函數(shù)是用于把字符型變量轉(zhuǎn)換成日期型變量，

字符型變量（本例中的a）如果不是標(biāo)準(zhǔn)的日期格式，請先用字符串函數(shù)處理成標(biāo)準(zhǔn)日期格式再用CDate函數(shù)進(jìn)行轉(zhuǎn)換，否則會報錯