在運行時在TAB鍵上添加控件按

Question

如何在運行時添加控件 - 自動將文本框和其他控件添加到按Tab鍵控件所需的編號？

實施例I必須添加文本框3 - L-NAME，lfname，拉德

然後在第三文本自動壓片3textbox創建它們的下方後？

Answer 1

如果你想添加一些控制例如TextBox使用KeyDown事件您Form：

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) 
Dim c As Integer = 0 
If e.KeyCode = Keys.Tab Then 
    Dim txtRun As New TextBox() 
    txtRun.Name = "txtDynamic" & System.Math.Max(System.Threading.Interlocked.Increment(c),c - 1) 
    'name 
    txtRun.Location = New System.Drawing.Point(20, 18 + (20 * c)) 
    ' Location of new control 
    txtRun.Size = New System.Drawing.Size(200, 25) 
    ' size 
    Me.Controls.Add(txtRun) 
End If 
End Sub 

萬一，我還沒有回答你的問題，請提供更多信息，以便我可以回答更準確。