20. maj 2002 - 14:49
Der er
11 kommentarer og 1 løsning
simpelt matematik
det er meget længe siden jeg sidst har leget med vb, men nu har jeg brug for lidt hjælp. Jeg skal udføre denne meget simple funktion tal1 / (tal2*tal2) = tal3 jeg skal bruge hele koden.. den skal indeholde en knap som hedder udregn en label til at skrive tal3 ud i og to text bokse til tal1 og tal2
Annonceindlæg fra Lenovo
lige en lille tilføjelse tal1 / (tal2*tal2) = tal3 tal3 = tal3/10000
Function udregn(tal1,tal2) tal3 = tal1/(tal2*tal2) msgbox tal3 End Function Er det sådan noget du mener?
tala = val(txt1.text) talb = val(txt2.text) button1_click talc = tal1 / ( talb * talb) talc = talc/10000 label1.caption = talc end sub
ja men jeg skal bruge hele koden som skal ind i command1_Click f.eks. tal3 = Text1.Text / (Text2.Text * Text2.Text) MsgBox tal3 men det her giver "0" altid ?
det giver "0" også hvis jeg bruger jelzin101's model
nu har du ikke defineret nogle kommatal som int vel ?
og det skulle være * 10000 men det har jeg rettet.. kan det have noget at gøre med at det er kommatal?
nej det tror jeg ikke.. det eneste som er i mit program er din kode
det ser sådan her ud nu Private Sub Command1_Click() tala = Val(Text1.Text) talb = Val(Text2.Text) talc = tal1 / (talb * talb) talc = talc * 10000 Label1.Caption = talc End Sub
Private Sub Command1_Click() tala = Val(Text1.Text) talb = Val(Text2.Text) talc = tala / (talb * talb) talc = talc * 10000 Label1.Caption = talc End Sub
tak tak jeg fandt også selv fejlen.. smid et svar
Kurser inden for grundlæggende programmering