-- 作者:黄训良
-- 发布时间:2015/3/18 12:05:00
-- [求助]时间问题
这句代码报错:
预览时正常,发布后报错。
Dim Datenew As Date = Date.Today If CStr(Datenew.Month) = "1" And CStr(Datenew.Day) = "1" MessageBox.Show("今天是" & Datenew.Year & "年的第一天,请设置编号前缀!","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Information) = DialogResult.Yes End If 此主题相关图片如下:日期问题.png
|