通過(guò)兩個(gè)按虛笑備鍵的時(shí)間差來(lái)判斷。升消
成都創(chuàng)新互聯(lián)公司專(zhuān)注于光明企業(yè)網(wǎng)站建設(shè),響應(yīng)式網(wǎng)站建設(shè),商城系統(tǒng)網(wǎng)站開(kāi)發(fā)。光明網(wǎng)站建設(shè)公司,為光明等地區(qū)提供建站服務(wù)。全流程按需設(shè)計(jì),專(zhuān)業(yè)設(shè)計(jì),全程項(xiàng)目跟蹤,成都創(chuàng)新互聯(lián)公司專(zhuān)業(yè)和態(tài)度為您提供的服務(wù)
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
Static Last As Double = -1
If e.KeyChar = vbCr Then
If Microsoft.VisualBasic.Timer() - Last 差毀 0.3 Then
Debug.Print("enter")
Last = -1
Else
Last = Microsoft.VisualBasic.Timer()
End If
End If
End Sub
用SQL數(shù)據(jù)庫(kù)。VB.NET是微軟公司在2002年推出的一種開(kāi)發(fā)基于.Net平臺(tái)應(yīng)用程序的開(kāi)發(fā)悉慎語(yǔ)言,vb點(diǎn)虐 在單擊回車(chē)鍵源虧時(shí)將數(shù)據(jù)寫(xiě)睜裂敬入數(shù)據(jù)庫(kù)需要用SQL數(shù)據(jù)庫(kù)。
可以用chr函數(shù)舉胡或者vbCrLf這種表示
chr(10):換行,相當(dāng)于vbLf
chr(13):回正祥攔車(chē),相當(dāng)于宴旅vbCr
chr(13)+chr(10):回車(chē)+換行,相當(dāng)于vbCrLf
思路很簡(jiǎn)單:通過(guò)textbox的前旅歲keypress事慧睜件來(lái)捕鎮(zhèn)神獲鍵盤(pán)輸入,輸入輸入的是回車(chē)鍵,則調(diào)用Button_click事件
代碼如下:
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = 13 Then
call Button1_Click()
end if
End Sub
當(dāng)前文章:vb點(diǎn)虐
回車(chē) vbs回車(chē)
分享路徑:http://vcdvsql.cn/article32/ddpeopc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供、微信小程序、云服務(wù)器、全網(wǎng)營(yíng)銷(xiāo)推廣、品牌網(wǎng)站設(shè)計(jì)、關(guān)鍵詞優(yōu)化
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容