[Bug 6533] New: Type mismatch 13 Error shows up in a VB-App.