關於 VB 的 ...... - 電腦交流

秘密行動 (潜水中)

版主

UID 39244
積分 10278
經驗 1893
YK幣 3378
帖子 6483
精華 1
註冊 2010-12-27
用戶註冊天數 4887
用戶失蹤天數 3545
來自香港
性別男生
狀態離線

#1

正常字體

發表於 2012-7-18 01:34 PM 資料文集短消息

關於 VB 的 ......

MsgBox("The password is incorrect, please re-enter.", MsgBoxStyle.Exclamation, "Game Launcher - Warning")
Close()

close 只是關閉選單而已
請問如何實現真正的關閉程式？
還是 close 就能實現呢？

mar041106 (cheesee)

普通會員

LOL

UID 34854
積分 5507
經驗 1291
YK幣 2524
帖子 2423
精華 0
註冊 2010-7-13
用戶註冊天數 5054
用戶失蹤天數 3004
來自 Equestria
性別男生
狀態離線

#2

發表於 2012-7-18 04:29 PM 資料文集短消息

private sub
end form 1

秘密行動 (潜水中)

版主

UID 39244
積分 10278
經驗 1893
YK幣 3378
帖子 6483
精華 1
註冊 2010-12-27
用戶註冊天數 4887
用戶失蹤天數 3545
來自香港
性別男生
狀態離線

#3

發表於 2012-7-19 07:37 PM 資料文集短消息

回覆 #2 mar041106 的帖子

咁
FileClose
Me.close

又點呢？
效果一樣？

pk9058

普通會員

UID 43891
積分 1333
經驗 57
YK幣 187
帖子 382
精華 0
註冊 2011-8-12
用戶註冊天數 4660
用戶失蹤天數 395
來自台灣
性別男生
狀態離線

#4

發表於 2012-7-23 06:16 PM 資料文集短消息

可以用 Me.Close 或想要關閉的From

秘密行動 (潜水中)

版主

UID 39244
積分 10278
經驗 1893
YK幣 3378
帖子 6483
精華 1
註冊 2010-12-27
用戶註冊天數 4887
用戶失蹤天數 3545
來自香港
性別男生
狀態離線

#5

發表於 2012-7-23 06:55 PM 資料文集短消息

回覆 #4 pk9058 的帖子

還有一個問題

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
      Dim quit As MsgBoxResult
      quit = MsgBox("Are you sure to close the application ?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Game Launcher - Warning")
      If (quit = MsgBoxResult.Yes) Then
         FileClose()
         End
         Else
      End If
End Sub

但我無法實現 If MsgBoxResult.No Then 取消選擇 - -