如何改变datacombo的下拉宽度？

Question

看到网上有改变combo下拉框的宽度，试了一下，好像不适用于datacombo，不知道如何改变datacombo的下拉宽度？最好能根据绑定的内容改变宽度？

Answer 1

如果你找到的也是下面的，那就没办法了，应该可以啊
http://vbnet.mvps.org/code/comboapi/combowidthadv.htm

Answer 2

subclass 
或者自定义控件

Answer 3

Public Sub ComboBoxSetHeight(CBox As Object, Value As Long)
'combobox高度
On Error Resume Next
If TypeName(CBox) <> "ComboBox" Then MsgBox "该函数只对ComboBox控件进行操作!!", vbCritical, "Faib Studio": Exit Sub
Call SendMessage(CBox.hWnd, &H153, -1&, ByVal Value)
End Sub