2

私はWinFormsVBNETプログラミングの初心者です。実行時にテキストボックスを作成する必要があります。

私はこれを実装する方法の例を検索エンジンで見つけました：

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

しかし、例のコードにはいくつか問題があります。

誰かが次のVBNETコード行を説明しますか？

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

3 に答える 3

3

まさにあなたが望むことを行う次の例を確認できます。

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-07T07:32:33.930 に答える
1

デザイナー ファイルで生成されたコードと同じコードを設計時に目的の場所にテキスト ボックスを追加します。コードをコピーして Command1_Click() の下に貼り付けます。

于 2012-06-07T08:02:39.987 に答える
1

VBコードです。

"Load Text1(ControlID)" Text1(controlID) をメモリにロードすることを意味し、Text1(controlID) はテキスト ボックス コントロールです。

于 2012-06-07T07:58:49.543 に答える