Debug Assert Demo
Imports System
Imports System.Diagnostics
Public Class MainClass
Shared Sub Main()
Dim NumEmployees As Integer = 0
Debug.Assert(NumEmployees > 0, _
"NumEmployees must be greater than zero", _
"The program cannot generate timesheets if no employees are defined.")
End Sub
End Class
Related examples in the same category