如何将vb中的日期时间格式进行转换或修改？

本文共计546个文字，预计阅读时间需要3分钟。

使用VB.NET获取当前日期和时间的步骤如下：

vb.net' 获取当前日期和时间Dim dimCurDay As String=Date.Now.ToString(yyyy-MM-dd)Dim dimCurTime As String=Date.Now.ToString(HH:mm:ss)

' 输出当前日期和时间Console.WriteLine(当前日期： & dimCurDay & , 当前时间： & dimCurTime)

请问怎么用vb.net调出年月日用日期函数day()可获得当前日期,time()可获得当前系统时间.dimCurDayasstringdimCurTimeasstringcurda

请问怎么用vb.net调出年月日

用日期函数day()可获得当前日期,time()可获得当前系统时间.

dim CurDay as string

dim CurTime as string

curday=day()

curtime=time()

Label1.Caption = Date

就能在Label16显示当前日期

now 这个函数可以获得当前系统时间（包括年月日，小时分钟秒）

而

year()

month()

day()

等等则可以从now返回的值中分别提取年，月，日的信息

怎么在VB.NET中，提取系统日期中的后的 月和日 的位数

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a As Short = Date.Now.Month

Dim b As Short = Date.Now.Day

MessageBox.Show(a)

MessageBox.Show(b)

End Sub

上面是获取月份以及天数

'======================

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a As Short = Date.Now.Month

Dim b As Short = Date.Now.Day

Dim c, d As String

If a 0 AndAlso a 10 Then

c = "1位数"

Else

c = "2位数"

End If

If b 0 AndAlso b 10 Then

d = "1位数"

Else

d = "2位数"

End If

MessageBox.Show(c)

MessageBox.Show(d)

End Sub

这个是获取位数的

vb.net 2010日期格式和系统日期格式不一致，求解

其实电脑中的日期格式是Date类型，你所说的"yyyy-M-d“还是“yyyy/M/d"都是其转换为字符串以后显示的方式，你可以用Format函数将Date类型转换为你希望显示的任何形式，例如：

Format(DateTimePicker1.Value, "yyyy-MM-dd") '2014-08-30

Format(DateAndTime.Now, "yyyy-M-d") '2014-8-30

Format(DateTimePicker1.Value, "Long Date") '2014年8月30日