vb點擊按鈕退出程序

⑴ vb中退出按鈕什麼命令

vb中退出按鈕使用Exit Sub命此叢令。

Exit XXXX是VB中用於提前結森臘櫻束某一模塊的命令。
例局明如：
Exit Sub
Exit Function
Exit For
Exit Do
…………

⑵ vb6.0 點擊退出按鈕彈出對話框怎麼弄點擊確定退出，點擊取消返回原來的登陸界面

vbOKCancel表示含有【確定】、【取消】按鈕，「= vbOK」是選擇了【確定】按鈕。
這渣桐樣做非常簡便：
Private Sub cmdExit_Click()
If MsgBox("確定要退出嗎？", vbOKCancel, "警告") = vbOK Then
Unload Me '卸載登錄窗棚梁肢體
Else
'什麼也不做，留在登錄鏈世窗體
End If
End Sub

祝你好運！

⑶ VB程序 退出按鈕

在窗橋坦亂體上添敏檔加一個按鈕，編輯代碼：
Private Sub Command1_Click()
Unload Me
End Sub

這是正常退出，會執行Private Sub Form_Unload(Cancel As Integer)內容，例如退出確認之類（如果你寫了的話）

如果你有多個窗體，那麼
Private Sub Command1_Click()
End
End Sub

此乃強制結束，跳過一切步驟，直接結束信胡。類似結束進程。

⑷ 單擊退出程序的VB代碼怎麼寫

最簡單的：

PrivateSub

Command1_Click()

EndEndSub

End語句幫助你關閉所有已經打開的文件，顯示的窗口，以及申請的內存等等，能夠滿足90%的需要，但是End也不是萬能的，所以嚴謹的程序員還是會自己釋放所佔用的資源，完畢後再退出。

(4)vb點擊按鈕退出程序擴展閱讀

[vb]代碼庫

view sourceprint?

PrivateSubForm_Unload(CancelAsInteger)

DimiAnswerAsInteger

iAnswer = MsgBox("確定要退出嗎?", vbYesNo)

IfiAnswer = vbNoThen

Cancel =True

Else

End

EndIf

EndSub

⑸ vb命令按鈕退出怎麼設置

在退出按鈕的Click事件中用Unload
Me就可以關閉窗體。
Private
Sub
Command1_Click()
Unload
Me
End
Sub
答案補充
代碼升睜衡就是我回早拍答那些了，雙擊按鈕把代碼輸入進去就行了。對了，你的是VB6還是VB.Net啊吵做？VB6就是用Unload
Me，如果是VB.Net應該用Me.Close()。
這個是VB.Net的代碼：
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button2.Click
Me.Close()
End
Sub

⑹ 求在VB中，點擊command按鈕將其界面關閉的代碼怎麼寫啊

Sub Command1_Click() End End Sub 這樣是將整個程序關閉了。 Sub Command1_Click() Me.Hide End Sub 這樣是將當前窗口隱藏 Sub Command1_Click() Form2.Hide End Sub 這樣是將form2這個窗口隱藏。

⑺ VB里想點擊按鈕就可退出運行中的子程序，怎麼寫代碼

試試下臘鉛面的例子,在窗體上添加一指局飢個唯返命令按鈕,運行時,先點窗體,再點命令按鈕

Dim A As Boolean
Private Sub Command1_Click()
A = Not A
End Sub

Private Sub Form_Click()
A = True
Do
DoEvents
Cls
Print Timer
Loop While A = True
End Sub

⑻ vb中怎麼設計一個按鈕點擊後退出該程序(按鈕是新的) 菜鳥求教

Private Sub Command1_Click()
If MsgBox("是否要退出程來序源?", vbYesNo + vbExclamation, "退出程序") = vbNo Then
MsgBox "繼續留在本窗體中", vbExclamation, "退出程序"
Else
MsgBox "程序准備退出運行狀態", vbExclamation, "退出程序"
End
End If
End Sub

⑼ VB運行結束按鈕點擊才結束，需要代碼

一）首先需要是每個運行窗體有以下代碼，使窗體右上角那個關閉的X按鈕失效。

PrivateSubForm_QueryUnload(CancelAsInteger,UnloadModeAsInteger)
Cancel=True
EndSub

二）應該使用MsgBox 函數來選擇是否結束程序。

MsgBox 函數

在對話框中顯示消息，等待用戶單擊按鈕，並返回一個 Integer 告訴用戶單擊哪一個按鈕。

以下是一段使用MsgBox 函數來結束程序的按鈕代碼：

PrivateSubCommand4_Click()
DimMsg,Style,Title,Help,Ctxt,Response,MyString
Msg="結束程序?"'定義信息。
Style=vbYesNo+vbCritical+vbDefaultButton2'定義按鈕。
Title="結束程序"'定義標題。
Help="DEMO.HLP"'定義幫助文件。
Ctxt=1000'定義標題
'上下文。
'顯示信息。
Response=MsgBox(Msg,Style,Title,Help,Ctxt)
IfResponse=vbYesThen'用戶按下「是」。
MyString="Yes"'完成某操作。
UnloadFrmComm
UnloadfrmCeshi
UnloadfrmchaxunNew
End
Else'用戶按下「否」。
MyString="No"'完成某操作。
EndIf
EndSub

三）注意上述結束程序使用了Unload語句

Unload 語句

從內存中卸載窗體或控制項。

不要使用End語句，End 語句提供了一種強迫中止程序的方法。Visual Basic
程序正常結束應該卸載所有的窗體。只要沒有其它程序引用該程序公共類模塊創建的對象並無代碼執行，程序將立即關閉。