Windows2008上でVB6アプリの動作が異常です。
異常の概要）
Collection のキーに漢字を使用すると、エラーが発生する場合がある。
Windows 2000/XP/2003 では再現しません。
またWindows2008でも、キーがANKである場合も再現しません。
エラー）
実行時エラー'5'
プロシージャの呼び出し、または引数が不正です。
再現プログラム)
フォームにボタンとリストボックスを貼って以下のコードを記述し
実行すると、20分程度でエラーが発生します。
Private Sub Command1_Click()
Dim c As Collection
Set c = New Collection
c.Add 1, "明細KEY"
c.Add 2, "販売区分"
c.Add 3, "伝票NO"
While True
DoEvents
List1.AddItem c("明細KEY")
List1.AddItem c("販売区分")
List1.AddItem c("伝票NO")
List1.Clear
Wend
End Sub
