vb如何判断当天是不是是指定日期

Posted 2023-04-08

比如我一开始读取当天日期
DTPicker1.Value = Date
然后我怎么判断这个日期是不是2015年6月1日？

参考技术A Dim ThisADay As Date '声明一个日期类型变量
Dim MyToDay As Date '声明一个日期类型变量

ThisADay = #3/10/2015# '将一个指定的日期赋予一个变量
MyToDay = Now '将计算机日期赋予一个变量
MyToDay = Format(MyToDay, "YYYY/MM/DD") '将日期变量设置成指定的格式

If MyToDay = ThisADay Then
MsgBox "相同"
Else
MsgBox "不同"
End If本回答被提问者采纳

vb6 webbrowser 如何判断当前网页中获取焦点的是否一个文本框？

vb6 webbrowser控件 如何判断当前网页中获取焦点的是不是一个文本框？ 求解，要求：通用于任何网页、只判断网页中当前获取焦点的是否是一个文本输入框，要求返回一个值，描述获取焦点的，是，或者不是文本输入框。谢谢！
请勿乱答，谢谢！
我是说，判断webbrowser浏览器控件中网页中的输入框控件是否获得焦点，不是让窗体上的textbox输入框控件获得焦点，所以 8285604 的回答也不够准确！

参考技术A text1.text="" '清空文本框的内容
text1.setfocus '获得文本框的输入焦点 参考技术B 不是