VB TextBox的问题

[复制链接]
查看11 | 回复2 | 2012-3-14 15:20:01 | 显示全部楼层 |阅读模式
哈哈,这个简单下面是我编写的Dim DD, MM, YY As Integer
'定义日,月,年中间变量 DD = Val(Left(Text1.Text, 2))
'从TEXTBOX字符串中取出“日” MM = Val(Right(Text1.Text))
'从TEXTBOX字符串中取出“月” YY = Val(Left(Right(Text1.Text, 4), 2)) '从TEXTBOX字符串中取出“年”'==========='下面验证年,月,日是不是符合范围 If lenth(Trim(Text1.Text))6 Then MsgBox "日...
回复

使用道具 举报

千问 | 2012-3-14 15:20:01 | 显示全部楼层
将文本格式设置为日期型数据,要用双“#”括起来,就不用检测了吧!...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行