1. 1.
    0
    Public Class Kızateklifet
    Private Sub teklifet()
    Dim cevap As Microsoft. VisualBasic.MsgBoxResult
    While cevap = MsgBoxResult.No
    cevap = MsgBox("benimle çıkar mısın?", MsgBoxStyle. YesNo, "Çıkma Teklifi")
    End While
    End Sub
    End Class
    ···
   tümünü göster