用脚本很简单的:按左键里写VB脚本Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y) item.Text="已启动"End Sub释放左键里写VB脚本Sub OnLButtonUp(ByVal Item, ByVal Flags, ByVal x, ByVal y) item.Text="启动"End Sub