Hallo,
ich bin mir bei dieser Aufgabe nicht sicher, ob ich alle Fehler gefunden habe.
Den hier soll man ja im Code alle Kompilierfehler und alle logischen Fehler finden.
Dazu ist eine Tabelle unter dem Code abgebildet mit 4 Zeilen und den folgenden Hinweistext:
"Die Anzahl der Zeilen in der Tabelle ist nicht kleiner als die Anzahl der Fehler im Code"
Hier ist der Code:
Imports System.Windows.Forms
Module abc
Sub Main()
Dim n1, n2 As Integer
Dim sText As New String = "Geben Sie die untere Grenze ein" 'Fehler1
Dim sTitel As New String("Summe einer Zahlenreihe")
n1 = Convert.ToInt32(InputBox(sText, sTitel, 1))
sText = sText.Replace("unt", "ob")
n2 = Convert.ToInt32(InputBox(sText, sTitel, 100))
Dim i, nSumme As Integer
For i = n1 To n2 - 1 'Fehler2
nSumme += i
Next
sText = String.Format("Die Summe der Zahlen von" & vbCrLf _
& "{0} bis {1} beträgt:" & vbCrLf _
& "{2}", n1, n2, nSumme)
MessageBox.Show(sTitel, sText, MessageBoxButtons.OK, MessageBoxIcon.Information) 'Fehler3
End Sub
End Module
Die Fehler habe ich gefunden
Fehler1 Kompilierfehler: Schlüsselwort New entfernen oder Text in Klammern setzen
Fehler2 logischer Fehler: -1 entfernen
Fehler3 logischer Fehler: sTitel mit sText tauschen
Sind das eurer Meinung nach alle Fehler?
Gruß
Paddy
