form üzerinde yüzde hesaplamaları

[oornek1]

merhaba arkadaslar formda arama yaptım isteğimi bulamadım istediğim form üzerinde textbox19 a girdiğim değerin textbox9 a %18 kdv atması

 

[abdi]

Private Sub TextBox19_Exit(ByVal Cancel As MSForms.ReturnBoolean)

If IsNumeric(TextBox19.Value) Then 
TextBox9.Value = Format(TextBox19.Value * 18 / 100, "#,##0.00")

Else
MsgBox "girilen değer sayı değil"
TextBox19.SetFocus

End If

End Sub