我需要用VB做乙個小小的模擬按鍵程式

2025-06-15 09:05:20 字數 2554 閱讀 3326

1樓:沙慧月

加兩個timer,乙個text

private declare function getasynckeystate lib "user32" (byval vkey as long) as integer

private sub form_load()= false

end sub

private sub timer1_timer()if getasynckeystate(vbkeyf10) then = not : = val(text1)

end sub

private sub timer2_timer()sendkeys ("

end sub

先在text1裡輸入時間(1000代表1秒衫鋒執行一次),按f10開始或結束或渣晌梁滲。

2樓:網友

不要用vb 用按鍵精靈就好。

我需要用vb做乙個簡單的查詢

3樓:網友

你的郵箱位址是什麼,發訊息給我,我這裡有一套簡單的系統。

發完了。

vb製作模擬按鍵

4樓:網友

要是想填完氏凳數字之後,點乙個按鈕就跡仿設定好,那就把500那地方換成乙個全域性變數,點按鈕的時候全域性變數賦值姿核纖為文字框的值。

vb模擬按鍵

5樓:涐吢銥舊囿儚

試下這個**:

option explicit

private strkeysel as string' 新建乙個標準exe工程,畫乙個combobox和timer' 然後在屬性視窗中把combo1的style屬性設定為2private sub form_load()dim i as long

falsefor i = 1 to 9

f" & i

nextend sub

private sub combo1_click()dim i as long

i = + 1

strkeysel = replace("", "n", i)= true

end sub

private sub timer1_timer()sendkeys strkeysel

end sub

我需要乙個vb**!!!

6樓:網友

我做了乙個計時的程式,也就是計算計算機啟動到關機使用的時間,但是要實現這個你需要自己簡單的改改,你看怎麼樣?

需要的話聯絡我。

其實這裡面的**相當簡單!!我還要高考了呢,我也控制不了自己,呵呵!

求乙個小小的vb程式

7樓:網友

新增timer控制項,屬性為 雲南城鄉資訊港打包如有問題可發訊息給我。

dim i as integer

private sub form_load()i = 10

end sub

private sub timer1_timer()if <= 10 and >= 0 theni = 10

hff00&

elseif <= 2760 and >= 2750 theni = -10

end if

iend sub

8樓:網友

你把你要的效果做成gif動畫,然後再用vb的image控制項load就可以。

乙個小小的vb程式,急~~~

9樓:網友

3全部private sub command1_click()x = val(

if x mod 105 = 0 then msgbox "能同時被整除" else msgbox "不能"

end sub

10樓:網友

private sub command1_click()a = val(text1)

if a mod 3 = 0 and a mod 5 = 0 and a mod 7 = 0 then

msgbox "能同時被整除"

elsemsgbox "不能整除"

end if

end sub

vb怎麼做乙個按鍵工程

11樓:網友

簡單可以纖隱這樣實現:

加入控制項microsoft windows common controls

private sub form_keyup(keycode as integer, shift as integer)

if keycode = 65 then = + 1 『a鍵。

if keycode = 76 then = - 1 』l鍵。

end sub

private sub form_load()= true

0end sub

真正成為遊戲敗晌可能用到其毀枯廳它方法實現。

我有小小的心願講稿,我有一個小小的心願 講稿

1.水晶頭骨之迷中講到2012年12月21日太陽下山之後,世界變化,只有非洲和中國西部地區部分人存活 2.科學 2012年地球磁極顛倒,前幾次分別導致了冰川時代和大洪水等事件 3.俄羅斯人 2009年世界大戰爆發,核危機4.臺灣一個學齡前班的孩子突然說起古maya語,大概意思是說要淨化地球,時間是2...

《我有小小的心願》的演講稿,《我有一個小小的心願》的演講稿

我有一個小小的心願,讓大家都成為我們的好朋友。讓我們在關心和愛護下長大,向著光明的前途,向前走 讓老師成為我們的好朋友。在課堂上和我們一起大聲的辯論問題,讓我們在課堂上得到自由。課堂上我們一起討論,下了課我們一起研究。讓我們在歡樂中學到知識,讓門門功課全部得優。我有一個小小的心願,讓家長成為我們的好...

如果乙個很愛的人離開了你,需要用多久的時間才能忘記他?

失戀的痛苦只是暫時的,你永遠要明白一點,我們追求愛情不是為了愛情,而是為了享受愛情帶給我們的幸福和感動。當一段感情不能夠帶給你這些的時候,你的努力和堅持也就失去了意義。失戀的時候不要停留在過去,你要相信只要你足夠勇敢,你就值得擁有更好的。.人總是要勇敢一些,不要活在過去的美好裡面 很多人面對感情的失...