vb中怎样才能双击托盘图标后直接显示程序？

vb程序最小化到托盘后鼠标双击托盘图标程序最小化到任务栏里，请问怎样才能双击后直接显示程序？我是按你的代码做的http://zhidao.baidu.com/questi... vb程序最小化到托盘后鼠标双击托盘图标程序最小化到任务栏里，请问怎样才能双击后直接显示程序？
我是按你的代码做的
http://zhidao.baidu.com/question/434582369.html 展开

 我来答

2个回答

#热议# 空调使用不当可能引发哪些疾病？

tianqing20wen

2013-02-28 · TA获得超过2.4万个赞

知道大有可为答主

回答量：8226

采纳率：88%

帮助的人：5113万

我也去答题访问个人页

关注

展开全部

Case WM_LBUTTONDBLCLK
Me.WindowState = 0 '加一句代码就可以了
Me.Show

更多追问追答

追问

在哪儿加？

追答

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Static Message As Long
        
        'x   is   the   current   mouse   location   along   the   x-axis
        Message = X / Screen.TwipsPerPixelX
        
        If RR = False Then
                RR = True
                Select Case Message
                        '   Left   double   click   (This   should   bring   up   a   dialog   box)
                        Case WM_LBUTTONDBLCLK
                                Me.Show '在这里加啊
                        '   Right   button   up   (This   should   bring   up   a   menu)
                        Case WM_RBUTTONUP
                        '        Me.PopupMenu mnuPopUp
                End Select
                RR = False
        End If
        
End Sub