Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

How to Enter Data Using InputBox in an Array?.

ProWalterProWalter Posts: 2Member
e.g Perhaps you enter weekly Salary and its Average.
Dim Array(5) As Decimal
Dim WeeklySal As Decimal
Dim Count,Add As Integer
Dim TotSalary As Decimal

For Count = 0 To (Array.length-1)
Array(Count) = InputBox("Enter Your Weekly Salary","Programmer's Heaven")
Next

For Add = 0 To (Array.Length-1)
TotSalary += Arraya(Add)
Next

label1.text = "Weekly Salary Average Is: R" & CStr(Cdec(TotSalary/Array.Length-1))
Sign In or Register to comment.