VB.net代碼的一些困難

.net
vb.net

2012-06-07 68 views 2 likes

我是WinForms VB NET編程的初學者。我需要在運行時創建文本框。VB.net代碼的一些困難

我發現例如在搜索引擎如何實現這一點：

Private Sub Command1_Click() 
    Dim TextControl As TextBox 
    ControlID = ControlID + 1 
    Load Text1(ControlID) 
    Set TextControl = Text1(ControlID) 
    With TextControl 
     .Left = (Text1(ControlID - 1).Left + Text1(ControlID - 1).Width) + 10 
     .Top = 20 
     .Width = 100 
     .Height = 20 
     .Visible = True 
    End With 
End Sub

但我有例子的代碼中的一些困難。

有人會解釋下面的VB NET代碼行嗎？

Load Text1(ControlID) 
    Set TextControl = Text1(ControlID) 
    With TextControl 
    End With

來源

2012-06-07 Michael

嗯。你從哪裏得到那個的？據我所知，「Load」是VB6（及更早版本），並且在VB.NET中不存在。（「Set」的存在是另一個線索，這可能不是VB.NET代碼） –

這不是vb.net代碼 - 它是舊的visual basic代碼（我認爲VB 6）。雖然看起來相同，但vb.net並不向後兼容VB 6。您想在VB 6或VB.net中使用示例嗎？ – Ando

安藤，謝謝你我需要VB NET – Michael

回答

您可以檢查以下的例子，不正是你想要什麼：

Private Sub btnCreateTextbox_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCreateTextbox.Click 
    Dim textbox1 As New TextBox 
    textbox1.Name = "Textbox1" 
    textbox1.Size = New Size(170, 20) 
    textbox1.Location = New Point(167, 32) 
    GroupBox1.Controls.Add(textbox1) 
End Sub

外觀參考，很好的解釋：http://www.authorcode.com/create-dynamic-textbox-and-label-in-vb-net/

來源

2012-06-07 07:32:33 eyossi