vbnet获取北京时间的简单介绍

vb怎么获取北京时间

VB里有好多时间函数，使用方法和excel类似，直接调用就好了，比如now显示当前时间，today表示当前日期，又如year年，month月，day日，hour小时（24小时制），minute分，second秒；

站在用户的角度思考问题，与客户深入沟通，找到屏边网站设计与屏边网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都做网站、成都网站建设、成都外贸网站建设、企业官网、英文网站、手机端网站、网站推广、域名注册、雅安服务器托管、企业邮箱。业务覆盖屏边地区。

另外要想获得想要的时间格式，你需要一个格式函数Formart()，表示为formart(date,formart of date)，比如我想获得今天的日期并且用这种格式2015-08-31，那么函数是formart(now,"ddddd")，这里的ddddd就是格式符，想要获得全部的格式符可以百度“formart()函数使用“，我这里就不引用了，希望以上内容对你有帮助

vb怎么获取系统当前的系统时间啊

vb中获取系统当前的时间用函数 now() 就可以。另外还有相关的时间 date() time()

now()获取系统当前日期和时间，如：2015-12-12 22：23：34

time()获取系统的时间，如：22：23：34不显示当前日期

date()获得系统的日期，如：2015-12-12

Private Sub Command1_Click()

MsgBox Now()

MsgBox Time()

MsgBox Date

End Sub

vb.net 获取互联网的北京时间

Public Function GetBeijingTime() As DateTime

Dim dt As DateTime

Dim wrt As WebRequest = Nothing

Dim wrp As WebResponse = Nothing

Try

wrt = WebRequest.Create("")

wrp = wrt.GetResponse()

Dim html As String = String.Empty

Using stream As Stream = wrp.GetResponseStream()

Using sr As New StreamReader(stream, Encoding.UTF8)

html = sr.ReadToEnd()

End Using

End Using

Dim tempArray As String() = html.Split(";"c)

For i As Integer = 0 To tempArray.Length - 1

tempArray(i) = tempArray(i).Replace(vbCr  vbLf, "")

Next

Dim year As String = tempArray(1).Split("="c)(1)

Dim month As String = tempArray(2).Split("="c)(1)

Dim day As String = tempArray(3).Split("="c)(1)

Dim hour As String = tempArray(5).Split("="c)(1)

Dim minite As String = tempArray(6).Split("="c)(1)

Dim second As String = tempArray(7).Split("="c)(1)

dt = DateTime.Parse(year  "-"  month  "-"  day  " "  hour  ":"  minite  ":"  second)

Catch generatedExceptionName As WebException

Return DateTime.Parse("2011-1-1")

Catch generatedExceptionName As Exception

Return DateTime.Parse("2011-1-1")

Finally

If wrp IsNot Nothing Then

wrp.Close()

End If

If wrt IsNot Nothing Then

wrt.Abort()

End If

End Try

Return dt

End Function

用VB怎么获取标准北京时间啊？？

可以获取中国科学院国家授时中心的标准时间（即中国北京时间）。

你可以借用vb的inet控件从中科院的网站上获取，中科院网站是：

如何用VB获取北京时间

now() 可以获取当前的时间。

可以使用 print now() 进行测试。输出当前时间。

想用文本保存。

那就：

open app.path "\time.txt" for output as #1

print #1,now()

close