1.可参考 B4A 手册http://www.b4x.com/android/help/core.html#datetime
2.由于获取到的 week 是数字，我们需要定义一个 week 数组
Dim Str_Week() As String = Array As String(“星期日”,”星期一”,”星期二”,”星期三”,”星期四”,”星期五”,”星期六”)
3.获取系统的年月日、星期、时间
Dim date As String
date = DateTime.Date(DateTime.Now) & “ “ &Str_Week(DateTime.GetDayOfWeek(DateTime.Now) - 1)& “ “ & DateTime.Time(DateTime.Now)
Lbl_Status10.Text = date
4.其他的格式化可参考 B4A 的手册
