آموزش گام به گام ویژوال بیسیک6.0

[A_M_IT2005]

من 2 هفته اي هست اونجا عضو شدم ولي عضويتم رو قبول نكردن !!! ( اون ايميل فعال كردن عضويت رو ارسال نمي كنن !! )
شما اونجا عضوين عزيز ؟؟ يك ندايي ه اونا بدين عضواي جديد رو فراموش نكنن !!!

سلام khatamifar جان
من اونجا عضو هستم.
فکر کنم سرور سایت مشکل پیدا کرده .
ولی من یه پیغام به سایت فرستادم ، تا الان که جواب ندادن.
---------------------------------------------------------------------
اگه شما برنامه ای نوشتی یا سوالی داری ، خوب چه جایی بهتر از پی سی.

[MohammadJavad.T]

سلام
فكر نكنم بخاطر سرور باشه اگه با firefox بري حتما جواب ميده

[amirvb60]

دوست عزيز بهتره اول توضييح بديد كه براي ارتباط با بانك اطلاعاتي از چه مدل ارتباط داده اي استفاده مي كنيد و دقيقن كجاي كار مشكل دارين . شايد بتونم كمكتون كنم . ولي اگر هدفتون اينه كه كلا ساخت همچين پروژه اي را ياد بگيرين من ميتونم با كلاس خصوصي و ساعتي ده هزار تومن دستمزد ساخت پروژه هاي بانك اطلاعاتي رو با مدل ارتباط داده Adodb که برای وی بی 6 بهترین مدل ارتباط داده ای است بهتون آموزش بدم . مدت زمان یاد گیری هم بستگی به شما داره و میزان دانشتون از وی بی.

[saeideh50505050]

توي جستجو هام به يك كتاب فوق العاده بر خوردم كه حيفم آمد از آن چيزي ننويسم.
آموزش ويژوال بيسيك 6 در 21 روز
نوشته گريگ پري
ترجمه علي رضا زارع پور
انتشارات نص
نويسنده با شما خيلي خودموني مي شه حتي براي من كه از صفر شروع كردم هم بسيار جالب بود
اميدوارم لذت ببريد

[BlackRoz_A.J]

