VB.NET: Bekerja dengan Input Box

Bila kita perlu meminta user untuk memasukkan sebuah nilai, kita dapat menggunakan menggunakan InputBox.

InputBox merukapan sebuah kotak dialog dengan pesan tertentu yang biasanya merupakan petunjuk isian, menunggu user memasukkan nilai dan mengembalikan string hasil input.

Untuk lebih jelasnya, mari kita lihat contoh berikut.
UI:

Code:
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, _
                ByVal e As System.EventArgs) Handles MyBase.Load
        Button1.Text = "Choose..."
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, _
                ByVal e As System.EventArgs) Handles Button1.Click

        Dim str As String = InputBox("Your favorite color is...", "Colors")
        If str.Length > 0 Then
            TextBox1.Text = str
        End If

    End Sub
 
End Class

Runtime:

Kita juga dapat menambahkan nilai default untuk input box dengan cara sebagai berikut:
Dim str As String = InputBox("Your favorite color is...", "Colors", "Red")

Input box bisa digunakan untuk input string yang sangat sederhana. Untuk input yang lebih kompleks saya pribadi biasanya lebih memilih membuat form dialog sendiri. Kelemahan input box yang paling umum adalah tidak bisa membedakaan saat user menekan tombol Cancel atau menginput data string kosong.


Click here if you like this article.