Mencetak Pesan

Public Class Form1

    Private Sub cetak_pesan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button.Click

        MessageBox.Show("SELAMAT DATANG" + _

        masukan_nama.Text, _

        "PESAN DARI PROGRAM", _

        MessageBoxButtons.OK, _

        MessageBoxIcon.Information)

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

End Class

 

sumber : Esra handayani