[Visual studio .NET]Kaj je tukaj narobe

Dim Result As String
Result = Utrip.Text / 1.95
Utrip2.Text = Result

Dim n As String
n = Utrip.Text
'is n less then 27
If n < 127 Then
TextBox1.Text = ("Zložna vožnja-Regeneracijski trening")
End If
If 127 > n < 137 Then
TextBox1.Text = ("Osnovni vzdržljivostni trening")
If 138 > n < 156 Then
TextBox1.Text = ("Trening aerobne kapacitete")
If 157 > n < 166 Then
TextBox1.Text = ("Trening lakatnega praga")
If 167 > n < 220 Then
TextBox1.Text = ("Maksimalni aerobni trening-Zviševanje maksimalnega VO2")
End If
End If
End If
End If
End Sub
Neglede na vrednost mi zmeraj Napiše v TextBoxu Maksimalni aerobni trening-Zviševanje maksimalnega VO2
Se vam že v naprej zahvaljujem
Lp Matevž

 If 127 > n < 137 

A se meni samo zdi in se tole prevede v

127 je vecje od n IN n je manjse od 137

Najbrz si hotel napisat

127 < n < 137

Zanima te, ce je n med 127 in 137, predvidevam... Pa tudi zgornji pogoj se mi zdi, da VB ne prebavi... Demoness poslusaj, tako bo delalo. :)

Poleg tega, je tako nestenje IF stavkov trapasto, uporabi kak case ali pa vsaj elseif.

Pri VB-ju je tak, da lahko matematično operacijo prirejanja ali primerjanja uporabiš samo za en razultat (spremenljivko)
Torej, če napišeš

a = b = 1 (v c,c++,javi to pomeni, da spremenljivkama a in b priredimo vrednost 1)

Ampak v VB:
1) Če b=1 potem bo a True (vrednost -1)
2) Če bo b različen od 1 bo a False (vrednost 0)

Pri primerjanju je pa isto, torej za 127 > n < 137 bo tako
Če je n < 137 potem kot izraz 127 > True (-1), kar je skupaj spet True
Če je n > 137 potem pa kot 127 > False (0), kar pa je spet vedno prav

Upam da se kaj pomagal...