DataBase Microsoft Visual Basic 6.0

Rumus DataBase Pada OptionGroup

Untuk lebih jelasnya baca ketentuan soalnya.

contoh penulisan Rumus :

Private Sub Option1_Click()

If Option1.Value = True Then

Text8.Text = Val(Text6.Text) * 10 / 100

End If

End Sub

Private Sub Option2_Click()

If Option2.Value = True Then

Text8.Text = Val(Text6.Text) * 5 / 100

End If

End Sub


untuk lebih jelas Download ketentuan soalnya.