Vb.net 找到当前时区并将其转换为';s以当地时间为基础的缩写

Vb.net 找到当前时区并将其转换为';s以当地时间为基础的缩写,vb.net,time,Vb.net,Time,我正在尝试用当前时区在程序上创建自定义时间戳。我真的不知道如何得到它。我所知道的是,它以TimeZoneInfo开头。 任何帮助都将不胜感激。到目前为止,我得到的是: Dim d1 As Date = Now Label1.Text = ("#" + d1.ToString("ddd" & " " & "MMM" & " " & "dd" & "IN HERE GOES TIMEZONE" & "hh:mm:ss" & " " &

我正在尝试用当前时区在程序上创建自定义时间戳。我真的不知道如何得到它。我所知道的是,它以
TimeZoneInfo
开头。 任何帮助都将不胜感激。到目前为止,我得到的是:

Dim d1 As Date = Now
Label1.Text = ("#" + d1.ToString("ddd" & " " & "MMM" & " " & "dd" & "IN HERE GOES TIMEZONE" & "hh:mm:ss" & " " &  & DateTime.Now.Year))
我希望能够利用loacl计算机的时间来转换它。

试试看

Dim d1 As Date = Now
Label1.Text = ("#" + d1.ToString("ddd MMM dd hh:mm:ss yyyy")

在这里回答没有必要将日期转换为字符串并像那样切碎它,看到了吗