Langkah pertama
Buat desaainnya sebagai berikut:
Buat scribnya sebagai berikut :
Public Class Form2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
h = TextBox1.Text
b = TextBox2.Text
Call hitung()
TextBox3.Text = hasil
End Sub
End Class
Dengan model :
Module Module1
'variabel public
Public nama As String, hasil, h, b As Integer
Sub tampilnama()
nama = "joko waredoyo"
End Sub
Sub hitung()
hasil = Val(h) * Val(b)
End Sub
End Module
Cara membuat model
1.aktifkan aplikasi/judul program
Contoh : windows applikasion1
2.klik kanan pilih Add
3.pilih modul
4.mulai membuat class dengan modul
Selamat mencoba!!!!
0 komentar:
Posting Komentar