Question

我创建了一个包含多个文本框和组合框的用户窗体。我有一个列表框，其中包含5列。我需要的是当我按下保存按钮时，在文本框和组合框中输入的数据显示在列表框中，然后清除文本框和组合框以显示另一个条目。

对于单次进入它正在工作但是无法在新行中添加数据。

这是我的代码：

块引用

Me.ListBox1.ColumnCount = 5
Me.ListBox1.ColumnWidths = "60;35;70;50"
Me.ListBox1.AddItem Me.TextBox1.Text
Me.ListBox1.List(0, 1) = Me.ComboBox1.Value
Me.ListBox1.List(0, 2) = Me.ComboBox3.Value
Me.ListBox1.List(0, 3) = Me.TextBox5.Value
Me.ListBox1.List(0, 4) = Me.TextBox6.Value

附件是我的用户形象的图像，供您理解。

亲自回顾并建议如何克服这一点。

感谢。 SALMAN KHAN

Answer 1

可能类似于以下内容（假设您有一个文本框，名为TextBox1，而您的ListBox名为ListBox1，而您的保存按钮名为CommandButton1）：< / p>

Private Sub CommandButton1_Click()
    A = TextBox1.Text
    ListBox1.List = Array(A, "", "", " ", "")
    TextBox1.Text = ""
End Sub

根据您的需要修改并完成。

填写列表框，在文本框中输入数据

1 个答案: