sommen en verschil

Status
Niet open voor verdere reacties.
K

kevin1111

Gebruiker
Lid geworden
21 apr 2012
Berichten
10
Een vraagje

Graag zou ik sommen en verschil tot 10 door elkaar zetten maar ik weet niet hoe dat moet
ik kan alleen maar een form met verschil en een form optellen
 
dit is mijn code

Dim objLukraak As New Random
Dim arrsommenenverschil As String
Dim intteller As Integer
For intteller = 1 To 10
Dim intGetal1 As Integer = objLukraak.Next(0, 11)
Dim intGetal2 As Integer = objLukraak.Next(0, 0 + intGetal1)
If arrsommenenverschil = 0 Then
lblgetal.Text &= intGetal1 & " - " & intGetal2 & " = " & vbNewLine & vbNewLine & vbNewLine
Else
lblgetal.Text &= intGetal1 & " + " & intGetal2 & " = " & vbNewLine & vbNewLine & vbNewLine
End If
Next
End Sub
 
For intteller = 1 To Rnd(10)

Ik weet niet of dat in de tegenwoordige versies van VB nog geldt. 20 Jaar geleden was dat zo. Anders kan je op je huidige versie van VB googlen op random functie.
 
dat lukt maar mijn code klopt nog niet
oftewel is het allemaal +
oftewel is het allemaal - maar dit zou door elkaar moeten
 
Kan je keer mijn code omvormen aub
ik snap niet hoe het moet ik heb naar het ander voorbeeld gekeken en dat snap ik niet
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan