Dim h
If h = 15 Then
MsgBox("Lopputulos: " & MaskedTextBox15.Text & " Haluatko pelata uudelleen?", MsgBoxStyle.YesNo, "Peli loppui")
End IfJos painaa "Kyllä" nappia niin se alottaa uudestaan ja kun painaa "Ei" nappia niin se sammuttaa sen. Olen yrittäny etsiä tähän vaikka mitä mutta en ole löytäny oikeaa koodia. Ja noi pitäs saada tohon if lauseen sisälle.
ainakin saat jos teet oman formin tolle yes no kyselylle.
Sama kai se tuleeko kysely msgboxilla tai uutena formina ( kait? )
pistä uusi formi aukeamaan kun peli päättyy ja sinne yes/no napit
ja vaikka teksti labelilla.
Esim jotain tänneppäin:
'vanhassa formissa If h = 15 Then uusiformi.show() End if 'Uuteen formiin label1.text = "Lopputulos: " & MaskedTextbox15.text & Haluatko pelata uudelleen?" If Yes.clicked Then pelinalkuformiin.show() End If If No.clicked Then Me.exit() End If
Tutki se MessageBoxin paluuarvo...
Dim dlgRes As DialogResult
dlgRes = MessageBox.Show( "Haluatko sulkea ilman tallentamista?", "Suljetaan...", _
MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
If dlgRes = DialogResult.Yes Then
Application.Exit()
End IfAihe on jo aika vanha, joten et voi enää vastata siihen.