با سلام
ميخواستم ببينم آيا ميشه مسير فايل database را که در خصوصيت databasename
کنترل data قرار دارد را در هنگام اجرای برنامه از يک فايل متنی خواند.با تشکر
Email = [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

[Master]

اینم از اموشهایی که تا صفحه 10 داده شده ..بصورت صفحات با فرمت ایچ تی ام ال در اووردم(که با اینترنت اکسپلورر و فایر فاکس و اپرا و... براحتی باز میشه)..115 کیلو بایت ... دنلود کنید
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

اینم از فرمت پی دی اف اموزشها تا صفحه 10 :
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

[Hadiir]

کار با فايل در ويژوال بيسيک - بخش اول

مقدمه

بعلت عدم وجود اشاره گر در ويژوال بيسيک عمليات کار با فايلها در آن نسبتاً ساده می باشد .
بطور کلی فايلها بر دو نوع هستند :
1 - فايلهای متنی Text File : اين فايلها فقط شامل کاراکترهای اسکی و برخی کاراکترهای خاص مانند انتهای خط و انتهای فايل هستند .
۲ - فايلهای باينری Binary File : شامل هر نوع کاراکتری می توانند باشند و کاربردهای گسترده ای دارند مانند بانک های اطلاعاتی ، فايلهای اجرائی ، فايلهای گرافيکی و غيره
ويژوال بيسيک می تواند با هر دو نوع فايل کار کند .

چگونگی باز کردن فايلها

قبل از اينکه بتوان عمليات ورودی/خروجی را روی يک فايل انجام داد ابتدا بايستی آنرا باز کرد . باز کردن فايلها در ويژوال بيسيک توسط دستور Open انجام می شود . فرمت کلی اين دستور بصورت زير است :

Open filename [For mode] [Access access][lock] As [#]filenumber [Len=reclen]x


[ پارامترهای داخل کروشه اختياری هستند . ]
filename نام فايلی است که می خواهيم آنرا باز کنيم .
mode حالت باز کردن فايل است . اين حالتها عبارتند از :
- Input : فايل بعنوان ورودی باز می شود .
- Output : فايل بعنوان خروجی باز می شود .
- Binary : فايل از نوع باينری باز می شود .
- Append : فايل طوری باز می شود که بتوان به انتهای آن چيزی اضافه کرد .
- Random
access نوع دسترسی به فايل را مشخص می کند . انواع دسترسيها عبارتند از :
- Read : خواندن فايل
- Write : نوشتن در فايل
- ReadWrite : خواندن و نوشتن فايل
lock نوع دسترسی ساير برنامه ها به اين فايل را مشخص می کند . انواع دسترسيها عبارتند از :
- Shared : دسترسی اشتراکی
- Lock Read
- Lock Write
- Lock Read Write
filenumber عددی است که ويژوال بيسيک از آن برای دسترسی به فايل استفاده می کند .اين عدد بايستی برای هر فايل منحصر بفرد و بين ۱ تا ۵۱۱ باشد . برای بدست آوردن اولين شماره آزاد می توان از تابع FreeFile استفاده کرد .
reclen :طول بافر فايل است . اين عدد بايستی از ۳۲۷۶۷ کو چکتر باشد .

در صورتی که فايلی که توسط filename مشخص شده وجود نداشته و فايل برای Append ، Binary ، Output و يا Random باز شده باشد در اينصورت يک فايل جديد با اين نام ساخته می شود .
در صورتی که فايل بصورت باينری باز شده باشد پارامتر Len ناديده گرفته می شود .

چگونگی بستن فايل

پس از پايان کار با فايل برای بستن آن از دستور Close استفاده می کنيم . فرمت اين دستور بصورت زير است :

Close #filenumber


دستور Close بدون هيچ پارامتری تمام فايلهای باز را می بندد .

کار با دايرکتوری

۱ - گرفتن Dir : توسط دستور Dir می توان نام فايلهای موجود در يک دايرکتوری را بر اساس پارامترهايي که به آن می دهيم پيدا کنيم . برای مثال :

Myfile=Dir$("c:\text\*.txt)"x


دستور فوق نام اولين فايل موجود در دايرکتوری C:\TEXT را که پسوند آنها txt باشد در متغير Myfile قرار می دهد . اگر دستور فوق را بدون پارامتر مجدداً اجرا کنيم نام دومين فايل برگرداننده می شد و الی آخر
Dir دارای يک پارامتر اختياری است که نوع فايلهای مورد نظر را نيز می توان با آن مشخص نمود . مثال :

Myfile=Dir$("c:\text\*.txt",vbNormal)x


مقادير ممکن اين پارامتر عبارتند از :
vbNormal ، vbHidden ، vbSystem ، vbDirectory
۲ - تغيير دايرکتوری : برای تغيير دايرکتوری از دستور ChDir استفاده می شود مثال :

ChDir "c:\windows\system32"x


۳ - تغيير درايو : برای تغيير درايو از دستور ChDrive استفاده می شود مثال :

ChDrive "E:"x


۴ - ساخت دايرکتوری : برای ايجاد دايرکتوری جديد از دستور MKDir استفاده می شود مثال :

MKDir "c:\MyFolder"x


۵ - حذف دايرکتوری : برای حذف دايرکتوری از دستور RmDir استفاده می شود مثال :

RmDir "C:\MyFoler"x

-----------------------------------------------------------------------------------------------------------------------------
كارت عالي بود دوست عزيز
ا ز دوستاني كه اين چند خط و ميخونن و اگه مي تونن راهنمايي لطف كنن راهنمايي كنن.

چطور یک فایل با فرمتهای Wav , Dat , Bmp و سایر فایلها رو به صورت Unicode باز کنم و در یک متغیراز نوع String قرار بدم. (Visual Basic 6.0)
من میخوام یک فایل تصویری با فرمت Dat را یک مکان به مکان دیگه ای کپی کنم و میزان پیشرفت کار رو در برنامه با Progress bar نمایش بدم. چه طوری؟
چه طور آیدی کامپیوترم با VB 6.0 پیدا کنم؟

[MRGAME]

سلام بچه ها
معلم ما گفته به زبان بیسیک یه برنامه بنویسید که دوتا عدد رو بگیره یکی عدد در مبنای 10 و اون یکی عدد دلخواه
عدد مبنای ده رو به مبنای دلخواه ( عدد دومی ) تبدیل کنه
اگر کسی بلده لطفا برام بنویسه تا 2 3 ساعت دیگه لازمش دارم
مرسی .........

[mike_3000]

سلام.
Private Sub Label1_Click()
Form1.WindowState = vbMinimized
End Sub




اينم لينك دانلود ویژوال استودیو 2005 (Professional) به همراه راهنمای MSDN

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
پسورد: [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

اینم ویژوال استودیو 2005 بدون راهنمای MSDN
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام خسته نباشي
ببخشيد يه سئوال:
من ویژوال استودیو 2005 رو دارم بار اول نصب كردم كار كرد ولي بار دوم كه ويندمز رو عوض كردم ديگه كار نكرد
يعني نصب مي شه و قتي مي خوام باز كنم پيام ميده
the bata is over now you can remove VISAL-STEDIO.NET 2005 from your computer
لطف كنيد راهنمائيم كنيد چكار بايد بكنم
متشكر

[vorojax]

دوستان چه جوري ميشه به بانك اطلاعاتي اكس از تريغ وي بي وصل شد اصلا ميشه؟