Member Avatar for kimpoy11 
Private Sub Form_Load()

Dim n, Average As Integer
Do
For x = 1 To 10
n = InputBox("Enter a number" & x)
Average = Average + n / 10
lblNumbers.Caption = Str(n) + " " + lblNumbers.Caption
 Next x
 
 
         
 Loop Until n = n
lblAverage.Caption = Average

End Sub

(i'm a beginner and i want the answer be highest to lowest i appreciate if you can help me Thanks.)

Edited by kvprajapati because: Added [code] tags. For easy readability, always wrap programming code within posts in [code] (code blocks).
  • 2 Contributors
  • 1 Reply
  • 90 Views
  • 2 Weeks Discussion Span
  • Latest Post Latest Post by puppykillaz
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.