msgbox code in one line

[joker399]

For a long time now, I think, I'm thinking and trying in different ways to push this code in one line. Is there such a possibility at all?

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If MsgBox("Cancel aplications", MsgBoxStyle.YesNo Or MsgBoxStyle.Information, "Cancel aplications") = Windows.Forms.DialogResult.Yes Then
            Me.Close()
        End If
    End Sub

The code I need to put in such a structure for example:

If Choosetext.ComboBox1.SelectedItem = "text1" Then

Form1.Button2.Text = "Text"
Form1.Button1.MsgBox?

End If

Does anyone have a solution like this code put into one line? And is there such an opportunity at all?