Re: [.NET] inputbox的取消鍵如何按了就跳出
※ 引述《tfg09730820 (猴)》之銘言:
: Public Class Form1
: Dim num1, num2, input, times As Integer
: Dim rnd As New Random
: Dim result As MsgBoxResult
: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
: System.EventArgs) Handles MyBase.Load
: Do
: num1 = rnd.Next(10, 100)
: num2 = rnd.Next(10, 100)
: times = 0
: Do
: times += 1
: input = InputBox(num1 & "+" & num2 & "= ?", "第" & times & "次
: 作答")
: If Str(input) = "" Then MsgBox("是否繼續", 4)
: Loop Until input = num1 + num2
: result = MsgBox("是否繼續", 4)
: If result = MsgBoxResult.No Then Exit Do
: Loop
: End
: End Sub
: End Class
: 請問標紅的那邊要怎麼改
if str(input)="" and msgbox("是否繼續",MsgBoxStyle.OkCancel)=MsgBoxResult.Ok then
end
end if
這樣不知道 有沒有幫助到你吼ZZ
就是訊息視窗 按下確定後... 就結束了程式=___=
不知道我是否變成了達非所問-.-? ((因為我題目不是看的很懂XD
--
┌──┐
│山玉│
│崎印│
└──┘
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 180.177.2.7
推
10/27 20:47, , 1F
10/27 20:47, 1F
→
10/27 22:39, , 2F
10/27 22:39, 2F
→
10/27 22:39, , 3F
10/27 22:39, 3F
→
10/27 22:40, , 4F
10/27 22:40, 4F
→
10/27 23:15, , 5F
10/27 23:15, 5F
→
10/27 23:16, , 6F
10/27 23:16, 6F
→
10/28 10:03, , 7F
10/28 10:03, 7F
→
10/28 10:34, , 8F
10/28 10:34, 8F
推
10/28 12:57, , 9F
10/28 12:57, 9F
→
10/28 12:57, , 10F
10/28 12:57, 10F
→
10/28 13:31, , 11F
10/28 13:31, 11F
討論串 (同標題文章)