Ver Mensaje Individual
  #2 (permalink)  
Antiguo 02/09/2017, 20:34
pcid
Usuario no validado
 
Fecha de Ingreso: abril-2008
Mensajes: 50
Antigüedad: 16 años
Puntos: 16
Respuesta: Ubicación de controles

Una idea...

Saludos,

PCID.

Código vb:
Ver original
  1. Public Class Form1
  2.  
  3.     Private nTextBoxes As Integer = 0
  4.  
  5.     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  6.         addTextBox("txt1")
  7.         addTextBox("txt2")
  8.         addTextBox("txt3")
  9.         addTextBox("txt4")
  10.     End Sub
  11.  
  12.     Private Sub addTextBox(ByVal name As String)
  13.         Dim txt As TextBox = New TextBox()
  14.         txt.Parent = Me
  15.         txt.Name = name
  16.         txt.Left = 10
  17.         txt.Top = (txt.Height * nTextBoxes) + (10 * (nTextBoxes + 1))
  18.         nTextBoxes = nTextBoxes + 1
  19.     End Sub
  20. End Class