[RESOLVED] Mean And Standard Deviation

[rosleenXOXO]

I seem to figure out why my code is not for finding mean and st dev because the code i wrote for finding the sum is working and mean = sum/N so im confused i think i might have the wrong formula/code for standard deviation tho..i just found it online.....

 
Private Sub btnDisplayMean_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplayMean.Click

        Dim Mean As Integer
        Dim Sum As Integer
        For J = 0 To MyArray.Count - 1
            Sum = Sum + MyArray(J)
            Mean = CInt(Sum / (MyArray.Count - 1))
        Next
        txtDisplayNumbers.Text = CStr(Mean)
    End Sub


    Private Sub btnDisplaySD_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplaySD.Click
        Dim Mean As Decimal
        Dim Temp As Double
        Dim Temp2 As Double
        Dim StDev As Double

        For J = 0 To MyArray.Count - 1

            Temp2 = MyArray(J) - Mean
            Temp = Temp + Temp2 * Temp2
            StDev = Math.Sqrt(Temp / MyArray.Count - 1)
        Next
        txtDisplayNumbers.Text = CStr(StDev)
    End Sub