2009-04-29 19 views
5

我需要打印的日期在MM/DD/YYYY的格式。 如果日期是2009年4月24日,它應該打印日期爲04/24/2009。 即還需要補零.. 我使用日期函數來獲取當前日期......但日期越來越米/ DD/YYYY的格式...如何打印在MM/DD/YYYY格式的日期在VB

+1

你在說哪個版本的VB? – 2009-04-29 06:46:47

+0

我正在VB 6.5中工作 – sona 2009-04-29 06:48:11

+1

`Date()`不會以任何格式返回它。它會返回一個日期,然後在顯示時使用當前的區域設置。 – Deanna 2012-08-30 08:17:21

回答

9

在即時窗口和測試正在爲我工​​作(輸出爲評論)

Format(Now, "MM/dd/yyyy") '04/29/2009 
Format(Date, "MM/dd/yyyy") '04/29/2009 
Format(CStr(Now), "MM/dd/yyyy") '04/29/2009 
Format(Date$, "MM/dd/yyyy") '04/29/2009 
Format(CDate(Date), "MM/dd/yyyy")'04/29/2009 

所以無論是字符串或日期時間應該沒有關係。

編輯:看到了弗雷德裏克您的評論。當你將它保存到數據庫表時,它的樣子並不重要(列日期格式將是數據庫的屬性,而不是你程序的(或者VB的)責任)。只要格式化值,當你從數據庫檢索它。

0

試試下面的代碼:

Format(dt,"MM/dd/yyyy") 
2

請注意,日期格式化函數中的「/」字符具有特殊含義,如「日期分隔符」。這意味着我可能會替換爲程序執行的當前語言環境的日期分隔符(例如,在瑞典它將被替換爲「 - 」)。爲了確保你確實得到了「/」字符在輸出中,我認爲這會工作(我沒有一個VB安裝驗證與):

Format(date, "MM'/'dd'/'yyyy") 
0

當你輸入的任何格式,將轉換成默認值等做的一件事是,在訪問更改數據類型的日期/時間文本,然後它可以在不影響到你的工作肯定日期。

1

只是備案,逃避斜線將工作
Format(dt,"MM\/dd\/yyyy")

0

我還用VB6,需要在我的TXT報告格式化日期

這對我的作品

Format$(Now, "yyyy-mm-dd-00.00.00") 

但只有當我宣佈日期字符串

-1

小號trDate =格式(strDate,「yyyy-mm-dd」) BillTime =格式(BillTime,「hh:mm:ss」)

相關問題