loops please help me

please help me with this , is a nested loop
program that show the following outcome in a listbox 1, 12 ,123, 1234 , use a textbox to get a number from the user (number of loops)
thanks
help me please

i have this
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i, w, j As Integer
w = CInt(TextBox1.Text)
For i = 1 To w
For j = 1 To i
Next
Next
ListBox1.Items.Add(j)
End Sub
End Class

offcourse don't work