杏花村官网:VB问题呀呀呀

来源:百度文库 编辑:高校问答 时间:2024/04/25 23:45:42
Private Sub Form_Load()
If WindowState = vbMinimized Then
LastState = vbNormal
Else
LastState = WindowState
End If

AddToTray Me, mnuTray

SetTrayTip "VB Helper tray icon program"
End Sub

不认识他
教一下我呀

上面这段程序大概是用来实现 系统托盘功能的就是项

qq那样最小化时显示图标在任务栏的右边。
AddToTray ,SetTrayTip 都是里面提供的函数,自己看明白了才能用。

完整一点
同意上楼