Mandag 3/9: Turdilemma

"Skal vi på tur" var eksempel, med beskrivelse (ord), analyse (flytskjema), design (UI) og kode (VB) - se kap. 2. Det ble et beslutningsstøtteverktøy med overtidskode:

  Private Sub btnBeregn_Click () Handles btnBeregn.Click
    v = finnutVaeret()
    krav = finnBrukersKrav()
    If ( (v.temp < krav.temp ) And
         (v.vind < krav.vind ) And
         (v.sol = krav.sol) And
         (v.nedbor = krav.nedbor) ) Then
      lblSvar.Text = "Ja!"
    Else
      lblSvar.Text = "Nei!"
    End If
  End Sub

Her er krav til sol og nedbør boolsk i seg selv, mens krav til temperatur og vind er maksimumskrav. "And" angir at alt må stemme (de fire delkrav evaluert til True) for at turen skal anbefales!