VB.Net/Development/Assert — различия между версиями

Материал из VB Эксперт
Перейти к: навигация, поиск
м (1 версия)
 
(нет различий)

Текущая версия на 12:45, 26 мая 2010

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