Programujeme ve Visual Basic .NET - 7.díl - logické řídící příkazy

V tomto module je chybka:
Module modMain
  Sub Main
    Dim test = (73 < "9") - 1
    System.Console.Write  Line(test)
    If test Then
       System.Console.Write  Line("pravda")
       If test > 0 Then
    System.Console.Write  Line("kladne")
          Else
    System.Console.Write  Line("zaporne")
      End If
     ElseIf test = False
       System.Console.Write  Line("nepravda")
    End If
  End Sub
End Module
Spravne ma byt System.Console.WriteLine ako je uvedene v predoslom priklade.

Nerozumim presne te podmince (73 < "9") - 1 u promenne test, jestli by mohl syntaxi zapisu nejak objasnit-co vlastne dana podminka rika... Diky
Jinak zatim se mi serial libi, delam ho se zpozdenim, takze mam k dispozici dost dilu a muzu tak postupovat podle casu a chuti Dulezitou casti serialu je pro me i diskuze /ostatne jako vsude/ protoze tam se clovek dozvi jak sirsi spojitosti,tak i dul.dodatky.
Jen tak dal, doufam ze Pan Buh i redakce Zive da
Tom V.

Zdaleka ne vždy je použití If-Then vůbec nutné. Jak zapsat lépe a radostněji tuto vypečenou validační funkci ?
(viz http://blog.vyvojar.cz/radim/archive/2004/07/07/1394.aspx)
    Private Function ValidateAllForInsert() As Boolean
        If CheckNulls() Then
          ;   If ValidRow() Then
          ;       If ValidateDates() Then
          ;           If ValidPeriod() Then
          ;                If CheckMonthRepitition() Then
          ;                    If ValidPatKlasse() Then
          ;                     & nbsp;  If ValidateBudgetValues() Then
          ;                     & nbsp;      If CheckRepetition() Then
          ;                     & nbsp;          If ValidateYears() Then
          ;                     & nbsp;         &n bsp;    ValidateAllForInsert = True
          ;                     & nbsp;          End If
         & nbsp;         &n bsp;         &nb sp;      End If
         & nbsp;         &n bsp;         &nb sp;  End If
         & nbsp;         &n bsp;        End If
         & nbsp;         &n bsp;    End If
         & nbsp;          End If
         & nbsp;      End If
         & nbsp;  End If
        Else
          ;   ValidateAllForInsert = False
        &nbs p;   Exit Function
        End If
    End Function

Jedno z možných řešení je zde http://vbnet.aspweb.cz/vbnet/If-Then-Else.htm

dobre je rozsirit konsturkci if/elseif/else o goto

Myslím si, že už tato připomínka byla v jiných dílech :o) A po sléze i diskuze...

dobre je rozsirit konsturkci if/elseif/else o goto

Existují pravidla, kdy je výhodnější použít rozhodovací konstrukci If-Then-Else, kdy přetěžování metod, multicast delegáty, DP Strategie, násobný dispatch, nebo složitější behaviorální DP jako visitor apod., ale žádné z nich nelze uplatnit obecně.
 
Konstrukce  If-Then-Else je nejjednodušší a je implementovaná ve všech jazycích od úrovně assembleru  - proto se zde vysvětluje jako první. Nebojte, postupně se ke všemu dostaneme, pokud pámbu a redakce Živě dá.....