Public Function Divide(ByVal x1 As Integer, ByVal x2 As Integer) As Integer
        Debug.Assert(x2 = 0, "Divisor darf nicht null sein")
        Return x1 \ x2
    End Function

 
    Public Function ReadFile(ByVal fileName As String) As String
        Try
            Return My.Computer.FileSystem.ReadAllText(fileName)
        Catch ex As Exception
            My.Application.Log.WriteEntry("Error in ReadFile: " + ex.ToString( _
              ), TraceEventType.Error)
            Throw
        End Try
    End Function