Fungsi InputBox

Menampilkan kotak dialog dimana user dapat memasukkan text. Masukkan di berikan pada sebuah variable.

InputBox adalah metode yang mudah digunakan untuk memasukkan teks melalui dialog. Konfirmasikan input dengan mengklik OK atau menekan Return. Masukan dikembalikan sebagai fungsi pengembalian nilai. Jika Anda menutup dialog dengan Batal, InputBox mengembalikan string nol-panjang ("").

Sintaksis:


InputBox (Msg As String[, Judul Sebagai String[, Default As String[,x_pos As Integer, y_pos As Integer]]]]))

Nilai hasil:

String

Parameter:

Msg: Ekspresi string ditampilkan sebagai pesan di kotak dialog.

Judul: Ekspresi string ditampilkan di bilah judul kotak dialog.

Bawaan: Ekspresi string ditampilkan dalam kotak teks sebagai bawaan jika tidak ada masukan lain yang diberikan.

x_pos: Ekspresi integer yang menentukan posisi horizontal dialog. Posisi adalah koordinat mutlak dan tidak mengacu pada jendela aplikasi kantor.

y_pos : Ekspresi integer yang menentukan posisi vertikal dari dialog. Posisi adalah koordinat mutlak dan tidak mengacu pada jendela aplikasi kantor.

Jikax_posdany_pos diabaikan, dialog akan terpusat di layar. Posisi ditentukan dalam twips.

Contoh:


Sub ExampleInputBox
Dim sText As String
    sText = InputBox ("Silakan beri frase:","Apa Kabar Pengguna")
    MsgBox ( sText , 64, "Konfirmasi frase")
End Sub

Mohon dukung kami!