Cita:
Iniciado por David el Grande
Creo que era algo así como esto para crear botones:
Código:
Dim Boton As New CommandButton
Ahora, para programarle eventos ya es otra historia.
Que tal David.
CommandButton creo que es una palabra reservada de VB 6, en el VB2005 no me funciona. He leido por ahi que se debe crear un vector para los botones que deseo agregar, incluso crear un arbol que si me suena logico para lo que necesito hacer.
Investigue este codigo para crear botones, pero parece que es de VB 6, yo nunca lo use por lo que los comandos al VB 2005 no los conozco.
Código:
Dim LS(6) As PowerPacks.LineShape
Dim SC As New PowerPacks.ShapeContainer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
For I As Integer = 0 To 6
LS(I) = New PowerPacks.LineShape
With LS(I)
.X1 = 10 : .Y1 = 10 * I
.X2 = 60 : .Y2 = .Y1
SC.Shapes.Add(LS(I))
AddHandler .Click, AddressOf LS_click
End With
Next
Me.Controls.Add(SC)
End Sub
Private Sub LS_click(ByVal sender As System.Object, ByVal e As System.EventArgs)
DirectCast(sender, PowerPacks.LineShape).Focus()
End Sub
Todo lo que esta marcado en rojo es lo que el VB2005 no reconoce, les agradezco su colaboracion, gracias!