Pada Vb.Net INPUTBOX digunakan untuk menampilkan kotak pesan yang dapat menerima input teks. langsung ke contoh sederhananya dengan menggunakan 1 label dan 1 button dengan coding sbb :
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim isi As String = ""
isi = InputBox("Siapa Dosen Favorit Kamu", "Dosen Favorit")
Label1.Text = Label1.Text & " " & isi
Label1.Visible = True
End Sub
End Class
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim isi As String = ""
isi = InputBox("Siapa Dosen Favorit Kamu", "Dosen Favorit")
Label1.Text = Label1.Text & " " & isi
Label1.Visible = True
End Sub
End Class
outputnya sbb:
setelah button di klik akan muncul inputbox sbb:
dan hasilnya sbb:
tidak bermaksud menggurui, hanya untuk mengingatkan diri sendiri
Tidak ada komentar:
Posting Komentar