Trong VB 6.0, làm thế nào để độ rộng dropdown của combobox vừa với độ dài text của combobox?

Phần tử ComboBox của VB 6.0 có 2 thuộc tính tên là Width và Height để xác định kích thước hiển thị của nó. Bạn có thể thiết lập giá trị của 2 thuộc tính này tại thời điểm thiết kế, nhưng khi chương trình đang chạy, bạn chỉ có thể thay đổi giá trị thuộc tính Width, còn thuộc tính Height thì cố định không thay đổi được. Sau đây là đoạn code VB thay đổi động độ rộng của ComboBox tên là Combo1: ‘thiết lập đơn vị tính là Pixel Me.ScaleMode = vbPixels ‘thay đổi độ rộng ComboBox thành 300 pixel Combo1.Width = 300