>>242
もしかして、Form_Resize で、そのリストボックスの高さとか幅を、
フォームサイズに合わせてない？
高さや幅の値が＜０になってエラーになってるだけと思うが。

ちゃんとチェックしてマイナスにしないようにするのが良いが、
手抜きとしてはこんなんもアリ(笑

Private Sub Form_Resize

　On Error Resume Next　'//手抜き

　List1.Height = Me.ScaleHeight - List1.Top

End Sub