Problema semplice ma difficile per un newbie[Urgente per lavoro]

[Prgrazio]

Ciao ragazzi ho deciso di rivolgermi a voi esperti, cosa sbaglio in questo programma visto che il calcolo funziona senza errori ma risulta diverso se fatto con la calcolatrice?Ho provato anche a usare Double e String

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim Densita As Decimal
Dim Risultato As Decimal
Dim Eta As Integer
Dim Peso As Integer
Eta = CInt(TextBox1.Text)
Peso = CInt(TextBox2.Text)
Dim M As Integer = 0
Dim A, B, C, D, F, G, H As Integer
A = CInt(TextBox4.Text)
B = CInt(TextBox4.Text)
C = CInt(TextBox4.Text)
D = CInt(TextBox4.Text)
F = CInt(TextBox4.Text)
G = CInt(TextBox4.Text)
H = CInt(TextBox4.Text)
M = (A + B + C + D + F + G + H)
If (RadioButton1.Checked = True) Then
Densita = 1.112 - (0.00043499 * M) + (0.00000055 * (M * M)) - (0.00028826 * Eta)
Risultato = (495 / Densita) - 450
TextBox12.Text = Risultato
TextBox11.Text = (Risultato * Peso) / 100

Non so più dove sbattere la testa

[alka]

Leggi il Regolamento di questa sezione.

Ci sono delle norme specifiche per l'apertura delle discussioni: il linguaggio va indicato nel titolo, inoltre nessuna discussione è urgente; si presuppone inoltre che chi propone la domanda sappia muoversi un minimo con il linguaggio e l'attività di programmazione; infine, non si fornisce o interpreta codice a richiesta: se hai un problema specifico, descrivi gli errori o i comportamenti anomali che ottieni, aprendo una discussione che segua le indicazioni fornite, e ti sarà dato il dovuto aiuto nei modi previsti dal forum.