十年網(wǎng)站開(kāi)發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶(hù) + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營(yíng)維護(hù)+專(zhuān)業(yè)推廣+無(wú)憂(yōu)售后,網(wǎng)站問(wèn)題一站解決
VB.NET即時(shí)窗口用于在設(shè)計(jì)時(shí)調(diào)試和計(jì)算表達(dá)式、執(zhí)行語(yǔ)句、輸出變量值等
創(chuàng)新互聯(lián)公司是一家集網(wǎng)站建設(shè),定日企業(yè)網(wǎng)站建設(shè),定日品牌網(wǎng)站建設(shè),網(wǎng)站定制,定日網(wǎng)站建設(shè)報(bào)價(jià),網(wǎng)絡(luò)營(yíng)銷(xiāo),網(wǎng)絡(luò)優(yōu)化,定日網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè),幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競(jìng)爭(zhēng)力。可充分滿(mǎn)足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時(shí)我們時(shí)刻保持專(zhuān)業(yè)、時(shí)尚、前沿,時(shí)刻以成就客戶(hù)成長(zhǎng)自我,堅(jiān)持不斷學(xué)習(xí)、思考、沉淀、凈化自己,讓我們?yōu)楦嗟钠髽I(yè)打造出實(shí)用型網(wǎng)站。
快捷鍵是:CTRL+G 或者按 CTRL+ALT+I
看了很多這方便的解決方案,很多都是一大段代碼,版本也有差別,既然有可能別人用得起我也用不起。
我用一種最簡(jiǎn)單的方法,只要思路對(duì)所有人都能用得起。
其實(shí)非常簡(jiǎn)單,就是獲取鍵值,Ctrl+Enter的健值是10,是不是思路一下就通了。以下是源碼:
Private Sub 聊天輸入框_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles 聊天輸入框.KeyPress
If Asc(e.KeyChar) = 發(fā)送快捷鍵值 Then
發(fā)送消息過(guò)程()
End If
End Sub
源內(nèi)容出處:
最簡(jiǎn)單的就是把屬性改一下,效果跟無(wú)框的差不多。
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.FixedSingle
Me.ControlBox = False
Me.MaximizeBox = False
Me.Text = ""
至于hook的問(wèn)題,它確實(shí)是比系統(tǒng)慢了一步得到消息,當(dāng)前線程或全局的都一樣,不過(guò)你可以先攔截Windows鍵或者Up鍵其中一鍵來(lái)阻攔組合鍵。
直接設(shè)置貌似不行 可以在窗體的 KeyDown事件里面寫(xiě)Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("快捷鍵設(shè)置成功")
End Sub
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.Shift And e.KeyCode = Keys.C Then
Button1_Click(sender, e)
End If
End Sub
End Class