十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
Dim a As String
成都创新互联秉承实现全网价值营销的理念,以专业定制企业官网,成都做网站、网站设计,成都小程序开发,网页设计制作,成都手机网站制作,网络营销推广帮助传统企业实现“互联网+”转型升级专业定制企业官网,公司注重人才、技术和管理,汇聚了一批优秀的互联网技术人才,对客户都以感恩的心态奉献自己的专业和所长。
Dim b As Date
a = "2016-11-18"
b = CDate(a)
本例中最主要的就是CDate()函数,这个函数是用于把字符型变量转换成日期型变量,
字符型变量(本例中的a)如果不是标准的日期格式,请先用字符串函数处理成标准日期格式再用CDate函数进行转换,否则会报错
Now是个日期类型(Date)的变量,占用8个字节,你必须这样定义:
Dim 临时时间(500) As Date
临时时间(0) = Now
临时时间(1) = Now
转换成字符型也很容易:
MsgBox(Now.ToString)
在你对日期/时间进行格式化时,控制面板中的地区与语言选项部分的设置会影响你所得到的结果。那些设置用来初始化DateTimeFormatInfo对象,这个对象与当前线程的文化有关,并提供控制格式的值。
Dim dateTimeInfo as DateTime = DateTime.Now
MessageBox.Show (dateTimeInfo)
Dim strMonth as String = dateTimeInfo.ToString("F")
MessageBox.Show(strMonth)
上面的代码定义了日期时间变量dateTimeInfo并将其值设为当前日期/时间。然后,我再定义字符串变量strMonth并将dateTimeInfo的值转换为"带长时间的完整日期/时间"格式下的字符串。
下面是一个标准日期格式说明符列表:
d:短日期
D:长日期
t:短时间
T:长时间
f:带短时间的完整日期/时间
F:带长时间的完整日期/时间
g:带短时间的一般日期/时间
G:带长时间的一般日期/时间
M或m:月-日
R或r:RFC1123
s:遵守ISO 8601的可分类日期/时间
u:国际可分类日期/时间
U:带长时间的完整日期/时间。(此格式与F相同,但它用于国际GMT时间。)
Y或y:年-月