[VB]

[Verwijderd]

Sorry voor de topic title! Drukte perongelijk tevroeg!
Dubbelpost: het bericht is identiek aan je laatst geplaatste bericht.
(interne identificatie: topic::new_message::double_post)


Hallo ik ben even met Visual Basic bezig en ja ik ben een N00b als het gaat om programmeren.

Hier is het scriptje:

Dim t1 As Integer
Dim t2 As Integer
Dim t3 As Integer
Dim t4 As Integer
Dim t5 As Integer
Dim t6 As Integer
Dim t7 As Integer
Dim t8 As Integer
Dim t9 As Integer
Dim t10 As Integer
Dim t11 As Integer
Dim t12 As Integer
Dim deel As Integer
Dim gemiddeld
Dim geslaagd As Integer

t1 = 0
t2 = 0
t3 = 0
t4 = 0
t5 = 0
t6 = 0
t7 = 0
t8 = 0
t9 = 0
t10 = 0
t11 = 0
t12 = 0

t1 = txt1.Text
If txt1.Text > 0 Then
deel = deel + 1
End If
t2 = txt2.Text
If txt2.Text > 0 Then
deel = deel + 1
End If

t3 = txt3.Text
If txt3.Text > 0 Then
deel = deel + 1
End If
t4 = txt4.Text
If txt4.Text > 0 Then
deel = deel + 1
End If
t5 = txt5.Text
If txt5.Text > 0 Then
deel = deel + 1
End If
t6 = txt6.Text
If txt6.Text > 0 Then
deel = deel + 1
End If
t7 = txt7.Text
If txt7.Text > 0 Then
deel = deel + 1
End If
t8 = txt8.Text
If txt8.Text > 0 Then
deel = deel + 1
End If
t9 = txt9.Text
If txt9.Text > 0 Then
deel = deel + 1
End If
t10 = txt10.Text
If txt10.Text > 0 Then
deel = deel + 1
End If
t11 = txt11.Text
If txt11.Text > 0 Then
deel = deel + 1
End If
t12 = txt12.Text
If txt12.Text > 0 Then
deel = deel + 1
End If


gemiddeld = (t1 + t2 + t3 + t4 + t5 + t6 + t7 + t8 + t9 + t10 + t11 + t12) / deel
l1.Text = gemiddeld

If gemiddeld > 5 Then
l2.Text = 1
Else : l2.Text = 2

End If

Nu wil ik

l2.Text = 1
Else : l2.Text = 2

veranderen in

l2.Text = Voldoende
Else : l2.Text = Onvoldoende

Hoe kan ik dit doen?

Ja ben al een tijdje aan het zoeken

[ Voor 6% gewijzigd door Verwijderd op 02-02-2005 20:56 ]

[gorgi_19]

Visual Basic .NET:

If gemiddeld > 5 Then
l2.Text = "Melp"
Else 
 l2.Text = "Spef"
End if

Neem ook P&W FAQ - De "quickstart" even door, want een topic als dit, waarvan het 95% irrelevant is voor je probleem, schrikt alleen maar mensen af. Verder is Programming & Webscripting niet bedoeld voor: "Wie lost dit voor mij op, hier is een lap code"

[ Voor 59% gewijzigd door gorgi_19 op 02-02-2005 21:01 ]