Also er unterscheidet jetzt schonmal zwischen Zahl und "wort" aber er sagt mir zur Zahl keine einzelheiten von wegen größer kleiner als oder gleich 0

Also oben müsstest du dann nicht wort sondern Zahl einlesen. In der Schleife entscheidest du, ob 0 <0 >0 verlangst gleichzeitig aber noch mal eine Eingabe, wozu die?

  ElseIf Zahl < 0 Then
                Zahl = Console.ReadLine()
                Console.WriteLine("Die Zahl ist kleiner als Null")
                Console.ReadLine()

Mmmh! joah, ist überflüßig, stimmt

er sagt mir jetzt zu jeder zahl, dass sie gleich null sei...

oO(ist ja irgendwie doof)

und als bonus noch diese mitteilung:

Eine Ausnahme (erste Chance) des Typs "System.InvalidCastException" ist in Microsoft.VisualBasic.dll aufgetreten.     
 ??  

Zeig noch mal wie es jetzt aussieht

*husthust*





Module Module1

    Sub Main()
        Console.WriteLine("Das Programm entscheidet, ob eine Zahl positiv, negativ oder gleich Null ist. ")
        Dim wort As String
        Dim Zahl As Double

        wort = Console.ReadLine()
        If IsNumeric(wort) = True Then
            Console.WriteLine(" Eingabe war eine Zahl! ")
            If Zahl = 0 Then
                Console.WriteLine("Die Zahl ist gleich 0")
                Console.ReadLine()

            ElseIf Zahl <= 0 Then
                Console.WriteLine("Die Zahl ist kleiner als Null")
                Console.ReadLine()

            ElseIf Zahl >= 0 Then
                Console.WriteLine("Die Zahl ist größer als Null")
                Console.ReadLine()

            End If
        Else
            Console.WriteLine(" Eingabe war ein Wort! ")
        End If
       

    End Sub

End Module

Also kein Wunder, denn Zahl wird ja nun nicht mehr erfasst. Nach der Prüfung ob wort ein Wort oder Zahl ist, kann eine Zeile eingefügt werden (wenn Zahl)

Zahl = wort

z.B. über Console.WriteLine(" Eingabe war eine Zahl! ")

sorry, blicke aber nicht mehr wirklich durch, hab die übersicht verloren
Wo genau hab ich den Fehler platziert?

Durch das Ändern auf Wort, wird zahl nicht vorbesetzt und ist 0. Schau dir die (simple) Änderung an.

Module Module1

    Sub Main()
        Console.WriteLine("Das Programm entscheidet, ob eine Zahl positiv, negativ oder gleich Null ist. ")
        Dim wort As String
        Dim Zahl As Double

        wort = Console.ReadLine()
        If IsNumeric(wort) = True Then
            Console.WriteLine(" Eingabe war eine Zahl! ")
            Zahl = wort
            If Zahl = 0 Then
                Console.WriteLine("Die Zahl ist gleich 0")
                Console.ReadLine()

            ElseIf Zahl <= 0 Then
                Console.WriteLine("Die Zahl ist kleiner als Null")
                Console.ReadLine()

            ElseIf Zahl >= 0 Then
                Console.WriteLine("Die Zahl ist größer als Null")
                Console.ReadLine()

            End If
        Else
            Console.WriteLine(" Eingabe war ein Wort! ")
        End If


    End Sub

*gegendiestirnklatsch* mmmh, joah, die erklärung leuchtet mir ein... und funktioniert reibungslos

 

Wie gibst du es ein, -1 z.B. funktioniert 

japp, funktioniert perfekt, mein fehler, sorry

so nebenbei, muss ich mir wegen dieser Meldung eigentlich gedanken machen?:

Eine Ausnahme (erste Chance) des Typs "System.InvalidCastException" ist in Microsoft.VisualBasic.dll aufgetreten.

Muss bei dir liegen, mach mal ein neues Projekt evtl. einfach nur die Vorgabe und starte, wenn das da auch kommt, liegt irgendein Fehler der Installation vor.

Nachkommastellen übrigens mit Punkt 1.5 oder -1.37

Vielen Dank für die Hilfe.
Werde mich dann mal wieder alleine hinsetzten und noch ein wenig an vb herumhantieren.
Danke nochmal, hätte ich alleine nicht gebacken bekommen!

*wiederalleineherumprobier*