Truy cập vba: danh sách đa số additem cắt ngắn trên dấu phẩy

Question

Tôi có một combobox với hai colunms, nhưng đầu tiên là ẩn mà thêm giá trị vào một hộp danh sách theo cách tương tự. Tôi nhận thấy rằng hộp danh sách đang cắt xén chuỗi trong cột thứ hai.

Đây là mã của tôi, cho đến nay cmbPart là combobox và lstPart là hộp danh sách.

Me.lstPart.AddItem (CStr(Me.cmbPart.Value) & " ;" & CStr(Me.cmbPart.Column(1, Me.cmbPart.ListIndex))) 

Tôi nhận thấy rằng khi có dấu phẩy (,) trong chuỗi, nó sẽ ngừng hiển thị phần còn lại từ Me.cmbPart.Column(1, Me.cmbPart.ListIndex).

Làm cách nào để ngăn chặn hành vi?

Answer 1

Các chuỗi ký tự có dấu phẩy được thêm vào một hộp danh sách đa cực được liệt kê trong dấu nháy đơn.

Me.lstPart.AddItem (CStr(Me.cmbPart.Value) & " ;" & CStr("'" & Me.cmbPart.Column(1, Me.cmbPart.ListIndex)) & "'")