Jumat, 24 Mei 2013

Contoh Visual Basic


















Private Sub Combo1_Click()
Select Case Combo1.Text
Case "I"
Text3.Text = 100000
Text4.Text = 50000
Text5.Text = 1000000
Case "II"


Senin, 20 Mei 2013

Pertanyaan untuk Metode Numerik

Metode Numerik

katanya metode numerik itu adalah metode penyelesaian matematka yag hasilnya adalah merupakan hasil yg mendekati atau pendekatan...
contohnya obat yg sehari-hari dikonsumsi oleh masyarakat....
karena kalo kita makan obat,, kita gak lansung sembuh,,, harus ntah misalnya 2 atau 3 x makan obat baru reaksi obat bekerja....
karena proses pembuatan obat juga dilakukan dengan cara metode numerik....

jadi kalo obat dibuat dengan metode tersebut,,sekarang kebalikannya,, Racun dibuat dengan metode apa????

buat orang-orang Eksak,,, tolong kasih komentar ya!!!!

Jumat, 17 Mei 2013

Contoh Program Visual Basic Sederhana




Private Sub Combo1_Click()
Select Case Combo1.Text
Case 5000
Text2.Text = 6500
Case 10000
Text2.Text = 11000
Case 20000
Text2.Text = 21000
Case 50000
Text2.Text = 49500
Case 100000
Text2.Text = 98000
End Select
End Sub

Private Sub Command1_Click()
Text4.Text = Val(Text3.Text) - Val(Text2.Text)
End Sub

Private Sub Form_Load()
Combo1.AddItem "5000"
Combo1.AddItem "10000"
Combo1.AddItem "20000"
Combo1.AddItem "50000"
Combo1.AddItem "100000"
End Sub


program kuhhhh.......