[英]Masked textbox causing error in VB.NET
在我的代码中使用maskedtextbox时,它返回一个异常:
从字符串“”到类型“日期”的转换无效
我的代码是:
Dim msg, first, second As String
Dim firstdate, seconddate As Date
first = MaskedTextBox1.Text
second = MaskedTextBox2.Text
firstdate = CDate(first)
seconddate = CDate(second)
msg = "Days from today: " & DateDiff(DateInterval.Month, firstdate, seconddate)
MsgBox(msg)
但是,如果使用文本框代替maskedtextbox,我的代码可以正常工作:
Dim msg, first, second As String
Dim firstdate, seconddate As Date
first = TextBox3.Text
second = TextBox4.Text
firstdate = CDate(first)
seconddate = CDate(second)
msg = "Days from today: " & DateDiff(DateInterval.Month, firstdate, seconddate)
MsgBox(msg)
最好使用一种解析方法来验证日期信息:
If DateTime.TryParse(first, firstdate) AndAlso _
DateTime.TryParse(second, seconddate) Then
msg = "Days from today: " & DateDiff(DateInterval.Day, firstdate, seconddate)
MessageBox.Show(msg)
Else
MessageBox.Show("Invalid dates entered.")
End If
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.