MICROSOFT VISUAL BASIC
Merupakan sebuah bahasa pemrograman yang menawarkan integrated Development Environment (IDE) visual untuk membuat program perangkat lunak berbasis sistem operasi Microsoft Windows dengan menggunakan model pemrograman COM. Visual Basic merupakan turunan bahasa pemrograman BASIC dan menawarkan pengembangan perangkat lunak komputer berbasis grafik dengan cepat. Dalam pemrograman untuk bisnis, Visual Basic juga memiliki pangsa pasar yang sangat luas. Dalam sebuah survey yang dilakukan pada tahub 2005, 62% pengembangan perangkat lunak dilaporkan menggunakan berbagai bentuk Visual Basic, yang diikuti oleh C++, Java Script, C, dan Java.
Statement pada Visual Basic :
1. Pencabangan
Dalam membuat program biasanya dilakukan dengan berurutan, yaitu dari baris diatas sampai baris dibawah.
Percabangan juga dapat dilakukan dengan beberapa cara, yaitu :
a. IF KONDISI THEN
STATEMENT
END IF
b. IF KONDISI THEN
STATEMENT1
ELSE
STATEMENT2
END IF
c. IF KONDISI1 THEN
STATEMENT1
ELSEIF KONDISI2 THEN
STATEMENT2
END IF
d. SELECT CASE KONDISI
Case Kondisi1 : Statement1
Case Kondisi2 : Statement2
Case Kondisi3 : Statement3
End Select
2. PERULANGAN
menggunakan perintah :
a. Do While Ungkapan
pernyataan-pernyataan;
Loop
b. Do Until Ungkapan
Pernyataan-pernyataan;
Loop
c. For Variable = Nilai Awal To Nilai Akhir
Pernyataan-pernyataan;
Next Variable
Contoh Program Sederhana Pada Visual Basic :
a. membuat program vb dengan menggunakan commond buttom, textbox dan label.
coding :
Private Sub Command1_Click()
Label1.Caption = Text1.Text
End Sub
b. membuat tulisan menjadi miring
coding :
Private Sub Check2_Click()
Label1.FontItalic=True
End Sub
c. Membuat Tulisan menjadi tebal
Coding :
Private Sub Check2_Click()
Label1.Fontbold=True
End Sub
d. Memunculkan text label pada tampilan
coding :
Private Sub Command1_Click()
Label1.caption=text1.text
End Sub
e. Membuat tulisan menjadi warna merah
Coding :
Private Sub Option1_click()
Label1.ForeColor=vbRed
End Sub
f. mengubah tulisan miring menjadi tampilan awal
coding :
Private Sub Check2_click()
IF Check2.Value=Checked Then
Label1.FontItalic=true
Elseif.check1.value=unchecked then
Label1.FontItalic=false
End If
End Sub
Tidak ada komentar:
Posting Komentar