[VB.NET]用VB编了个闹钟,,却碰到问题~~

<script type="text/javascript"><!--
google_ad_client = "pub-8333940862668978";
/* 728x90, 创建于 08-11-30 */
google_ad_slot = "4485230109";
google_ad_width = 728;
google_ad_height = 90;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>

用VB编了个闹钟,,却碰到问题~~

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Convert.ToString(System.DateTime.Now)

If (h == System.DateTime.Now.Hour && m== System.DateTime.Now.Minute && s== System.DateTime.Now.Second) Then
MessageBox.Show( 时间到了!!! )
End If
End Sub
Dim h, s, m
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
h = Int32.Parse(TextBox1.Text)
s = Int32.Parse(TextBox2.Text)
m = Int32.Parse(TextBox3.Text)
End Sub
End Class

以上是代码,,可是为什么到了设置的时间却不能提示~~~???
__________________________________________________________________________
请lz检查程序是否进入 Timer1_Tick 这个方法
__________________________________________________________________________
我看 用 〉 表示

时间 没有叫做同时。
__________________________________________________________________________
我说 的是你 时间 判断的时候 用大于 号
__________________________________________________________________________
哎 88年的
__________________________________________________________________________
Timer1是否启动
__________________________________________________________________________
还是不行,,,,还有其他办法吗???
__________________________________________________________________________
昏倒 〉=

顺序反了 现在 比设定

System.DateTime.Now.Hour > = h && System.DateTime.Now.Minute > = m && System.DateTime.Now.Second > = s

测试通过
结帖
__________________________________________________________________________
暈死

vb.net加c#雙語法寫的代碼也能用？？
__________________________________________________________________________
谢楼主！
__________________________________________________________________________
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Convert.ToString(System.DateTime.Now)
If System.DateTime.Now.Hour = Int32.Parse(TextBox1.Text) And System.DateTime.Now.Minute = Int32.Parse(TextBox2.Text) And System.DateTime.Now.Second = Int32.Parse(TextBox3.Text) Then
MessageBox.Show( 时间到了!!! )
End If
End Sub
__________________________________________________________________________
那只是便于理解，

其实只要 不用绝对的时间对比

就可以了，

因为 没有 同时，这回事

所以，只要用逻辑 上的 大于 或小于 对比 就可以

把 timer 设定 到 1000 毫秒 没关系

*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html __________________________________________________________________________
h == System.DateTime.Now.Hour && m== System.DateTime.Now.Minute && s== System.DateTime.Now.Second
in vb
== -> =
&& -> and
__________________________________________________________________________