ifabfrage
08.01.2008 21:39:00
holger
kann mirjemandhelfen folgenden code zu vereinfachen?
Lieben Dank
holger
If CheckBox1 = True Then
WUND.Label73 = "Nekrose ist vorhanden"
WUND.CheckBox1 = True
End If
If CheckBox1 = False Then
WUND.Label73 = ""
WUND.CheckBox1 = False
End If
If CheckBox2 = True Then
WUND.Label73 = "Keine Nekrose vorhanden"
WUND.CheckBox2 = True
End If
If CheckBox2 = False Then
WUND.Label72 = ""
WUND.CheckBox2 = False
End If