Dim hTrayIcon As TrayIcon

hTrayIcon = New TrayIcon ( ) [ As "event name" ]

创建一个新的托盘图标。