Monthly Archives: July 2009

Average

  Dim a As Variant  a = Array(12, 1, 21, 2, 12, 3, 123, 124, 3456, 47, 5, 24, 323, 534, 45, 345, 13)   Dim P  As Double  Dim k  As Long: k = 0  Dim bo As Long: bo … Continue reading

Posted in Visual Basic 6 | Leave a comment