مرجع سورس های ویژوال بیسیک ( درخواست سورس )

[ravegoat]

با تشکر از شما کد اول روکه اجرا میکنم پیغام خطا میده!
کد دوم رو که استفاده می کنم دیگه textbox1 فعال نمیشه!
میشه یک نمونه برای من بگذارید(ترجیحا نمونه خودم رو دانلود بفرمایید وتغییر بدید اون رو)
با تشکر

خواهش مي كنم.

دوست عزيز شما مشخص نكرديد كه مي خواهيد تو محيط آفيس مثلا" اكسل با VBA كار كنيد يا اينه در IDE مخصوص Vb6 قصد برنامه نويسي داريد؟!؟

كد اول تا اونجايي كه من مي دونم بايد تحت شرايط خاصي ازش استفاده بشه. اين شرايط در بستگي به كلاس محل قرارگيري textbox و كلاس اجراي اون خط كد داره. به علاوه اين كد فقط در VBA به كار برده ميشه نه vb6.


در مورد كد دوم: اگه شما دستور رو به شكل Text1.SetFocus اجرا كرده باشيد قاعدتا" با خطا مواجه ميشيد چه در vba و چه در vb6 بلكه بايد دستور به شكل Textbox1.SetFocus نوشته ميشد تا اون جعبه متني فعال بشه.


خيلي كلي و واضح بگم:

دستور TextBox.SetFocus در اكثر مواقع در VBA و VB6 كار مي كنه. اگه دستور رو داخل فرم محل قرارگيري تكست باكس وارد كنيد دستور به شكل زير ميشه

TextBoxName.SetFocus

كه TextBoxName نام تكست باكس شما هستش
و اگر دستور رو خارج از فرم محل قرارگيري تكست باكس وارد كنيدبايد ابتدا نام فرم رو وارد كنيد

FormName.TextBoxName.SetFocus

كه FormName نام فرمي هست كه تكست باكس تو اون قرار داره.

دستورات بالا رو خودم تو محيط Macro اكسل امتحان كردم و كار كرد.

موفق باشيد
آرمين