Adapun bentuk penulisan struktur IIF, sebagai berikut:
hasil = IIF ( kondisi, jawaban1, jawaban2, Dst)
Keterangan:
Kondisi : perbandingan antara suatu variabel dengan variabel lainya dengan menggunakan tanda <,>,=,<> dari keadaan yang bernilai "Benar" atau "Salah"
Jawaban : jawaban jika kondisi penyeleksian bernilai "Benar" (kondisinya benar)
Contoh:
Buat sebuah program yang menyeleksi apakah inputan dari text1.text berisi "P","L". Jika inputan text1.text selain yang diatas maka akan diberikan jawaban kosong. Inputan pada contoh kali ini menggunakan huruf kapital jika yang diinputkan bukan huruf kapital maka sudah dipastikan jawabanya kosong. Isikan Listing berikut di Command1 pada prosedur Command1_Click:
Private Sub Command1_Click()
Dim kelamin As String
kelamin = IIf(Text1.Text = "P", "Perempuan", IIf(Text1.Text = "L", "Laki-laki", ""))
MsgBox "Jenis kelamin : " + kelamin + ""
End Sub
Hasil program:
Jika pada text1.text diimputkan huruf "P" dan clik Proses, maka akan tampil Message Box seperti berikut ini:
Jenis kelamin : Perempuan
Sedangkan bila imputanya selain "P" dan "L" maka tampilan jenis kelaminya kosong.
0 komentar:
Posting Komentar