¿Dónde presentas problemas?
Por cada fila recuperada creas una instancia de la clase Button, por ejemplo:
'Crear una nueva instancia de la clase Button
Dim btn As New Button
'Configurar valor a propiedades
btn.Text = "Colocar valor de la consulta"
btn.Location = New Point(10, 10) 'Colocar valores relativos
'Agregar un controlador de evento
AddHandler btn.Click, AddressOf Button_Click
'Agregar el control a la colección de controles
Me.Controls.Add(btn)
Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
