Archiv verlassen und diese Seite im Standarddesign anzeigen : Builder - Stub
Ich hab einen Builder und eine Stub.
Wie frag ich in der Stub ab ob im Builder eine checkbox gechecked ist, sodass ich dann den passenden code in der stub ausführen kann ?
In dem du einfach den Status der Checkbox.checked Methode mit an die Stub schreibst. So als würdest du einen weiteren String übergeben. Wie du das Realisierst solltest du ja wissen. In der Stub musst du lediglich die Werte aufteilen (wie gehabt) und hier kannst du dann den Status abfragen.
1 = True (Checkbox aktiviert)
0 = False (Checkbox deaktiviert)MfG, Sawyer
Ich habs immer so gemacht.
Builder:
If chkMelt.Value = 1 Then
Dim MeltMe As String
MeltMe = "TRUE"
End If
Dann MeltMe an die Settings anhängen.
Stub:
If StubData(4) = "TRUE" Then
Call MeltMe
End If
Greetz
Wenn wir hier schon dabei sind, kurz ne andere Frage:
Also: Ich möchte einen text ganz funktionsuntüchtig machen, wenn eine Checkbox gecheckt wird, was muss ich dazu machen genau?
D.h. Ich klicke Checkbox1. Dan deaktiviwert wird eine Public funktion oder der coder (text)
Gruß
Slawa
Kein plan was genau du meinst. Soweit ich verstanden habe suchst du in etwa
sowas:
If Check1.Value = 1 Then
cmd1.Enabled = False
Else
cmd1.Enabled = True
End If
oder nicht ?
Greetz
Ja Genau das mit CMD stimmt schon, das geht jetzt bei mir auch
Danke
Da wir ja jetzt schon dabei sind, habe ich gleich eine Fake MSG in den Builder eingebaut, was nicht geht. Folgendes habe ich gemacht, wenn die checkvbox aktiviert ist, kommt soll eine MSG kommen bei der stub.
Builder:
If Checkbox4.Checked = "True" Then
'True in String soll ja in die stub rüberwandern
Dim Fakemsg As String
Fakemsg = "True"
End If
Stub:
If BuilderDaten(4) = "True" Then
Msgbox("Fakemsg hier")
End if
es kommt immer wieder kein MSG, weil ich nicht geau weis, was nach dem If in der stub kommt If .... was aber gehöört hier rein anstatt builderdaten?
Wie muss es richtig gehen?
Danke
Gruß
Slawa
Powered by vBulletin® Copyright ©2024 Adduco Digital e.K. und vBulletin Solutions, Inc. Alle Rechte vorbehalten.