VB Code:
  1. If (trutantul = 4) then
  2. 'bali bali
  3. End Sub]