作者cherryapril (偲)
看板Programming
标题[请益] visual basic日期的问题
时间Wed Sep 26 12:22:43 2012
我是才刚学visual basic的新手
想要写一个可以计算从出生到现在过了几天的程式。
希望能够让使用者方便，可以输入各种数字或文字，
但只要并非日期就会跳出错误的警告框。
但现在卡在只要一输入文字或数字程式就会整个crash
尝试用if then来写但没用Q_Q
用if not 也一直出现date和if not不相容Q__________Q
跪求强者帮忙Q____________Q
Option Strict On
Public Class Form1
Private Sub btncompute_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btncompute.Click
Dim d As Date = CDate(TextBox1.Text)
txttoday.Text = FormatDateTime(Today)
txtfromnowon.Text = FormatNumber(DateDiff(DateInterval.Day, d,
Today), 0)
End Sub
End Class
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 160.94.47.16
1F：→ MOONRAKER:整个crash？太夸张了 我看是VB装烂了吧 118.163.12.174 09/26 12:47