Beginner-Variabelen

[sdehaas]

Hallo, ik ben nog een beginner in programeren en probeer een puntenlijst te maken in een programma.
Ik ben eerst aan het proberen te zeggen dat.

Tekstvakje1 a is dat tekstvakje 2 b is en dat teksvakje 3 c is.
in c moet dan komen te staan (a+b)/b
a=cijfer
b=gewicht van toets
ik heb dit:

Public Class gemiddelde

Private Sub punt_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim punt As Double

End Sub

Private Sub gewicht_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
Dim gewicht As Integer
End Sub

Private Sub gemiddelde_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged
Dim gemiddelde As Double

End Sub

Public Function GetWeight(ByVal punt, ByVal gewicht) As Double
punt = "a"
gewicht = "b"



End Function
End Class

ik kom nu niet verder omdat ik niet weet hoe ik a en b moet declareren. en dat ik moet zeggen dat in gemiddelde het getal moet komen van de uitkomst van de formule (a*b)/b.

Kan iemand me helpen.

gr Sander

 

[famlam]

Public Class gemiddelde

'---op het moment dat de tekst van textbox1 of textbox2 veranderd:
Private Sub punt_berekenen(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged, TextBox2.TextChanged

'---indien punt een nummer is: opslaan in variabele 'punt'
dim punt as double = 1
if isnumeric(textbox1.text) then punt = textbox1.text

'---indien de weging een nummer is: opslaan in variabele 'gewicht'
dim gewicht as integer = 1
if isnumeric(textbox2.text) then gewicht = textbox2.text

'---het gemiddelde in de 3e textbox plaatsen
textbox3.text = ((punt + gewicht) / gewicht).tostring

End Sub
End Class

Ik hoop dat dit het een beetje duidelijk maakt!

variabelen kun je dus declareren door
-Dim variabelenaam as string = "hello world"
en (als de variabele al bestaat):
variabelenaam2 = 33