Try:
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sb As New StringBuilder
For intindex As Integer = 1 To 10
sb.AppendFormat("{0} ", intindex)
Next
TextBox1.Text = sb.ToString()
UpdatePanel1.Update()
End Sub