title image


Smiley Etwa so




Private Sub kon1_AfterUpdate()

Call txt1Füllen

End Sub



Private Sub kon2_AfterUpdate()

Call txt1Füllen

End Sub



Sub txt1Füllen()



Dim str1 As String

Dim str2 As String



str1 = IIf(Me!kon1, "kon1 ist angeklickt", "kon1 ist nicht angeklickt")

str2 = IIf(Me!kon2, "kon2 ist angeklickt", "kon2 ist nicht angeklickt")



Me!txt1 = str1 & " und " & str2



End Sub







Schönen Gruß,

Eric

Spotlight-Kicktipp gestartet!

Steig ein und trete mit Deinem Bundesliga-Tipp gegen die Besten an! :o)

http://www.kicktipp.de/spotlight/



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: