Notifikationer

Markér alle som læst Log ud

cypherbeast Nybegynder

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

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 14:52 #1

lige en lille tilføjelse
tal1 / (tal2*tal2) = tal3
tal3 = tal3/10000

Synes godt om

egede Nybegynder

20. maj 2002 - 14:55 #2

Function udregn(tal1,tal2)
tal3 = tal1/(tal2*tal2)
msgbox tal3
End Function

Er det sådan noget du mener?

Synes godt om

jelzin101 Praktikant

20. maj 2002 - 14:58 #3

tala = val(txt1.text)
talb = val(txt2.text)

button1_click
talc = tal1 / ( talb * talb)
talc = talc/10000
label1.caption = talc
end sub

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 14:58 #4

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 ?

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 15:01 #5

det giver "0" også hvis jeg bruger jelzin101's model

Synes godt om

jelzin101 Praktikant

20. maj 2002 - 15:04 #6

nu har du ikke defineret nogle kommatal som int vel ?

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 15:04 #7

og det skulle være * 10000
men det har jeg rettet.. kan det have noget at gøre med at det er kommatal?

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 15:05 #8

nej det tror jeg ikke.. det eneste som er i mit program er din kode

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 15:06 #9

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

Synes godt om

jelzin101 Praktikant

20. maj 2002 - 15:10 #10

Private Sub Command1_Click()
tala = Val(Text1.Text)
talb = Val(Text2.Text)
talc = tala / (talb * talb)
talc = talc * 10000
Label1.Caption = talc
End Sub

Synes godt om

cypherbeast Nybegynder

20. maj 2002 - 15:12 #11

tak tak jeg fandt også selv fejlen.. smid et svar

Synes godt om

jelzin101 Praktikant

20. maj 2002 - 15:13 #12

svar ;)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic	5	29/08/202512:28	04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic	0	05/08/202510:10	-
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic	0	16/05/202512:31	-
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic	1	22/04/202514:55	25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS