[VB6DAO]

كود :

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
    For a = 0 To 100
        tt.InnerHtml &= "number: " & a & "<br/>"
    Next
End Sub