MSComctlLib.ListView مشکل با

[tempali]

سلام
من یک فانکشن نوشتم که اسم یک listview رو میگیره و اونرو پاک می کنه ولی یک مشکل داره و ارور میده

Public Function lvwclear(ByRef lvwObj As MSComctlLib.ListView)
lvwObj.ListItems.Clear
End Function

بعد با این دستور داخل برنامه صداش می کنم

lvwclear(lvwdrivers)

ولی کار نمی کنه و ارور میده
لازم به ذکر است که این فانکشن داخل یک کلاس نوشته شده و در هر بار یک نسخه از آبجکت باید ساخته شود.
مشکل کجاست؟؟؟؟؟؟؟؟؟؟؟؟

[ROSTAM2]

با سلام

اولا نیاز به ساخت فانکشن برای پاک کردن نداری چرا که نوع داده خروجی نیاز مبرم نیست مگه اینکه بخوای متوجه شی لیست آیتم داشته و پاک شده یا نه
که برای این هم باید شما سابروتین (زیر روال) بسازید
Sub ListClear(Byval ListObj as ?)
ثانیا چرا ورودی تابع رو با ByRef ایجاد کردید
ثالثا اشتباهی که اینجا صورت گرفته استفاده از کلاس ماجول بوده که شما خصوصیت تک VB رو کنار گذاشتین
لطفا از شیء ماجول برای این کار استفاده کنید