有请changechange版主，问两个小问题。

[victorycyz]

1. 组合框的下拉列表能运行时动态改变列表宽度吗？最好是能用鼠标拖动改变的。

2. Access中能写类模块吗？



谢谢回复。

[changechange]

1、可以
2、可以

[changechange]

在列表框旁边随便加一个LABEL控件，在他上面编程就可以了
或者加粗列表框的宽度也可以，不过那样难看
下面写个最简单的代码，你注意，3个参数都可以用的

Private Sub Box3_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
combo1.width=x
End If
End Sub