请问如何在vb.net中实现定时弹出提示?

BIAOXYZ 2007-12-17 04:43:47
具体说就是类似一个自动的备忘录功能,比如每天下午2:30它会弹出提示让你去上课....
...全文
261 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
ping502 2007-12-19
  • 打赏
  • 举报
回复
如果是弹出消息 就是用messagebox.show() 或者msgbox() 跳出提示框
=================
彈出的是提示,個人覺得還是用個窗體來做提示框好點。因為你用以上兩種會把窗體鎖死,其它功能不能用。
BIAOXYZ 2007-12-18
  • 打赏
  • 举报
回复
3楼能不能给段具体代码呢?先谢了哈~~
lobdotcn 2007-12-18
  • 打赏
  • 举报
回复
如果是弹出消息 就是用messagebox.show() 或者msgbox() 跳出提示框
lobdotcn 2007-12-18
  • 打赏
  • 举报
回复
timer控件结合ie调用方法 (转载自lob.cn)

ie调用方法:

Private Sub OpenIe(ByVal Str_Url As String)

Dim Obj_Ie As Object = CreateObject("InternetExplorer.Application")
With Obj_Ie
.Visible = True
.Navigate(Str_Url)
End With
Obj_Ie = Nothing

End Sub
调用方式如: OpenIe(http://www.lob.cn)

timer控件的使用方法:
实例

通过实例是了解Timer控件的最佳方法。按以下步骤操作:

在表中增加一个Timer控件(可在Components部分找到),取名为Timer1。
将它的Interval(时间间隔)属性设为1000,Enabled属性设为Ture。
在表中增加一个Label控件,取名为IbIDateTime,将它的Text属性设为""。
加入以下代码:
Private Sub Timer1_Tick(ByVal sender As System.Object,

ByVal e As System.EventArgs)

Handles Timer1.Tick

lblDateTime.Text

= Now.ToLongTimeString.ToString()

End Sub

表中显示的日期/时间(date/time)值定期更新。

运行过程

一旦在Interval属性中指定的时间经过,Timer1_Tick事件就会发生。由于我在这个事件中执行的代码只是简单用当前日期/时间值更新IbIDateTime的Text属性,所以表中显示的日期/时间每1000毫秒更新一次(如Time1的Interval属性指定)。
只在此山中 2007-12-18
  • 打赏
  • 举报
回复
用定时器Timer

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