for i = 1 to ubound(x) step 1
if iMax > i then iMax = i
next
msgbox iMax
Fertig!
Schöne Grüsse
Daniel
Hallo Daniel
in der Schleife findet doch kein vergleich statt!iMax ist wie du geschrieben hast ubound(x) warum also die schleife?
Wenn du den grössten wert der variable x ermitteln willst, musst du die anweisung in der schleife auf
if x(i)>iMax then iMax=x(i)
abaendern.Desweiteren kannst du die Anweisung Step 1 weglassen, da die schleife immer um 1 erhöht wird, wenn nichts anderes angegeben ist
Lg Alex
Hallo,
habe ein kleines Problem in einem Programm.
Im Programm werden vers. Variablen vers. Werte zugewiesen.
Dim x(0 To 20) As Integer
For i = 1 To Text5.Text '(z.B Zahl 1- 20)
x(i)=…
next i
Nun habe ich ja x(i) variablen mit den entsprechenden Werten!
Nun möchte ich die vers. Variablen bzw.Werte vergleichen. Der
größte Wert soll ausgegeben werten!
Habe aber leider keine Ahnung wie ich das realisieren kann?
P.S. Vielleicht kennt jemand eine Lsg. wie ich x (1 to 20) mit
einer variablen deklarieren könnte, z.B x(i) – bringt leider
immer eine Fehlermeldung!