可以访问注册表HKEY_CURRENT_USER\Control Panel\International下面的一些键值
成都创新互联公司服务项目包括南澳网站建设、南澳网站制作、南澳网页制作以及南澳网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,南澳网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到南澳省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!
如sShortDate键值表示的是短日期sLongDate表示的是长日期
中文下的短日期是 yyyy-M-d
中文下的长日期是 yyyy'年'M'月'd'日'
C#
string [] Day=new string []{"星期日","星期一","星期二","星期三","星期四","星期五","星期六"};
Console.WriteLine(Day[Convert.ToInt16(DateTime.Now.DayOfWeek)]);
相信VB.net的你,应该懂的。
不是 有 函数嘛?
now() 就是 吧
取得 后 再 分离出你所需的,分别赋值 就行了,当然 还是 有 函数的
var reg = /(.{4}年.{2}月.{2}日|.{2}年.{2}月.{2}日|[^\-]{2}\-[^\-]{2}|[^\/]{2}\/[^\/]{2}|[^\\]{2}\\[^\\]{2})/g;
var str = "sdfasf****年**月**日,**年**月**日,**-**,**/**,**\**asdfadf";
str.match(reg);
Dim strDate As String
Dim datInput As Date
Dim datFirst As Date
Console.WriteLine("输入日期:")
strDate = Console.ReadLine()
Try
datInput = Date.Parse(strDate)
Catch ex As Exception
Console.WriteLine("输入错误")
Exit Sub
End Try
datFirst = Date.Parse(datInput.Year "/01/01")
Console.WriteLine(DateDiff(DateInterval.Day, datFirst, datInput))