> リストボックスのチェックが入っているか、いないかの判定をするにはどうすればいいでしょうか?Dim i As LongFor i = 0 to List1.ListCount -1 If List1.Selected(i) = True Then MsgBox "Check"Next