Go4Expert - using arrays to store and divide

i want to store the employees quarter sales and at the same time i want them to average with the companies quarter sales any ideas?

http://i38.tinypic.com/21m6e74.jpg

Code:

 Const intNUMBER_OF_EMPLOYEES As Integer = 10

    Const intMAX_EMPLOYEE As Integer = intNUMBER_OF_EMPLOYEES - 1





    ' class level variables

    Private Names(intMAX_EMPLOYEE) As String

    Private quarter1(9) As Single

    Private quarter2(9) As Single

    Private quarter3(9) As Single

    Private quarter4(9) As Single



    Private Sub txtQuarter1_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles txtQuarter1.Validating, txtQuarter4.Validating, txtQuarter3.Validating, txtQuarter2.Validating

        Dim input As String = CType(sender, TextBox).Text

        If IsNumeric(input) Then

            Dim number As Integer = CInt(input)

        Else

            MessageBox.Show("Please enter an integer.")

            e.Cancel = True

        End If



    End Sub



    



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



        Dim intCount As Integer



        For intCount = 0 To intMAX_EMPLOYEE

            Names(intCount) = TextBox1.Text