[VB6] Calcolo della distribuzione normale

[gio_gio88]

Salve, devo creare un programmino che mi calcoli la distribuzione normale...
La formula è in allegato.. quello che non riesco a fare è proprio il calcolo, sbaglio qualcosa nel codice.. Ecco il listato:

Private Sub Command1_Click()
Dim ValMedio As Integer, Varianza As Integer, X As Integer
Dim Elevato As Long
ValMedio = Text1.Text
Varianza = Text2.Text
X = Text3.Text
Elevato = -(1 / 2) * (((X - ValMedio) / Varianza) ^ 2)
Label1.Caption = (1 / (ValMedio * (Sqr(2 * 3.14159)))) * (2.718281 ^ Elevato)
End Sub


Grazie!!