Ⅰ 求個能自動按鍵的方法或工具
拿個東西把鍵盤卡住,或者把需要的按的鍵改為滑鼠左鍵
找張點東西卡住滑鼠
Ⅱ 如何用電腦鍵盤設置自動按鍵功能
這個好像真沒有。。。可以買個電動玩具綁在鍵盤上看能不能實現,具體如何操作自己構思。。。
Ⅲ 想用VB做一個可以自動連續按鍵的工具
在窗體上添加一個定時器控制項(Timer),Interval屬性設置為15000
然後在其Timer事件里添加 sendkeys "{F2}"
Private Sub Timer1_Timer()
SendKeys "{F2}"
End Sub
Ⅳ 怎樣用易語言做個自動按鍵的工具
第一:工具,支持庫配置,全選,確定。
第二:添加一個時鍾。
第三:雙擊時鍾,添加代碼。
模擬按鍵 (#A鍵, , )
第四:在開始控制項下,添加代碼
時鍾周期1.時鍾周期=1000 (表示一秒鍾按一次A鍵)
第五:停止控制項下添加代碼。
時鍾1.時鍾周期1=0
Ⅳ 批處理如何自動按鍵
自動按什麼鍵,如果說是任意鍵繼續,直接把批處理中的pause那行內容刪除即可
Ⅵ 按鍵精靈製作炫舞傳統自動按鍵怎麼做
首先第一步我們來關連各個控制項 也就是窗口初始化。
OK, 上程序 代碼我注釋的非常明白了,如果還不懂可以加我Q問我。[code]Event Form1.Timer1.Timer //根據定時周期執行事件
S = FORM1.Slider1.Value+1 //這句的意思是設置難度。為什麼要+1呢, 因為出初的時候滑塊的值是0 這樣不加1的話那麼進度條不完蛋了 - -1 //為什麼要設置在這里呢, 這跟子子程序里的變數是一樣的一定要注意,不在這里就會是個空值。
Form1.ProgressBar1.value = i //這句是讓進度條等於I 這樣我們加I 進度條就會走了, 因為我們I增加我們是放在時鍾里的。
i = i + S
If i >= 100 Then //當進度條走到頭以後讓他初始化,也就是I=1 四箭頭隨機
i = 1
Call 四箭頭隨機()
End If
End Event
Event Form1.Load //初始化設置時間周期
Form1.Timer1.Enabled = true
//默認定時器是啟動狀態,所以要先停止
Form1.Timer1.Interval = 100 //設置定時器循環的間隔時間(單位:毫秒)
form1.ProgressBar1.Value = 100
Randomize// 初始化隨機生
Call 四箭頭隨機()
//If Form1.Slider1.Value = 1 Then
//S = 1
//ElseIf FORM1.Slider1.VALUE = 2 Then
//S = 2
//
//End If
Delay 100
End Event
Sub 四箭頭隨機()
form1.Label1.Caption = MID("↑↓←→↑↓←→", 1+6* rnd + 1, 1)//這個如果你不懂的話, 沒關系他的意思就是用MID取這八個字元的當是一個 從第幾位取是用隨機數覺定的。
Delay 100 //這里城要注冊這個延時是必須加的, 因為隨機數是要運算的,而窗體剛載入的時候一下讓他隨機四個,就會有的時候是空白加上 就不會出現了 。
form1.Label2.Caption = MID("↑↓←→↑↓←→", 1+6 * rnd + 1, 1) //必須用這個格式寫 數值不能改如果改了會出錯這個原因我剛說了他同時取隨機就會不顯示。
Delay 100
form1.Label3.Caption = MID("↑↓←→↑↓←→", 1+6 * rnd + 1, 1) //這個做的作用是讓那四個箭頭隨機變化。 這里可以做成過程是因為我們到進度條在重新開始的時候還要在調用
Delay 100
form1.Label4.Caption = MID("↑↓←→↑↓←→", 1+6 * rnd + 1, 1)
end sub
Event Form1.ComboBox1.SelectChange
Select Case form1.ComboBox1.ListIndex //這里就是如果用戶選擇星級的時候 選擇就會改變 改變了就會執行這里的代碼。 用了SELECT 分別是一星的時候就讓滑塊等於1 2星就是2
Case 1
FORM1.Slider1.Value = 1 //分別是一星的時候就讓滑塊等於1
Case 2
FORM1.Slider1.Value = 2 //2星就是2
Case 3
FORM1.Slider1.Value = 3 //3星就是3
Case 4
FORM1.Slider1.Value = 3 //4星就是4
End Select
End Event[/code]好了, 現在是10點10分了, 本程序已全部完成 上代碼,注釋的非常清楚了。 別的就不用我說啦 自己看吧, 不懂的問我。[code]Event Form1.Timer1.Timer //根據定時周期執行事件
Select Case form1.ListBox1.ListIndex
Case 0
id=我是一隻魚.Play("c:\我是一隻魚.mp3",0)
Case 1
id=老鼠愛大米.Play("c:\老鼠愛大米.mp3",0)
Case 2
id=QQ愛.Play("c:\QQ愛.mp3",0) //播放列表框里的歌,選哪個播放哪個
Case 3
id=網路情緣.Play("c:\網路情緣.mp3",0)
End Select
S = FORM1.Slider1.Value+1 //這句的意思是設置難度。為什麼要+1呢, 因為出初的時候滑塊的值是0 這樣不加1的話那麼進度條不完蛋了 - -1
Form1.ProgressBar1.value = i //這句是讓I等於進度條 這樣我們加I 進度條就會走了, 因為我們I增加我們是放在時鍾里的。
i = i + S
If form1.CheckBox1.Value = 1 Then
form1.Label1.caption = "OK"
Delay 30
form1.Label2.caption = "OK"
Delay 30
form1.Label3.caption = "OK" //這四行就是自動按鍵的代碼。
Delay 30
form1.Label4.caption="OK"
End If
If Form1.Label4.caption = "OK" Then //如果第四個箭頭是OK的時候就表示都按對了 如果按下空格鍵 就會出現GOOD
If form1.OptionBox1.Value = 1 Then
form1.Label5.caption = "GOOD" //這句的意思就是如果自動那個輔助選上了就不需要在按空格了。
a=0
i = 1
Call 四箭頭隨機()
End If
kk = GetLastKey()
If KK = "32" Then
form1.Label5.caption = "GOOD"
a=0
i = 1
Call 四箭頭隨機()
End If
End If
If i >= 100 Then //當進度條走到頭以後讓他初始化,也就是I=1 四箭頭隨機
i = 1
form1.Label5.Caption="MISS" //這句是如果進度走一圈了還沒有按完鍵就會MISS
Call 四箭頭隨機()
End If
End Event
Event Form1.Load //初始化設置時間周期
Form1.Label5.caption = "得分"
Form1.Timer1.Enabled = true
//默認定時器是啟動狀態,所以要先停止
Form1.Timer1.Interval = 100 //設置定時器循環的間隔時間(單位:毫秒)
form1.ProgressBar1.Value = 100
Randomize// 初始化隨機生
Call 四箭頭隨機()
//If Form1.Slider1.Value = 1 Then
//S = 1
//ElseIf FORM1.Slider1.VALUE = 2 Then
//S = 2
//
//End If
Delay 100
End Event
Sub 四箭頭隨機()
form1.Label1.Caption = MID("↑↓←→↑↓←→", 1+6* rnd + 1, 1)//這個如果你不懂的話, 沒關系他的意思就是用MID取這八個字元的當是一個 從第幾位取是用隨機數覺定的。
Delay 100 //這里城要注冊這個延時是必須加的, 因為隨機數是要運算的,而窗體剛載入的時候一下讓他隨機四個,就會有的時候是空白加上 就不會出現了 。
form1.Label2.Caption = MID("↑↓←→↑↓←→", 1+6 * rnd + 1, 1) //必須用這個格式寫 數值不能改如果改了會出錯這個原因我剛說了他同時取隨機就會不顯示。
Delay 100
form1.Label3.Caption = MID("↑↓←→↑↓←→", 1+6 * rnd + 1, 1) //這個做的作用是讓那四個箭頭隨機變化。 這里可以做成過程是因為我們到進度條在重新開始的時候還要在調用
Delay 100
form1.Label4.Caption = MID("↑↓←→↑↓←→", 1+6 * rnd + 1, 1)
end sub
Event Form1.ComboBox1.SelectChange
Select Case form1.ComboBox1.ListIndex //這里就是如果用戶選擇星級的時候 選擇就會改變 改變了就會執行這里的代碼。 用了SELECT 分別是一星的時候就讓滑塊等於1 2星就是2
Case 1
FORM1.Slider1.Value = 1 //分別是一星的時候就讓滑塊等於1
Case 2
FORM1.Slider1.Value = 2 //2星就是2
Case 3
FORM1.Slider1.Value = 3 //3星就是3
Case 4
FORM1.Slider1.Value = 3 //4星就是4
End Select
End Event
Sub 左()
Select Case a
Case 0
If form1.Label1.Caption = form1.Button2.Caption Then
form1.Label1.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 1
End If
Case 1
If form1.Label2.Caption = form1.Button2.Caption Then
form1.Label2.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 2
End if
Case 2
If form1.Label3.Caption = form1.Button2.Caption Then
form1.Label3.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 3
End If
Case 3
If form1.Label4.Caption = form1.Button2.Caption Then
form1.Label4.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 0
End if
End Select
End Sub
Sub 上()
Select Case a
Case 0
If form1.Label1.Caption = form1.Button1.Caption Then
form1.Label1.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 1
End If
Case 1
If form1.Label2.Caption = form1.Button1.Caption Then
form1.Label2.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 2
End if
Case 2
If form1.Label3.Caption = form1.Button1.Caption Then
form1.Label3.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 3
End If
Case 3
If form1.Label4.Caption = form1.Button1.Caption Then
form1.Label4.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 0
End if
End Select
End Sub
Sub 下()
Select Case a
Case 0
If form1.Label1.Caption = form1.Button3.Caption Then
form1.Label1.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 1
End If
Case 1
If form1.Label2.Caption = form1.Button3.Caption Then
form1.Label2.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 2
End if
Case 2
If form1.Label3.Caption = form1.Button3.Caption Then
form1.Label3.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 3
End If
Case 3
If form1.Label4.Caption = form1.Button3.Caption Then
form1.Label4.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 0
End if
End Select
End Sub
Sub 右()
Select Case a
Case 0
If form1.Label1.Caption = form1.Button4.Caption Then
form1.Label1.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 1
End If
Case 1
If form1.Label2.Caption = form1.Button4.Caption Then
form1.Label2.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 2
End if
Case 2
If form1.Label3.Caption = form1.Button4.Caption Then
form1.Label3.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 3
End If
Case 3
If form1.Label4.Caption = form1.Button4.Caption Then
form1.Label4.Caption="OK" //這里我本來想讓他變成紅色的, 結果按鍵的QUI還不是那麼穩定他沒有COLOR屬性所以我只能寫個OK了
a = 0
End if
End Select
End Sub
Event Form1.Button2.Click
Call 左() //這就不用說了吧就是調用對應的按鍵操做。
End Event
Event Form1.Button1.Click
Call 上()
End Event
Event Form1.Button3.Click
Call 下()
End Event
Event Form1.Button4.Click
Call 右()
End Event
Event Form1.Button5.Click
form1.OptionBox1.Value = 0 // 這不用說了吧, 取消空格
Ⅶ 怎樣實現手機自動按鍵
在設置裡面呀。你設置個時間就行了。
打開菜單鍵,選擇手機設置-常規-安全性設置-手機和SIM卡-然後設置自動鎖閉時間...
我也是用5700的,紅黑金剛版
其實不用設置的,你直接按左軟鍵+星號鍵[*]就行了,就鎖了,開的方法是一樣的~~~
不懂的就多上上塞班論壇吧,對你有很大的幫助~~
Ⅷ 如何實現自動彈開的裝置
很多電熱燒水壺,按下按鈕燒水,水燒開了,按鈕自動彈起。這是利用某種金屬彈片在回不同溫度下變答形不同來觸發機械結構。
漏電開關,現在新裝修的屋子基本都用了,就是總閘,平時拉起,家裡有電。短路時,總閘自己跳開,斷開電路。這個原理是靠電流勵磁來吸合機械結構的。
這些東西您應該見過,燒水壺超市有,漏電開關五金店有。
Ⅸ 電腦怎麼設置自動按鍵
1.點擊「開始」按鈕,在開始菜單中找到「運行」,左鍵點擊「運行」。或者直接按下組合鍵<Win+R>。
2.在運行對話框的文本框中輸入 regedit ,進入注冊表。
3.依次打開注冊表項HKEY_CURRENT-USER\Control Panel\Keyboard。
4.在窗口右側,右鍵點擊InitialKeyboardIndicators,點擊修改。
5.此時,把數值數據修改為2,點擊確定按鈕。
6.完成,此時重啟,小鍵盤指示燈自動開啟。
Ⅹ 怎麼使用按鍵精靈製作自動按鍵或點擊腳本
新建一個腳本
設置你需要按什麼鍵,單鍵組合鍵都有。設置好了點擊插入!
滑鼠抓圖,點擊抓抓按鈕後,滑鼠移動到你想點擊的位置,按下Ctrl+Alt+1生成坐標1,Ctrl+Alt+2便是生存坐標2,以此類推!
抓圖完畢後,關閉抓圖面板,點擊左側滑鼠欄目,找到你生成的坐標,點擊選取,然後輸入你想要的點擊次數和左右鍵,一般為一次。完畢後點擊插入按鈕!
然後就是設置最右側的循環時間咯,圖為標准,只要不按下終止鍵就根本停不下來!
點擊保存退出,只要按下F10開始鍵,就開始執行啦!