2.为了实现单击最小化按钮可以缩进系统托盘,我使用的代码是: Private Sub Form_Resize() If Me.WindowState = 1 Then '最小化 AddToTray Me frmMain.Visible = False '最小化时不在任务栏显示 SetTrayBalloon 123, "我的软件", "双击打开" '最小化到系统托盘时的提示语 SetTrayIcon LoadPicture(App.Path & "\pictuer\heart.ico") '在系统托盘显示的图标 End If End Sub 请问有什么不妥的地方吗?