Oppure

Loading
03/05/12 14:50
ptgrazio
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
aaa
03/05/12 17:01
Poggi Marco
Che cosa vuoi calcolare?
Cosa rappresentano le variabili A, B, C, D, F, G, H, perché le valorizzi sulla stessa textbox?
aaa
03/05/12 17:58
nessuno
Una richiesta del genere andrebbe chiusa come in

forum.html.it/forum/…

a partire dal fatto che non è VB6 ... e neanche lo sa.
Ultima modifica effettuata da nessuno 03/05/12 18:01
Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti ( uno dei padri fondatori del moderno Calcolo delle probabilità ) chiamava il gioco del Lotto Tassa sulla stupidità.