我在编一个学生管理系统
其中的录入程序里~~错误判断学号输入的不是数字~而是字符或者符号后弹出错误提示框
这段程序该怎么写啊

还有个问题是在录入界面中我的第一个按扭是添加记录
程序如下
Private Sub Command1_Click()
Command2.Enabled = True
Command3.Enabled = True
Command1.Enabled = False
Adodc1.Recordset.AddNew '向数据库中添加一条记录
Text1.SetFocus
End Sub

老是提示实时错误VB实时错误-2147217842（80040e4e）
是怎么搞啊~~
急中~~~~希望高手指点一下~~我在做课程设计

啊啊~~非常感谢啊~~太及时了

那如果是判断日期
我的出生日期的格式弄的是短日期的格式~~
判断日期是否正确怎么弄啊
还有就是判断必须是字符而不是数字的


还有就第2个问题里~~要把数据内容写好。。是什么意思啊~~


麻烦了啊~~谢谢了