列表框选择变成文本框选择
列表框选择变成文本框选择
提问于 2019-11-13 03:12:43
我希望用户能够从列表框中单击一个值，并使选定的值成为文本框值。我从Textbox1.Value = selectedItems.Text得到一个编译错误：selecteditems的限定符无效。我希望选定的值也出现在文本框中。
Private Sub ListBox1_Click()
Dim selectedItems As String, i As Integer
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
selectedItems = selectedItems & ListBox1.List(i) & vbNewLine
End If
Next i
TextBox1.Value = selectedItems.Text
End Sub回答 1
Stack Overflow用户
回答已采纳
发布于 2019-11-13 03:16:58
selectedItems是一个字符串，并且字符串没有任何属性，如Text
TextBox1.Value = selectedItems将是你所需要的
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/58825213
复制相关文章
相似问题
腾讯云开发者
