我正在尝试使用CommandButton根据ListBox中的条目填充Userform中的TextBox，但无法找到使其工作的方法。
下面的代码用于填充第一个TextBox（TextBox2），但下面的所有内容都是空白的。你会注意到我添加了＆amp; ＆＃34;＆＃34;在TextBox3-11之后 - 那是因为我收到了＆＃34;无效使用Null＆＃34;错误。
如何让ListBox中的每个项目填充在相应的TextBox中？
Private Sub CommandButton5_Click()
Dim i As Long
i = ListBox1.ListIndex
With Me.ListBox1
TextBox2.Text = .List(i, 0)
TextBox3.Text = .List(i, 1) & ""
TextBox4.Text = .List(i, 2) & ""
TextBox5.Text = .List(i, 3) & ""
TextBox6.Text = .List(i, 4) & ""
TextBox7.Text = .List(i, 5) & ""
TextBox8.Text = .List(i, 6) & ""
TextBox9.Text = .List(i, 7) & ""
TextBox10.Text = .List(i, 8) & ""
TextBox11.Text = .List(i, 9) & ""
End With
End Sub