问过关于怎么判断text控件中输入的内容的其中某一字段是否能够转换成日期函数的有关问题
问过关于如何判断text控件中输入的内容的其中某一字段是否能够转换成日期函数的问题
窗口上有一个text控件，name属性为text1；
有两个label控件，name属性分别为lbldate和lblts
一个command控件，name属性为command1
按下command控件后，
现在我想通过先判断text控件中输入的内容的其中某一段位置，比方说从第7位开始的连续6位字符是否能够转换成日期函数，如果能，则把这6位字符转换成日期再让它在lbldate标签上显示出来，如果不能，则lbldate不显示，并且，lblts显示出相对应的提示信息
下面是我写的代码：
dim s as string
s=text1.text
if isdate(mid(s,7,6))=true then
lbldate.caption=cdate(mid(s,7,6))
else
lblts.caption="无法转换成日期"
end if
代码如上：
text控件中无论输入什么内容，这句isdate(mid(s,7,6))得出的结果都总是false。
要如何修改，才能令到isdate()得出true的结果呢？
由于每次输入的内容都不一样，并且只比较其中的某一段而不是将整个text1中输入的内容全部比较。
除了用isdate函数来判断，还能用什么函数来判断是否为日期函数呢？
但是如果用isdate函数来判断，这句isdate(mid(s,7,6))即使加上双引号变成isdate(“mid(s,7,6)”)或
isdate(mid(“s”,7,6))得出的结果都总是false。
有哪位大侠能够帮下我啊？
------最佳解决方案--------------------
只有你输入的字符串中第7个开始的6个字符是合法的日期，isdate(mid(s,7,6))才会返回ture,你试试输入abcdef2012-1(注：日期字符串是有严格规定的，年月日以“/”或“-”分隔，时分秒以“：”分隔，如："2012/10/30 1:32:32"、"2012-11-25 11:32:32"是合法的， “201210”这类似的写法是不合法的，“2012年10月”这种写法在简体中文系统中是合法的，但其它系统中不一定合法，具体要看操作系统区域设置中指定的日期格式或国际日期格式）
------其他解决方案--------------------
规定严点有他的好处，“121105”你希望解释为2012年11月5日还是1211年5月？尽管某些系统会支持，但它的解释可能不是你想要的，这种会产生岐义的写法还是少采用为妙，当年的“千年虫”可是浪费了不少的人力和物力。
当然，在你能够清楚系统的解释的情况下，采用一下也无妨。
------其他解决方案--------------------
晕死，那像“121105”这样的虽然可以转换成DATE函数，但是由于写法不合法，因此用isdate来判断得出的结果就为flase。是否是这样。
看来VB中的isdate的限制要比sql中多很多啊！使用上来限制很多啊！
多谢楼上了，问题已经解决了，既然说写法不合法，那我只要定义一个变量，然后通过把我要比较的字段插入"-"后令到它合法再进行比较就行了。
窗口上有一个text控件，name属性为text1；
有两个label控件，name属性分别为lbldate和lblts
一个command控件，name属性为command1
按下command控件后，
现在我想通过先判断text控件中输入的内容的其中某一段位置，比方说从第7位开始的连续6位字符是否能够转换成日期函数，如果能，则把这6位字符转换成日期再让它在lbldate标签上显示出来，如果不能，则lbldate不显示，并且，lblts显示出相对应的提示信息
下面是我写的代码：
dim s as string
s=text1.text
if isdate(mid(s,7,6))=true then
lbldate.caption=cdate(mid(s,7,6))
else
lblts.caption="无法转换成日期"
end if
代码如上：
text控件中无论输入什么内容，这句isdate(mid(s,7,6))得出的结果都总是false。
要如何修改，才能令到isdate()得出true的结果呢？
由于每次输入的内容都不一样，并且只比较其中的某一段而不是将整个text1中输入的内容全部比较。
除了用isdate函数来判断，还能用什么函数来判断是否为日期函数呢？
但是如果用isdate函数来判断，这句isdate(mid(s,7,6))即使加上双引号变成isdate(“mid(s,7,6)”)或
isdate(mid(“s”,7,6))得出的结果都总是false。
有哪位大侠能够帮下我啊？
------最佳解决方案--------------------
只有你输入的字符串中第7个开始的6个字符是合法的日期，isdate(mid(s,7,6))才会返回ture,你试试输入abcdef2012-1(注：日期字符串是有严格规定的，年月日以“/”或“-”分隔，时分秒以“：”分隔，如："2012/10/30 1:32:32"、"2012-11-25 11:32:32"是合法的， “201210”这类似的写法是不合法的，“2012年10月”这种写法在简体中文系统中是合法的，但其它系统中不一定合法，具体要看操作系统区域设置中指定的日期格式或国际日期格式）
------其他解决方案--------------------
规定严点有他的好处，“121105”你希望解释为2012年11月5日还是1211年5月？尽管某些系统会支持，但它的解释可能不是你想要的，这种会产生岐义的写法还是少采用为妙，当年的“千年虫”可是浪费了不少的人力和物力。
当然，在你能够清楚系统的解释的情况下，采用一下也无妨。
------其他解决方案--------------------
晕死，那像“121105”这样的虽然可以转换成DATE函数，但是由于写法不合法，因此用isdate来判断得出的结果就为flase。是否是这样。
看来VB中的isdate的限制要比sql中多很多啊！使用上来限制很多啊！
多谢楼上了，问题已经解决了，既然说写法不合法，那我只要定义一个变量，然后通过把我要比较的字段插入"-"后令到它合法再进行比较就行了。