kWH Pemakaian Listrik

Private Sub CMD_HASIL_Click()

Dim DAL, LP, JAWAB As Integer

DAL = Val(TXT_DAL.Text)

LP = Val(TXT_LP.Text)

JAWAB = DAL * LP

TXT_JAWAB.Text = JAWAB

End Sub