Vad gör Debug.Assert?

/ Peter

Den gör en break i kåden om variablen är =false

exp från msdn
om blnAssert = false så brakar den om inte så fortsätter din kod som vanligt

<code>
Private blnAssert As Boolean
Private intNumber As Integer

Private Sub Command1_Click()
blnAssert = Not blnAssert
intNumber = IIf(intNumber <> 0, 0, 1)
Command1.Caption = intNumber
End Sub

Private Sub Command2_Click()
Debug.Assert blnAssert
End Sub

Private Sub Form_Load()
Command1.Caption = intNumber
Command2.Caption = "Assert Tester"
End Sub

</code>



//Tobbe