VB為什麼這個程式按任意鍵結束,VB執行結束按鈕點選才結束,需要程式碼

2022-12-24 22:30:15 字數 4381 閱讀 9696

1樓:zcy逗你玩

該**應該這麼寫

private sub form_keypress(keyascii as integer)

if keyascii = 13 or keyascii = 27 then end

end sub

你那麼寫為什麼是按任意鍵退出呢?原因如下:

vb中的0代表假,非零代表真。

if keyascii = 13 or 27 then這句話的執行順序是:

s1:先判斷keyascii是不是等於13,當然,如果你不是摁的回車,這個值當然為假(即為0)

s2:隨後判斷「0 or 27」,顯然27不等於0,所以27即為真。於是「0 or 27」等價於「false or true」,值當然是true。

因此你的程式為按任意鍵退出。

2樓:匿名使用者

private sub form_keypress(keyascii as integer)

if keyascii = 13 or keyascii = 27 then end

end sub

3樓:匿名使用者

是這裡出問題了:

13 or 27

應該改寫為:or keyascii = 27

vb中,單擊按鈕,結束程式執行的**是什麼

4樓:哀紹輝

3全部private sub userform_terminate()unload frmsub '退出當前窗體前先關閉子窗體end sub

在次**執行的過程中,我們按esc或者組合鍵是沒有效果的。如果我們在開發好的程式時候,可以加上這句**即可完成。順帶說下這格語句的使用方法:

5樓:

private sub command1_click()

endend sub

關於vb退出程式的問題

6樓:匿名使用者

end是vb整個應用程式,所有**停止,視窗解除安裝

exit是模組,可以是迴圈體,函式,過程 比如:"exit sub"vb中還有窗體退出還有,unload xx, me.unload等 如果只有一個窗體也相當於退出程式

7樓:匿名使用者

end是整個程式結束

exit是退出當前子程式,可以帶返回引數(一個整數)

8樓:匿名使用者

單獨使用end,則結束整個程式

end還可結束一個過程、條件語句等(如end sub、end function、end if),它用於告訴編譯器:該過程、if語句到此結束,後面的內容則是其它的東西,不屬於該過程、if語句的範疇

exit 則用於中途中斷某個過程、迴圈體等

vb中按command按鈕如何使程式結束

9樓:育知同創教育

按command按鈕結束程式:

在窗體上新增一個按鈕,編輯**:

private sub command1_click()unload me

end sub

這是正常退出,會執行private sub form_unload(cancel as integer)內容,例如退出確認之類提示

如果有多個窗體,那麼

private sub command1_click()endend sub

此乃強制結束,跳過一切步驟,直接結束。類似結束程序。

10樓:山澗布穀

雙擊該按鈕,在出現的**框中直接寫上end或unload me 就可以了!

11樓:匿名使用者

end或

unload me

12樓:匿名使用者

按鈕事件中加unloadme即可

13樓:匿名使用者

click事件中呼叫 end

如何設定vb點退出按鈕時,自動關閉vb程式

14樓:yty隨意

1、首先,在開啟的vb程式設計軟體中,寫上一個程式框架。

2、然後就可以在這裡輸入各種語句,根據自己需要可以多輸幾句。

3、然後找到自己輸入的兩個語句塊的中間部分。

4、接著在中間的部分中,輸入語句 【exit sub】。

5、最後輸入完成後,就可以點選頁面上方的執行選項按鈕,去執行測試了。

15樓:匿名使用者

你的問題含糊不清

private sub form_load()command1.caption = "退出"

end sub

private sub command1_click()endend sub

點選 退出vb 按鈕時

這樣就可以退出vb,但不退出vb編輯環境,如果生成。exe,這時點選 退出vb 這個生成的程式就可以退出,下一個問題,不知所云,

vb是一個編譯環境,如果你不想通過vb來開啟你想執行的程式,就一定要生成.exe

生成.exe你懂不懂?

開啟vb,**完成和編輯結束後,讓它成為windows 可執行程式,其步驟為

檔案-生成工程式1.exe

這樣這個1.exe 就脫離了vb,可以不用vb來開啟,你一點選這個1.exe

就直接開啟和執行程式,

不過,此時就不能再編譯了,

