BU :
Keterangan :
_ Kondisi _ Terdiri dari 3 komponen, yaitu :
1. Data yang diseleksi
2. Operator Pembanding
3. Data yang dijadikan Nilai Pembanding
Contoh :
If val(txtNilaiAkhir) > 65 Then
lblKeterangan = “Lulus”
End if
Penjelasan :
If val(txtNilaiAkhir) > 65 Then
lblKeterangan = “Lulus” _
End if _ Akhir Blok IF
_ Perintah-perintah atau Statement-statement
Adalah Perintah yang digunakan untuk memberi Nilai atau Data terhadap satu Objek atau
Parameter (bisa juga disebut Variabel). Biasanya terdiri dari Tujuan dan Data/Nilai yang
akan dimasukan.
Contoh :
lblKeterangan = “Lulus”
If Kondisi Then
Perintah-perintah
End if
Data yang dijadikan Nilai Pembanding
Operator Pembanding
Data yang diseleksi
Perintah untuk menulis “Lulus” pada
Label Keterangan
Data/Nilai yang dimasukan
Tujuan (Objek) yang dituju
Asep Ramdhani - Pemrograman Visual Basic 6.0
Hal - 2
Latihan 1 :
Desainlah sebuah Form sebagai berikut :
Gb 1. Desain Form Gb 2. Form saat dijalankan
Ubahlah Propertinya seperti tabel dibawah ini :
Tulislah kode Program dibawah ini (sesuaikan dengan objeknya)
Private Sub cmdProses_Click()
If Val(txtNilaiAkhir) > 65 Then
lblKeterangan.Caption = "Lulus"
End If
End Sub
Private Sub Form_Load()
txtNilaiAkhir = "" ‘fungsi mengosongkan Textbox
txtNilaiAkhir.Alignment = 1 ‘Fungsi untuk mengatur teks rata kanan
End Sub
Objek Properti Nilai
Form Caption Latihan 1
Label1 Caption Nilai Akhir
Label2 Caption Keterangan
Label3 Name lblKeterangan
Caption Label Keterangan
Text1 Name txtNilaiAkhir
Text txtNilaiAkhir
Command1 Caption &Proses
Name cmdProses
Asep Ramdhani - Pemrograman Visual Basic 6.0
Hal - 3
Bentuk diatas digunakan hanya bila kondisi Benar saja yang diseleksi, apabila menginginkan untuk
menyelesi kondisi Salah, maka bentuk penulisannya menjadi :
BU :
Latihan 2 :
Kembangkanlah Program pada Latihan 1, sehingga pada label Keterangan menampilkan “Tidak Lulus”
apabila Nilai Akhir <=65.
Apabila kondisi yang diseleksi lebih dari satu, maka penulisan pernyataan IF menjadi :
Atau
If Kondisi Then
Perintah-perintah
Else
Perintah-perintah
End if
If Kondisi_1 Then
Perintah-perintah
Elseif Kondisi_2 Then
Perintah-perintah
Elseif Kondisi_n Then
Perintah-perintah
End if
If Kondisi_1 Then
Perintah-perintah
Else
If Kondisi_2 Then
Perintah-perintah
Else
If Kondisi_n Then
Perintah-perintah
End if
End if
End if
Asep Ramdhani - Pemrograman Visual Basic 6.0
Hal - 4
Latihan 3 :
NPM (Nomor Pokok Mahasiswa) Anda adalah 200710225018, memiliki arti sebagai berikut :
_ 4 Karakter Pertama (2007) adalah Tahun Masuk
_ 1 Karakter berikutnya (1) adalah Jenjang Pendidikan anda, 1 berarti S1 (Sarjana)
_ 2 Karakter berikutnya (02) adalah Fakultas, dimana :
a. 01 adalah kode untuk Fakultas Hukum
b. 02 adalah kode untuk Fakultas Teknik
c. 03 adalah kode untuk Fakultas Ekonomi
d. 04 adalah kode untuk Fakultas Komunikasi
e. 05 adalah kode untuk Fakultas Psikologi
_ 2 Karakter berikutnya (25) adalah Kode Jurusan (Program Studi), dimana :
a. 15 adalah kode untuk Jurusan Ilmu Hukum
b. 25 adalah kode untuk Jurusan Teknik Informatika
c. 26 adalah kode untuk Jurusan Teknik Kimia
d. 27 adalah kode untuk Jurusan Ilmu Hukum
e. 35 adalah kode untuk Jurusan Manajemen
f. 36 adalah kode untuk Jurusan Akuntansi
g. 35 adalah kode untuk Jurusan Ilmu Komunikasi
h. 45 adalah kode untuk Jurusan Ilmu Psikologi
_ Dan 3 Karakter terakhir merupakan Nomor Urut Pendaftaran
Untuk mengambil satu atau beberapa karakter dari sebuah String pada Visual basic, terdapat Fungsi
String yang dapat digunakan; sebagai berikut:
1. Fungsi Left
Fungsi Left digunakan untuk mengambil satu atau beberapa karakter dari posisi kiri Teks.
BU :
Left(String, n)
Dimana :
String _ Teks/kumpulan karakter yang akan dimanipulasi
n _ jumlah angka (berapa banyak) karakter yang digunakan.
Contoh :
Left(“Visual Basic”, 6)
_ akan menghasilkan “Visual” (6 karakter dari posisi kiri Teks)
2. Fungi Mid
Digunakan untuk mengambil satu atau beberapa karakter mulai posisi karakter yang ditentukan
sebanyak jumlah karakter yang digunakan.
BU :
Mid(String, n, m)
Asep Ramdhani - Pemrograman Visual Basic 6.0
Hal - 5
Dimana :
String _ Teks/kumpulan karakter yang akan dimanipulasi
n _ jumlah angka (mulai posisi karakter) yang digunakan
m _ jumlah angka (berapa banyak) karakter yang digunakan mulai dari posisi ke-n
Contoh :
Mid(“Ubhara Jaya”, 4, 6)
_ akan menghasilkan “ara Ja” (mulai posisi ke-4 yaitu karakter a, sebanyak 6 karakter)
3. Funsi Right
Fungsi Rigth digunakan untuk mengambil satu atau beberapa karakter dari posisi Kanan Teks.
BU :
Right(String, n)
Dimana :
String _ Teks/kumpulan karakter yang akan dimanipulasi
n _ jumlah angka (berapa banyak) karakter yang digunakan.
Contoh :
Right(“Visual Basic”, 5)
_ akan menghasilkan “Basic” (5 karakter dari posisi Kanan Teks)
Desainlah Form sebagai berikut :
Gb 3. Desain Form Gb 4. Form saat di jalankan
Selamat Mengerjakan.
Tidak ada komentar:
Posting Komentar