vb.net的，按鍵連續(xù)觸發(fā)事件，比如，按著鍵不放，音量增大。

1.定義變量記錄鍵是否被按下，按下的累計時間

創(chuàng)新互聯(lián)"三網(wǎng)合一"的企業(yè)建站思路。企業(yè)可建設(shè)擁有電腦版、微信版、手機(jī)版的企業(yè)網(wǎng)站。實現(xiàn)跨屏營銷，產(chǎn)品發(fā)布一步更新，電腦網(wǎng)絡(luò)+移動網(wǎng)絡(luò)一網(wǎng)打盡，滿足企業(yè)的營銷需求！創(chuàng)新互聯(lián)具備承接各種類型的網(wǎng)站設(shè)計制作、網(wǎng)站設(shè)計項目的能力。經(jīng)過十年的努力的開拓，為不同行業(yè)的企事業(yè)單位提供了優(yōu)質(zhì)的服務(wù)，并獲得了客戶的一致好評。

Dim?按下A鍵??As?Boolean

Dim?按下A鍵時間?As?Integer

2.添加一個TextBox1用于接收鍵盤事件，或者直接用窗體的鍵盤事件(確保KeyPreview為True)

在KeyDown事件中添加如下代碼：

If?e.Keycode?=?keys.A?Then?按下A鍵?=?True

在KeyUp事件中添加如下代碼：

If?e.Keycode?=?keys.A?Then?按下A鍵?=?False

3.添加一個Timer1控件，調(diào)整Timer1的Interval來決定按鍵頻率，記得要把Timer1.Enable開啟

在Tick事件中添加如下代碼：

If?按下A鍵?=?True

按下A鍵時間+=1

Call?音量設(shè)置(按下A鍵時間?*?10)

End?If

PS:?按下的秒數(shù) =?按下A鍵時間*Timer1.Interval / 1000

vb.net timer控件觸發(fā)按鈕的click事件

Private?Sub?Timer1_Tick(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Timer1.Tick

m?=?m?+?1

n?=?m.tostring

TextBox1.Text?=?n

End?Sub

m=m+1

n?=?m.tostring

textbox1.text?=?n

把這幾句原來在button2?click事件里面的代碼，直接寫在?timer事件里面，把timer的Enabled屬性設(shè)置為True,?Interval屬性設(shè)置為1000，就可以了。

vb.net問題 事件觸發(fā)

Private?Sub?Button2_Click(sender?As?Object,?e?As?EventArgs)?Handles?Button2.Click

Timer5.Enabled?=?True

time?=?1

End?Sub

Private?Sub?Timer5_Tick(sender?As?Object,?e?As?EventArgs)?Handles?Timer5.Tick

'Call?Button1_Click(sender,?e)

'time?=?time?+?1

time?=?time?+?1?????????????????????????????????????????'反過來

Call?Button1_Click(sender,?e)???????????????????????????'反過來

If?time?=?100?Then

Timer5.Enabled?=?False

End?If

End?Sub

如何在VB.Net中觸發(fā)一個控件的事件

比如你單擊按鈕，就觸發(fā)了按鈕的單擊事件

你雙擊按鈕，就觸發(fā)了按鈕的雙擊事件