16樓:匿名使用者

click中寫寫一句話就行了:exit

你的後一個問題怎麼問的這麼奇怪呢。

生成exe檔案,點選exe檔案啟動程式就可以啦

17樓:

private sub form_load()command1.caption = "退出"

end sub

private sub command1_click()unload me

end sub

18樓:白居艱

雙擊你的那個按鈕會出現如下字樣:

private sub command1_click()end sub

在中間加入end會出現如下字樣,就可以了

private sub command1_click()endend sub

第二問也可能是你設定了一個按鈕,點選時才能進入程式,如果這樣,把那個按鈕及其命令刪除就可以了。

如果可以用的話想著選我最佳答案噢!

您的兩個問題可以這樣解決:

點左上角的檔案,生成工程1.exe,同時都可以解決了(前提是生成檔案前您的命令按鈕需設定如下):

private sub command1_click()endend sub

vb執行結束按鈕點選才結束,需要**

19樓:匿名使用者

private sub command1_click()if command1.caption = "結束" then end

print "我的世界"

command1.caption = "結束"

end sub

寫了vb的應用程式,最後怎麼關閉該程式呢?

20樓:匿名使用者

1.vb的啟動方式有兩種

1 sub main

2 form_load

結束也是兩個方法, sub main 對應的執行到end sub 就算結束

form_load就是unload me

當然全部結束的方法是end 但end 語句會重置所有模組級別變數和所有模組的靜態區域性變數。若要保留這些變數的值,改為使用 stop 語句,則可以在保留這些變數值的基礎上恢復執行。

注意 end 語句不呼叫 unload、queryunload、或 terminate 事件或任何其它 visual basic **,只是生硬地終止**執行。窗體和類模組中的 unload、queryunload、和 terminate 事件**未被執行。類模組建立的物件被破壞,由 open 語句開啟的檔案被關閉,並且釋放程式所佔用的記憶體。

其它程式的物件引用無效。

end 語句提供了一種強迫中止程式的方法。visual basic 程式正常結束應該解除安裝所有的窗體。只要沒有其它程式引用該程式公共類模組建立的物件並無**執行,程式將立即關閉。

21樓:匿名使用者

1>.unload me 沒問題.你製成porject.exe 後,執行完,程序中的porject.exe 也就消失了,

2>.或許你開啟的vb6.0沒關閉,程序中還有vb6.exe ,誤判

3>.你的電腦有病毒或外掛,防毒清理外掛就沒事了

筆記本開機,有硬碟自檢,提示按任意鍵就能跳過,但我按了後沒反應,等提示時間一過就卡死在那裡無法啟動

不是記憶體問題,記憶體如果有問題連自檢都到不了,應該是硬碟問題,你換個硬碟試試,如果通過了,說明是你的系統檔案丟了,或者是硬碟出現了壞道。電腦進入系統顯示 跳過磁碟檢查按任意鍵,但是按了沒用 xp系統?進入系統後用磁碟醫生一類的軟體檢測下磁碟,修復壞道 整理碎片。這樣可以從根本上解決開機進行磁碟檢查...

華碩電腦開機就出現鎖屏然後按任意鍵就直接變黑屏,為什麼

解決了嗎?我的筆記本也是這樣,求救 電腦開機問題,開機畫面如下圖,先是顯示主機板介面 華碩主機板 之後就一直黑屏。10 你好!有可能是記憶體鬆動了,建議開啟機箱,撥出記憶體條用橡皮擦拭一下記憶體條的金手指,再重新裝回去,注意記憶體條方向,別插反了。1.首先檢查電腦的外部接線是否接好,把各個連線重新插...

電腦開機時長時間按任意鍵後發出了報警聲,這是為啥,但是自然開機(不按任何鍵)的時候,就沒有響聲

為了解決鍵盤速度和cpu運轉速度的不匹配,鍵盤內部有一塊緩衝區。如果操作人員的輸入速度很快或cpu正在進行其它的工作,就先將鍵入的內容送往記憶體中的鍵盤緩衝區,等cpu空閒時再從緩衝區中取出暫存的指令分析並執行。你一直按著鍵,到一定時間他就會發出提示音,就說明鍵盤緩衝區滿了 尊敬的聯想使用者您好!1...