code to create multiple buttons in one button click event in runtime

dim btn as new button

btn.name = "ButtonName"
btn.text = "ButtonText"
btn.left = 100
btn.top  = 100

me.controls.add(btn)
addhandler btn.cli, addressof BtnEvent

...

public sub BtnEvent
end sub

you will need to change the section below to make sure your button is visible to the use each time else the next button to be drawn will overwrite the previous

btn.left = 100
btn.top  = 100

<code>you ca create buttons from textbox!
dim c as integer=10 ' this variable is for location in form, you can use for left,top
dim z as integer=100 ' this variable is for location in form, you can use for left,top
dim i as integer


for i=0 to textbox.text
dim btn as new button
btn.name="Button" & i
btn.text=i
btn.location= new drawing.point(c,z)
me.controls.add(btn)
z=z+100

next


</code>