این سورس رو آماده کردم میتونید دانلود کنید.
برای دانلود با حجم 6KB روی تصویر زیر کلیک کنید.
این برنامه تاریخ سیستم رو به تاریخ شمسی تبدبل می کنه و به ۴ نوع نمایش میده .
برای دانلود با حجم ۵۹KB روی تصویر زیر کلیک کنید.
برای به دست آوردن جذر از تابع Sqr استفاده می کنیم .
مثال :
|
Private Sub Command1_Click() |
سوال : کاربر فقط ده ثانیه مهلت انجام کاری رو داشته باشه.
در این سورس که آماده کردم کاربر فقط ۱۰ ثانیه وقت دارد تا پسور رو وارد کنه وگر نه برنامه خطا میده.
پسور پیش فرض= admin
توضیحات:در این برنامه یک تایمر هر یک ثانیه یک رقم از متغیر تعریف شده کم میکنه بعد از این که متغیر به صفر رسید تایمر غیر فعال میشه.وپیغام End Time ! رو نمایش میده.
برای دانلود سورس با حجم 2KB روی تصویر زیر کلیک کنید.
سوال در مورد افکت لیبل
در باسخ با سوال این دوستمون دو سورس آماده کردم یکی برای افکت لیبل و دیگری افکت تکست باکس میتونید دانلود کنید.
برای دانلود سورس با حجم 4Kb روی تصویر زیر کلیک کنید.
شاید شما هم از ظاهر ساده ویژوال بیسیک خسته شدید با این ترفند ظاهر برنامه های خود رو به ظاهر ویندوز تبدیل کنید.
برای دانلود با حجم ۶KB روی تصویر زیر کلیک کنید.
در این کتاب سعی شده است ۲۱ تابع کار آمد API برای استفاده در برنامه های ویژوال بیسیک 6 و نحوه معرفی و استفاده از آنها به طور کامل و صحیح شرح داده شود.
نویسنده: علی
ایمیل نویسنده : AliMedia_VB@yahoo.com
برای دانلود با حجم 152KB بر روی تصویر زیر کلیک کنید.
سوال درمورد گرافیک در vb و افکت های فرم.
ویژوال بیسیک قابلیت بالایی در استفاده از جلوه های گرافیکی در اختیار شما قرار دهد و میتوانید این جلوه های گرافیکی را با دو روش ایجاد. کنترل های گرافیکی مثل Line,Shape و متد های گرافیکی مثل Circle,Pset,Line.
متد PSet
با این متد میتوانیدنقاط مورد نظر خود را در مکان های مناسب.شکل کلی این متد به این صورت است
object. Pset Step (x.y),color
منظور از object شیئی است که نقطه روی آن رسم میشود. کلمه کلیدی Step نیز اختیاری است و در صورت استفاده از آن هنگام رسم، مکان ترسیم با توجه به موقعیت جاری در شیئی که در آن ترسیم انجام شده، انتخاب می شود.
x,y مقادیر عددی هستند که مختصات محل ترسیم نقطه را مشخص می کند. و با استفاده از بخش color می توانید رنگ نقطه مورد نظر را تعیین کنید.
مثال: میخواهیم 20 نقطه را به صورت تصادفی روی فرم رسم کنیم.
Dim i As Integer
Randomize
For i=1 to 20
PSet (Int(Rnd*1000), Int(Rnd*2000))
Next i
متد Line
با استفاده از این متد می توانید انواع خطوط و مستطیل های تو پر و تو خالی ایجاد کنید.
object.Line Step (x1,y1)-(x2,y2),Color, B F
استفاده از متد حروف B یک مستطیل خالی و استفاده از حرف F به همراه حرفB یک مستطیل تو پر ایجاد می کند.
مثال:
Line (500,800)-(1500,1500),vbBlue برای رسم خط
Line (410,3600)-(2000,3700),vbRed,BF برای رسم مستطیل تو پر
متد Circle
با این متد می توان دایره و کمان رسم کرد.
object.Circle Step (x,y) ,radius,color,start,end,aspect
مقدار عددی radius شعاع دایره را تعیین می کند.مقادیر عددی start و end اختیاری بوده و موقعیت شروع و خاتمه کمان را برای ترسیم مشخص می کند.
مثال:
Cercle(500,6000),400,-Pi/6,-Pi/3
میتونید برای مطالعه مطالب بیشتر و حرفه ای از این لینک کتاب الکترونیکی رو دانلود کنید و مطالعه کنید.
اما در مورد افکت های فرم میتونید از این کد ها استفاده کنید.
کتاب آموزشی کار با کنترل ADO
نویسنده : حسین
برای دانلود با حجم 231KB روی تصویر زیر کلیک کنید.
E-Mail : hosein_329@yahoo.com
برای دانلود با حجم 2KB بر روی تصویر زیر کلیک کنید.
سورس به دست آوردن رزولیشن صفحه نمایش با ویژوال بیسیک
برای دانلود با حجم 1KB بر روی تصویر زیر کلیک کنید.
برای دانلود با حجم 1KB بر روی تصویر زیر کلیک کنید.
سورس به دست آوردن تمام فونت های نصب شده رو کامپیوتر.
برای دانلود با حجم 1KB بر روی تصویر زیر کلیک کنید.
برای دانلود با حجم 2KB روی تصویر زیر کلیک کنید.