VB Program - To Calculate the Simple Interest
Program :
Sub SimpleInterest()
Dim varPA
Dim varT
Dim varROI
Dim varSI
Dim varT
Dim varROI
Dim varSI
varPA = InputBox("Enter Principle Amount")
varT = InputBox("Enter Time(Yrs)")
varROI = InputBox("Enter Rate of Interest")
varSI = (varPA * varT * varROI) / 100
varT = InputBox("Enter Time(Yrs)")
varROI = InputBox("Enter Rate of Interest")
varSI = (varPA * varT * varROI) / 100
MsgBox "Simple Interest is " + CStr(varSI)
'Cstr()- Function converts the value to String
'Cstr()- Function converts the value to String
End Sub
Thanks.
ReplyDelete