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

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 51481666831

Url: https://administrator.de/contentid/51481666831

Ausgedruckt am: 25.11.2024 um 00:11 Uhr

10 Kommentare

Neuester Kommentar

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.

.NET C#/VB.NET How to access Form Controls from Module

@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?

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.

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

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

Ich seh das Problem ehrlich gesagt nicht

@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...

@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?