فراخوانی تابع با ورودی آرایه از VB6

[MEhdi Sobhani]

سلام
یه تابع نوشتم در VB6 داخل یک اکتیوایکس که یه آرایه دابل رو به عنوان ورودی میگیره و اون رو پر میکنه .
این کد تابع در اکتیوایکس هست و اکتیوایکس هم ضمیمه شده .
لطفا راهنمایی کنید چطور میتونم اون رو در سی شارپ فراخوانی کنم ؟

کد وی بی :

Public Sub GetDoubleArray(Data() As Double, ByVal fiileName$, ByVal Seekm&)

Open FileName$ For Binary As 1

    Get 1, Seekm&, Datas

Close 1

End Sub

فایل اکتیوایکس رو هم ضمیمه کردم .
اینجا در ورودی تابع آرایه دابل هست اما در سی شارپ آرایه دابل رو قبول نمیکنه و برای نوع ورودی فقط مینویسه

ref Array Data

این هم کد نمونه در سی شارپ که خطا میده

            double[] MyDoubles = new double[100];

            MyOcx.GetDoubleArray( MyDoubles, "C:\MyData.dat", 1);

با تشکر فراوان
لینک فایل : اینجا

[cheshm6k]

سلام

double[] MyDoubles = new double[100];

            MyOcx.GetDoubleArray( MyDoubles, "C:\MyData.dat", 1);

با این تغییرات ارور برطرف شد

Array a = new double[100];

axUserControl1.GetDoubleArray(ref a, "C:\\1.dat", 1);

اما ........... امتخان کن ببین جواب مد نظرت رو میده.

[MEhdi Sobhani]

سلام
با این تغییرات ارور برطرف شد

Array a = new double[100];

axUserControl1.GetDoubleArray(ref a, "C:\\1.dat", 1);

اما ........... امتخان کن ببین جواب مد نظرت رو میده.

آقا دستت درد نکنه
خیلی عالی بود
دقیقا همون چیزی بود که لازم داشتم .
بازم ممنونم .

[MEhdi Sobhani]

بازم ممنونم
یه سوال دیگه هم داشتم ممنون میشم اگر راهنمایی کنی .
اگر اون تابع رو اینطوری بنویسم

Public Sub GetVariant(Data As Variant, ByVal FileName$, ByVal Seekm&)

Open FileName$ For Binary As 1

    Get 1, Seekm&, Data

Close 1

End Sub

بعد چجوری میتونم تو سی شارپ ازش استفاده کنم .
این هم نمونه اکتیوایکسش هست .
ممنون .

[cheshm6k]

چون Variant نوعش مشخص نیست و میتونه هر چیزی باشه میشه object :

اینو امتحان کن :

object obj = new object();

axGetVariant1.GetVariant(ref obj, "C:\\1.dat", 1);