Dim X As DataX=Text1.text‘由文本框输入时间,格式为 10:00:00随后  比较 X与 time的值
 
if X=time  then这样赋值和比较是否可行。如需要格式转换,该怎么转换。