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

وبلاگ من
خانه وبلاگ
ايميل من
خرداد ۸۸
آذر ۸٧
تیر ۸٦
خرداد ۸٦
اسفند ۸٥
بهمن ۸٥
دی ۸٥
مهر ۸٥
شهریور ۸٥

لینک دوستان
کانون دانش آموختگان سمپاد اراک
آمار وبلاگ
خروجی وبلاگ

برنامه ی ساده ی کار با بانک اطلاعاتی

سلام نیشخند

همانطور که از عنوان مطلب پیداست برنامه برای کار با بانک اطلاعاتی (Database) هست (با توضیحات کامل)

لینک دانلود

پيام هاي ديگران () link ۱۳۸۸/۳/٤ - احمد بادکوبه ای

ماشین حساب ساده

سلام

بعد از یه غیبت طولانی یه ماشین حساب ساده براتون گذاشتم :

http://vbasic.persiangig.com/Visual%20Basic/Calculator.zip

پيام هاي ديگران () link ۱۳۸٧/٩/۱۳ - احمد بادکوبه ای

خالی کردن سطل زباله در وی بی دات نت

سلام

برای خالی کردن سطل زباله در دات نت مثل وی بی 6 عمل می‌کنیم با دو تفاوت کوچک :

1 : در دات نت hwnd به Handle تغییر نام پیدا کرده است . مثلا به جای Me.hwnd باید بنویسید : Me.Handle

2 : در دات نت نیاز به تعریف ثوابت نیست ؛ چون کار نمی کنند ! به این معنی که در هر حالت خالی کردن سطل زباله با همان پرسش همیشگی ویندوز همراه است . پس بهتر است پارامتر dwFlags را برابر صفر قرار دهید .

یک مثال برای انجام این کار در وی بی دات نت : یک پروژه از نوع Windows Application بسازید و یک دکمه بر روی فرم آن قرار دهید .

کد زیر را بنویسید :

Private Declare Function SHEmptyRecycleBin Lib "shell32.dll" Alias "SHEmptyRecycleBinA" (ByVal hwnd As Long, ByVal pszRootPath As String, ByVal dwFlags As Long) As Long

Private Declare Function SHUpdateRecycleBinIcon Lib "shell32.dll" () As Long

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

SHEmptyRecycleBin(Me.Handle, vbNullString, 0)

SHUpdateRecycleBinIcon()

End Sub

به یاد داشته باشید که در حالت کامپایل Debug پس از فراخوانی تابع ممکن است یک پیام خطا ایجاد شود که باید بر روی کلید Continue کلیک کنید . اگر نوع کامپایل را بر روی Release قرار دهید دیگر این پیام ایجاد نخواهد شد .

پيام هاي ديگران () link ۱۳۸٦/٤/٥ - احمد بادکوبه ای

چشمک زدن پنجره

سلام . اگر می‌خواهید نظر کاربر را در هنگام اجرای برنامه به برنامه تون جلب کنید که مثلا بفهمه که کار برنامه تموم شده باید از این تابع استفاده کنید تا برنامه شما در Taskbar شروع به چشمک زدن کند .

ابتدا این تابع Api را تعریف کنید .

Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long

این تابع دو مقدار ورودی را دریافت می کند :

پارامتر اول اشاره گر پنجره ای است که باید چشمک یزند . برای چشمک زدم همان فرمی که در آن کد را می نویسید مقدار آن را Me.hwnd قرار دهید .

پارامتر دوم مدت زمان است که می توانید آن را برابر 1 قرار دهید .

مثال استفاده از این تابع را از لینک زیر دانلود کنید .

دانلود

پيام هاي ديگران () link ۱۳۸٦/٤/٢ - احمد بادکوبه ای

خالی کردن سطل زباله

سلام

آموزش امروز همانطر که از عنوانش پیداست مربوط به خالی کردن سطل زباله یا همان Recycle Bin است . برای انجام این کار در وی بی ۶ باید ابتدا ثابتهای زیر را تعریف کنید :

Private Const SHERB_NOCONFIRMATION = &H1
Private Const SHERB_NOPROGRESSUI = &H2
Private Const SHERB_NOSOUND = &H4

اولین ثابت بیان می کند که برای خالی کردن سطل از کاربر هیچ تاییدیه ای گرفته نمی‌شود.

ثابت دوم سرعت انجام کار را بالا می برد و همچنین شکل کرسر موس را تغییر نمی‌دهد .

ثابت سوم صدای تخلیه سطل را که از طرف ویندوز ایجاد می‌شود را پخش نمی‌کند .

حالا باید توابع Api مربوطه را تعریف کنیم . برای این کار باید از دو تابع زیر استفاده کنید :

Private Declare Function SHEmptyRecycleBin Lib "shell32.dll" Alias "SHEmptyRecycleBinA" (ByVal hwnd As Long, ByVal pszRootPath As String, ByVal dwFlags As Long) As Long
Private Declare Function SHUpdateRecycleBinIcon Lib "shell32.dll" () As Long

تابع اصلی SHEmptyRecycleBin است . پارامترهای ورودی آن به شرح زیر است :

hwnd : اشاره گر پنجره ای است که تابع تحت آن اجرا می شود . معمولا مقدار آن Me.hwnd است .

pszRootPath : پارتیشن را مشخص می‌کند که باید فقط فایلهای مر بوط به آن پارتیشن حذف شود . اگر می‌خواهید سطل زباله به طور کامل خالی شود مقدار آن را vbNullString قرار دهید .

dwflags : نوع خالی کردن سطل را مشخص می‌کند که می‌تواند یکی یا به وسیله or ترکیبی از ثابتهای یاد شده باشد . اگر مقدار آن صفر باشد روش پیش فرض ویندوز در نظر گرفته می‌شود .

مقادیر خروجی این تابع : اگر تابع کار خود را با موفقیت انجام دهد مقدار خروجی آن صفر یا S_ok خواهد بود در غیر این صورت یک کد خطای غیر صفر را باز می گرداند .

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

مثال انجام این کار را می توانید از لینک زیر دانلود کنید .

دانلود

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

خداحافظ

پيام هاي ديگران () link ۱۳۸٦/٤/۱ - احمد بادکوبه ای

ایجاد وقفه در اجرای برنامه قسمت دوم

سلام

برای ایجاد وقفه در اجرای برنامه در وی بی دات نت ابتدا بالای قسمت :

Public Class ...

تایپ کنید :

Imports System