Hallo Dirk,
ich weiss nicht so recht was Du vorhast ??
Kannst evtl. nochmal genauer beschreiben?
Ein Beispiel mit select case & Optionsfeldern häng ich ran,
ist an sich acadunabhängig, 'casen' via spinbutton.
lg Nancy
--
Code:
Private Sub SpinButton1_Change()
Select Case SpinButton1
Case Is = 10
opt1 = True
Label1.Font.Size = opt1.Caption
Case Is = 20
opt2 = True
Label1.Font.Size = opt2.Caption
Case Is = 30
opt3 = True
Label1.Font.Size = opt3.Caption
Case Is = 40
opt4 = True
Label1.Font.Size = opt4.Caption
Case Is = 50
opt5 = True
Label1.Font.Size = opt5.Caption
End Select
End Sub
[Diese Nachricht wurde von startrek am 31. Dez. 2003 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP