thepinky
Goto Top

VB.NET wie aus Modul den Checkbox Zustand abfragen?

Hallo zusammen,

ich möchte aus einem Modul heraus einen Checkbox Zustand abfragen, um eine IF Verzweigung damit zu steuern.
Mit meinem bText funktioniert es. Allerdings bekomme ich den Zustand meiner Checkbox ChkCheck nicht mit eingebunden.

Wie kann ich diese mit einbinden?

       Dim bText As Boolean

        bText = IIf(InStr(sText, My.Settings.zText) > 0, True, False)

 
                    If bText And ChkCheck1.Checked = True Then

Content-ID: 51481666831

Url: https://administrator.de/forum/vb-net-wie-aus-modul-den-checkbox-zustand-abfragen-51481666831.html

Ausgedruckt am: 25.12.2024 um 19:12 Uhr

mbehrens
mbehrens 10.02.2024 um 22:04:04 Uhr
Goto Top
Zitat von @thepinky:

ich möchte aus einem Modul heraus einen Checkbox Zustand abfragen, um eine IF Verzweigung damit zu steuern.
Mit meinem bText funktioniert es. Allerdings bekomme ich den Zustand meiner Checkbox ChkCheck nicht mit eingebunden.

Wie kann ich diese mit einbinden?

Man könnte die CheckBox als Referenz übergegen.
11078840001
11078840001 11.02.2024 aktualisiert um 10:28:29 Uhr
Goto Top
thepinky
thepinky 11.02.2024 um 16:01:38 Uhr
Goto Top
@mbehrens

wenn ich ByRef ChkCheck1 As Boolean als parameter übergebe bricht es ab. Wie muss ich das umsetzen?

@11078840001

verstehe ich das richtig, dass ich ein weiteres Modul anlegen muss, worüber ich dann auf meine Form zugreifen kann und damit den entsprechend den Zustand meiner Checkbox abfragen?
11078840001
11078840001 11.02.2024 um 16:20:02 Uhr
Goto Top
Zitat von @thepinky:
@11078840001

verstehe ich das richtig, dass ich ein weiteres Modul anlegen muss, worüber ich dann auf meine Form zugreifen kann und damit den entsprechend den Zustand meiner Checkbox abfragen?
Nein.
mayho33
mayho33 11.02.2024 um 17:41:19 Uhr
Goto Top
Boahh.... VB.NET? Echt jetzt? Das ist doch schon mindestens seit 15 Jahren Out of Date! Aber eh deine Sache.

Schau mal hier:
https://de.wikibooks.org/wiki/Visual_Basic_.NET:_CheckBox
thepinky
thepinky 12.02.2024 aktualisiert um 08:27:22 Uhr
Goto Top
Der Code funktioniert, allerdings nicht in einem neuen Modul.
Habe jetzt beide Punkte zusammengebsastelt, aber es funktioniert so nicht......

Folgende Meldung erscheint über "ChkCheck1":
"Die Handles Klause erfordert eine WithEvents Variable"

Module Module1
    Private Input_Daten_bearbeiten As Hauptmenü
    Public ReadOnly Property MyForm() As Hauptmenü
        Get
            If IsNothing(Input_Daten_bearbeiten) Then Input_Daten_bearbeiten = New Hauptmenü
            Return Input_Daten_bearbeiten
        End Get
    End Property

    Private Sub ChkCheck1_CheckStateChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Check1.CheckStateChanged
        Select Case CType(sender, System.Windows.Forms.CheckBox).CheckState
            Case CheckState.Checked
                MsgBox("Checkbox wurde voll markiert.")  
            Case CheckState.Indeterminate
                MsgBox("Checkbox wurde zum Teil markiert.")  
            Case CheckState.Unchecked
                MsgBox("Checkbox ist derzeit nicht markiert.")  
        End Select
    End Sub
End Module
11078840001
11078840001 12.02.2024 aktualisiert um 13:22:53 Uhr
Goto Top
Ich seh das Problem ehrlich gesagt nicht face-smile

screenshot

screenshot
mayho33
mayho33 13.02.2024 um 12:46:12 Uhr
Goto Top
@thepinky:
Warum schreibst du eigentlich VB.NET, wenn du VBA meinst. VB ist in beiden zwar gleich, aber trotzdem ist die Anwendung ein klein wenig anders...
thepinky
thepinky 16.02.2024 um 17:47:03 Uhr
Goto Top
@mayho33
ich meine VB.NET.

@all

ich möchte einfach den Zustand der CheckBox in einer If Bedingung nutzen.
Das ganze findet allerdings nicht in Form1 statt.

Wenn ich jetzt den Namen der CheckBox verwenden möchte geht das nicht. Wie muss ich das ganze denn umsetzen?
11078840001
11078840001 16.02.2024 aktualisiert um 17:49:54 Uhr
Goto Top
Steht doch oben... Der Code steht im Modul.