If...Then Abfrage

  • VB.NET

Es gibt 8 Antworten in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    If...Then Abfrage

    Hej Leute,
    ich habe eine Frage: Ich habe ein Programm geschrieben/schreibe es noch. Es soll folgendes tun: Wenn man auf einen Button klickt, soll eine Textbox und eine Picturebox erscheinen. Dies habe ich mit einer If-Abfrage gelöst:

    Code von Button1:

    VB.NET-Quellcode

    1. If PictureBox2.Visible = True & TextBox1.Visible = True Then
    2. TextBox2.Visible = True & PictureBox3.Visible = True
    3. If TextBox2.Visible = True & PictureBox3.Visible = True Then
    4. TextBox3.Visible = True & PictureBox4.Visible = True
    5. End If
    6. End If


    Mein Problem ist aber, dass dann dieser Fehler kommt:
    Ungültige Konvertierung von der Zeichenfloge TrueFalse in Typ Boolean.
    Informationen über das Aufrufen von JIT-Debuggen
    anstelle dieses Dialogfelds finden Sie am Ende dieser Meldung.

    ************** Ausnahmetext **************
    System.InvalidCastException: Ungültige Konvertierung von der Zeichenfolge TrueFalse in Typ Boolean. ---> System.FormatException: Die Eingabezeichenfolge hat das falsche Format.
    bei Microsoft.VisualBasic.CompilerServices.Conversions.ParseDouble(String Value, NumberFormatInfo NumberFormat)
    bei Microsoft.VisualBasic.CompilerServices.Conversions.ToBoolean(String Value)
    --- Ende der internen Ausnahmestapelüberwachung ---
    bei Microsoft.VisualBasic.CompilerServices.Conversions.ToBoolean(String Value)
    bei WindowsApplication4.Cluster_Classic.Button1_Click(Object sender, EventArgs e)
    bei System.Windows.Forms.Control.OnClick(EventArgs e)
    bei System.Windows.Forms.Button.OnClick(EventArgs e)
    bei System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent)
    bei System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
    bei System.Windows.Forms.Control.WndProc(Message& m)
    bei System.Windows.Forms.ButtonBase.WndProc(Message& m)
    bei System.Windows.Forms.Button.WndProc(Message& m)
    bei System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
    bei System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
    bei System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)


    ************** Geladene Assemblys **************
    mscorlib
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.18034 built by: FX45RTMGDR.
    CodeBase: file:///C:/Windows/Microsoft.NET/Framework/v4.0.30319/mscorlib.dll.
    ----------------------------------------
    WindowsApplication4
    Assembly-Version: 1.0.0.0.
    Win32-Version: 1.0.0.0.
    CodeBase: file:///C:/Users/Jossi/AppData/Local/Apps/2.0/J2ZAGC6K.DV8/DHYLL7Z8.KXW/wind..tion_9239bf0e969789cb_0001.0000_c1b5895e49c2194b/WindowsApplication4.exe.
    ----------------------------------------
    Microsoft.VisualBasic
    Assembly-Version: 10.0.0.0.
    Win32-Version: 11.0.50709.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Microsoft.VisualBasic/v4.0_10.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll.
    ----------------------------------------
    System
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.18034 built by: FX45RTMGDR.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System/v4.0_4.0.0.0__b77a5c561934e089/System.dll.
    ----------------------------------------
    System.Core
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Core/v4.0_4.0.0.0__b77a5c561934e089/System.Core.dll.
    ----------------------------------------
    System.Windows.Forms
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.18036 built by: FX45RTMGDR.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms/v4.0_4.0.0.0__b77a5c561934e089/System.Windows.Forms.dll.
    ----------------------------------------
    System.Drawing
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.18021 built by: FX45RTMGDR.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Drawing/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll.
    ----------------------------------------
    System.Runtime.Remoting
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Runtime.Remoting/v4.0_4.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll.
    ----------------------------------------
    Accessibility
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Accessibility/v4.0_4.0.0.0__b03f5f7f11d50a3a/Accessibility.dll.
    ----------------------------------------
    mscorlib.resources
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/mscorlib.resources/v4.0_4.0.0.0_de_b77a5c561934e089/mscorlib.resources.dll.
    ----------------------------------------
    Microsoft.VisualBasic.resources
    Assembly-Version: 10.0.0.0.
    Win32-Version: 11.0.50709.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Microsoft.VisualBasic.resources/v4.0_10.0.0.0_de_b03f5f7f11d50a3a/Microsoft.VisualBasic.resources.dll.
    ----------------------------------------
    System.Windows.Forms.resources
    Assembly-Version: 4.0.0.0.
    Win32-Version: 4.0.30319.17929 built by: FX45RTMREL.
    CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms.resources/v4.0_4.0.0.0_de_b77a5c561934e089/System.Windows.Forms.resources.dll.
    ----------------------------------------

    ************** JIT-Debuggen **************
    Um das JIT-Debuggen (Just-In-Time) zu aktivieren, muss in der
    Konfigurationsdatei der Anwendung oder des Computers
    (machine.config) der jitDebugging-Wert im Abschnitt system.windows.forms festgelegt werden.
    Die Anwendung muss mit aktiviertem Debuggen kompiliert werden.

    Zum Beispiel:

    <configuration>
    <system.windows.forms jitDebugging="true" />
    </configuration>

    Wenn das JIT-Debuggen aktiviert ist, werden alle nicht behandelten
    Ausnahmen an den JIT-Debugger gesendet, der auf dem
    Computer registriert ist, und nicht in diesem Dialogfeld behandelt.

    Wie kann ich das Problem beheben?

    MfG
    Heilwigkenner

    P.s.: Ich habe es in Visual Basic 2010 und 2012 ausprobiert

    Hey,

    willkommen im Forum!

    Bedingungen verknüpft man mit:

    VB.NET-Quellcode

    1. If PictureBox2.Visible AndAlso TextBox1.Visible Then
    3. End If


    Ggf. wenn es Dir an Grundlagen fehlt, zieh Dir das Buch mal rein:

    microsoft.com/germany/msdn/akt…005dasentwicklerbuch.mspx
    Die Unendlichkeit ist weit. Vor allem gegen Ende. ?(
    Manche Menschen sind gar nicht dumm. Sie haben nur Pech beim Denken. 8o

    Also, was ich erreichen möchte ist, dass eine Picturebox und eine Textbox angezeigt werden. Wenn diese aber schon angezeigt sind, also Visible = True, dann soll die nächste Picturebox und die nächste Textbox, also dann halt immer eine Zahl höher, angezeigt werden, und so weiter.

    Dann mach mal so was in der Art:

    VB.NET-Quellcode

    1. If Not (PictureBox1.Visible AndAlso TextBox1.Visible) Then
    2. PictureBox1.Visible = True
    3. TextBox1.Visible = True
    4. Else
    5. If Not (PictureBox2.Visible AndAlso TextBox2.Visible) Then
    6. PictureBox2.Visible = True
    7. TextBox2.Visible = True
    8. Else
    9. 'usw
    10. End If
    11. End If

    Und gib Deinem Programm schleunigst Option strict On, das bewahrt Dich vor ähnlichem Unsinn. :thumbsup:
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!