سورس فایل حرکت نوشته ها بر روی TextBox و فرم
سلام
دوستان سورس فایل حرکت نوشته ها بر روی TextBox و فرم تقدیمتان میگردد واقعا کاری جالب و قابل استفاده در پروژه هاتون میباشد که امیدوارم از استفاده آن بهره کافی رو ببرید
Printable View
سورس فایل حرکت نوشته ها بر روی TextBox و فرم
سلام
دوستان سورس فایل حرکت نوشته ها بر روی TextBox و فرم تقدیمتان میگردد واقعا کاری جالب و قابل استفاده در پروژه هاتون میباشد که امیدوارم از استفاده آن بهره کافی رو ببرید
نمایش و مخفی نمودن task bar
با سلام
دوستان این برنامه سورس فایل پنهان کردن و نمایش task bar میباشد
مجموعه 2100 پروژه ویژوال بیسیک در 18 قسمت.
http://ehsanavr.com/?p=454
http://ehsanavr.com/?p=471
http://ehsanavr.com/?p=473
http://ehsanavr.com/?p=476
http://ehsanavr.com/?p=479
http://ehsanavr.com/?p=482
http://ehsanavr.com/?p=484
http://ehsanavr.com/?p=487
http://ehsanavr.com/?p=489
http://ehsanavr.com/?p=491
http://ehsanavr.com/?p=494
http://ehsanavr.com/?p=497
http://ehsanavr.com/?p=500
http://ehsanavr.com/?p=502
http://ehsanavr.com/?p=504
http://ehsanavr.com/?p=505
http://ehsanavr.com/?p=507
http://ehsanavr.com/?p=509
سورس پروژه کامل مدیریت هتل
سلام
با تشکر از عزیزان سورس فایل تقدیمی سورس پروژه کامل مدیریت هتل میباشد که امیدوارم از استفاده اون لذت ببرید و نکات جالب آموزشی یاد بگیریم
دانلود
سلام
یکی از دوستان کدی شبیه به این میخواست
با این تکه کد میتونین یه عکس رو به صورت Strech یا غیر Strech توی یه صفحه مجزا نشون یدین البته
میدونم که شبیه این کد زیاد هستش ولی اگه خواسته باشین عکس رو به اندازه واقعی نشون بدین و اندازه ی عکس شما بیشتر از اندازه صفحه شما باشه 2 تا اسکرول بار عمودی و افقی اضافه میشه تا بتونین عکس رو اسکرول کنید
همینطور که همه میدونن متن داخل یه CommandButton بصورت پیش فرض در مرکزش قرار داره.
شاید برای بعضی ها پیش اومده باشه که بخوان متن داخل یک CommandButton موقعیتش رو تغییر بدن مثلا بالا ، پایین ، چپ ، راست ، پایین راست ، پایین چپ و ....
این کد میتونه موارد بالا رو برای شما انجام بده:(جایی که کد قرمز رنگ هست میتونین موقعیت رو عوض کنید.)
1. یک پروژه جدید باز کنید.
2. یک Command به فرم اضافه کنید.
3. کد زیر رو به فرم اضافه کنید.
Enum CmdTextPotion
A_CENTER = &H300&
A_TOP = &H400&
A_TOPLEFT = &H500&
A_TOPRIGHT = &H600&
A_BOTTOM = &H800&
A_BOTTOMLEFT = &H900&
A_BOTTOMRIGHT = &HA00&
A_LEFT = &H100&
A_RIGHT = &H200&
End Enum
Private Const GWL_STYLE& = (-16)
Private Declare Function GetWindowLong& Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long)
Private Declare Function SetWindowLong& Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long)
Private Sub Command1_Click()
Dim tmpValue&
Dim Align&
Dim ret&
fAlignment& = CmdTextPotion.A_BOTTOMRIGHT
tmpValue& = GetWindowLong&(Command1.hwnd, GWL_STYLE) And Not BS_RIGHT
ret& = SetWindowLong&(Command1.hwnd, GWL_STYLE, tmpValue& Or fAlignment&)
Command1.Refresh
End Sub
نقل قول:
نوشته شده توسط Persianlord
ممنون خیلی آموزش خوبی بود . اگه ممکنه بگو چطوری رنگ متن داخل Command هم عوض کنیم :خجالت:
تغییر رنگ Forecolor مربوط به CommandButtonنقل قول:
نوشته شده توسط Snoopboy
http://vbnet.mvps.org/index.html?cod...ttoncolour.htm
این نمونه خیلی خیلی کامترهنقل قول:
نوشته شده توسط daniyal_1363
1 - نمایش سایز واقعی عکس
2 - تغییر سایز عکس با تغییر فرم
3 - تغییر سایز به سایز اولیه
4 - در صورتی بزرگتر بودن سایز عکس از صفحه نمایش ، نمایش و امکان اسکرول کردن عکس
با استفاده از این ابزار می تونید handle آبجکت مورد نظر رو به دست بیارید...
البته این فایل سورس نیست و فقط می تونید توی برنامه نویسی هاتون ازش استفاده کنید.
ایجاد Gradient :
دانلود
ساخت لوگو به طور نسبتا حرفه ای:
شیشه ای کردن تصاویر:
خسته نباشید اگه ممکنه اینو یه جای دیگه آپلود کنید :قلب:نقل قول:
نوشته شده توسط Mbt925
این کد هم مال گرفتن حرکات جوی استیک (البته فقط شک رو نمی تونه فعال کنه)
سلام
نمیدونم کسی تا حال همچین کاری انجام داده یا نه ولی این نمونه ProgressBar که خیلی خیلی ساده و با استفاده یه جرقه کوچک ذهنی درست شد
خصوصیات:
1- از هیچ کامپونتی استفاده نمیشه
2 - به جای قسمت نمایش ( ستون پر شونده ProgressBar) میتونین هر شی رو که خاصیت Width داشته باشه بزارین (فکر کنین چه کارایی میشه کرد)
3 - با استفاده از اشیاء معمولی و یک یا دو فرمول ساده ریاضی برنامه ریزی شده که راحت قابل فهم و قابل تغییره
موفق باشین
http://up.iranblog.com/Files/d21f8281999840f5a27c.JPG
یک فرم مناسب برای صفحه about:
ببین من یک کد بلدم یاد همه میدم برای کپی کردن فایلهنقل قول:
نوشته شده توسط Mbt925
filecopy c,f
به جای cمبدا و به جای f مقصد رو بنویسید
برای این که بفهمید برنامه کجا اجرا شده باید از کد زیر استفاده کنید
"app.path &"/"&app.exename &".exe
خوب بود اگه بدردتون خورد بدونین نمیدونم از کدوم انجمن این رو اوردم نویسنده اش هم
انشا الله حلالم کنه دعا کنین
1 . گذاشتن تصویر تو پس زمینه درایوها یا پوشه ها !
http://arash020.persiangig.com/other...BD%20%20X1.rar
2 .نقاشی به همراه -> قرینه سازی !
http://arash020.persiangig.com/other...20%20%20X1.rar
شاید تا حالا برای شما هم پیش اومده باشه که بخواین داخل یک جعبه متن کلمه عبور وارد کنید.
اکثر این جعبه متن (مثل تصویر زیر) از پیش یک متن با عنوان های Inter password یا ... رو بصورت کم رنگ نشون میدن و به محض فکوس روی اونها آماده دریافت پسورد میشن.
http://persianloord.persiangig.com/image/Login.jpg
این موضوع رو میتونین در برنامه زیر ببینید.
دانلود از Persiangig
نقل قول:
نوشته شده توسط M.T.P
سورس دوستمون با كمي تغييرات
سلام
خوبی
ببین فکر کنم هاستت اشکال داره
هیچی واس دانلود وجود نداره
این برنامه آیکن های 32بیتی موجود در dll ها و فایل های اجرایی exe را نمایش میدهد.
توسط این برنامه میتونید از آیکن های زیبای ویندوز در برنامه تون استفاده کنید.
اگه از MessageBox های اختصاصی و ساخت خودتون استفاده میکنید و دوست دارید messageboxتون از آیکن های ویندوز استفاده کنه این بهترین راه ممکنه.(مزیت این کار اینه که اگه برنامه رو در ویندوزهای جدید مثل 7 اجرا کنید ، برنامه تون آیکن های جدیدتر رو میخونه و استفاده میکنه.
http://persianloord.persiangig.com/image/icons.JPG
امیدوارم با توابع موجود در این برنامه بتونم تصاویر PNG رو هم تو PictureBox به نمایش دربیارم.(دارم روش کار میکنم.)
این دیکشنری با بیش از پنجاه هزار لغت امکان ترجمه کلمات لاتین را به فارسی و برعکس را دارد.
بانک این دیکشنری از نوع اکسس 2003 هست.
همچنین این برنامه میتواند آموزش خوبی برای اون دسته از عزیزان باشه که مایل به فراگیری کار با بانک های اطلاعاتی هستند.
http://persianloord.persiangig.com/i...Dictionary.jpg
تقدیم به همه دوستان.
دانلود از سایت persiangig
دانلود از سایت برنامه نویس:
این سه تا فایل رو دانلود کنید کنار هم قرار بدید و بعد از حالت فشرده خارج کنید.
سلام
دوست گرامی میشه لطف کنید و منظورتون رو از msgbox های سفارشی واضح تر بیان کنید؟
یعنی msgbox هایی که در قالب فرها درست میکنیم؟
یک سئ.ال دیگر هم داشتم
چطور میتونیم یک dll بسازیم و در اون آیکون های دلخواه خودمون رو قرار بدیم؟
فایل مربوط به برنامه دیشکنری هم دانلود نمیشه
ظاهراً لینک خرابه
ممنون از نمونه خوبی که قرار دادید
سلام
سورس برنامه گرفتن لیستی از پوشه های یک مسیر دلخواه و ذخیره در فایل متنی
موفق باشید.
Eagle computer
گاهی اوقات میشه به جای استفاده از کنترل ها و کامپوننت های گرافیکی از شیب رنگ برای زیبایی برنامه ها استفاده کرد.
برنامه زیر با استفاده از یک تابع به نام Gradient میتونه در فرم ها و کنترل PictureBox شیب رنگ تولید کرده و فرم شما رو زیباتر کنه.
حالت های شیب رنگ:
افقی و عمودی.
نحوه استفاده :
روی فرم راست کلیک و چپ کلیک کنید.
جناب m.t.p سلام خسته نباشید
بنده چند وقت است دنبال استفاده از بالن در اکسس هستم ولی متاسفانه به جایی راه پیدا نکردم چگونه می توانم از برنامه بالن در اکسس استفاده کنم
ممنون میشم
كدهاي Module1:
Option Explicit
Public m_hDllKbdHook As Long 'public variable holding
'the handle to the hook procedure
Public Const WH_KEYBOARD_LL As Long = 13 'enables monitoring of keyboard
'input events about to be posted
'in a thread input queue
Private Const HC_ACTION As Long = 0 'wParam and lParam parameters
'contain information about a
'keyboard message
Private Const LLKHF_UP As Long = &H80& 'test the transition-state flag
Public Type KeyboardBytes
kbByte(0 To 255) As Byte
End Type
Private Type KBDLLHOOKSTRUCT
vkCode As Long 'a virtual-key code in the range 1 to 254
scanCode As Long 'hardware scan code for the key
flags As Long 'specifies the extended-key flag,
'event-injected flag, context code,
'and transition-state flag
time As Long 'time stamp for this message
dwExtraInfo As Long 'extra info associated with the message
End Type
Public Declare Function SetWindowsHookEx Lib "user32" _
Alias "SetWindowsHookExA" _
(ByVal idHook As Long, _
ByVal lpfn As Long, _
ByVal hmod As Long, _
ByVal dwThreadId As Long) As Long
Public Declare Function UnhookWindowsHookEx Lib "user32" _
(ByVal hHook As Long) As Long
Public Declare Function CallNextHookEx Lib "user32" _
(ByVal hHook As Long, _
ByVal nCode As Long, _
ByVal wParam As Long, _
ByVal lParam As Long) As Long
Public Declare Sub CopyMemory Lib "kernel32" _
Alias "RtlMoveMemory" _
(pDest As Any, _
pSource As Any, _
ByVal cb As Long)
Public Declare Function GetKeyboardState Lib "user32" _
(kbArray As KeyboardBytes) As Long
Public Declare Function GetKeyState Lib "user32" _
(ByVal nVirtKey As Long) As Integer
Public Function LowLevelKeyboardProc(ByVal nCode As Long, _
ByVal wParam As Long, _
ByVal lParam As Long) As Long
Dim kbdllhs As KBDLLHOOKSTRUCT
If nCode = HC_ACTION Then
Call CopyMemory(kbdllhs, ByVal lParam, Len(kbdllhs))
If (kbdllhs.flags And LLKHF_UP) Then
MsgBox (kbdllhs.vkCode)
End If
End If 'nCode = HC_ACTION
LowLevelKeyboardProc = CallNextHookEx(m_hDllKbdHook, _
nCode, _
wParam, _
lParam)
End Function
كد هاي داخل فرم اصلي
Option Explicit
Private Sub Form_Load()
'set and obtain the handle to the keyboard hook
m_hDllKbdHook = SetWindowsHookEx(WH_KEYBOARD_LL, _
AddressOf LowLevelKeyboardProc, _
App.hInstance, _
0&)
If m_hDllKbdHook = 0 Then
MsgBox "Failed to install low-level keyboard hook."
End If
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If m_hDllKbdHook <> 0 Then
Call UnhookWindowsHookEx(m_hDllKbdHook)
End If
End Sub
همه برنامه نویس های ویژوال بیسیک 6 میدونن که فونت های(قلم) کدنویسی که بتونه هم لاتین و هم فارسی رو ساپورت کنه در واقع از پیش چند تا بیشتر نیست.
1. Arial
2. Courier New
3. Times New Roman
بصورت پیش فرض تنها با یکی از سه فونت بالا که البته جلوی اسمشون عبارت Arabic هست میشه تو کد نویسی فارسی هم تایپ کرد.
فونت زیر فونت زیبای Segoe UI هست که حتما میشناسیدش و با ورود ویندوز ویستا و 7 جزء فونت پیش فرض تم ویندوز شد ، و دارای خصوصیت Arabic هست و میتونید حال و هوای محیط کدنویسیتون رو باهاش عوض کنید. البته ویندوز ویستا و 7 این فونت رو نصب شده دارن اما نمیشه تو کدنویسی باهاش فارسی تایپ کرد .
پیشنهاد من سایز 11 هست.
امیدوارم مورد استفاده دوستان قرار بگیره.
سلام
مدت زیادی بود نوشته بودمش و داشت اون گوشه های هارد خاک می خورد
گفتم یه دستی به سرش بکشم بزارم رو تاقچه برنامه نویس شاید به درد خورد...
لینک دانلود
لطفا از فضای خود این سایت استفاده کنید برای آپلود فایل.
هیچ کدام از فایلها از سایت http://parsaspace.com دانلود نمیشوند.
سلام
این بار اومدم یه نرم افزار جدید فلفلی رو بهتون معرفی کنم که می تونه بینهایت یاداشت های مهمتون رو بدون محدودیت براتون ذخیره کنه
برپایه فایل متنی کار میکنه
البته قصد اولم این بود که با رجیستری باشه ولی وسط راه به یه مشکل کوچیک خوردم و تصمیمم عوض شد
فکر کنم ساده تر از این نمیشه ها...
دانلود سورس برنامه دفترچه یاداشت
با تشکر
Eagle computer
با اين برنامه مي تونيد خيلي راحت آلبوم عكس داشته باشيد و اونها رو با موضوعات مختلف تو پايكاه داده ذخيره كنيد. از اين لينك بگيريدش :http://www.4shared.com/file/76507335...9/ImageDB.html
سلام اين لينكش مشكل داره لطفاً لينك ديگه اي بدين لازم دارم
این هم یک LED Table زیبا وجالب:
http://www.4shared.com/file/8TKW6Jl5/LEDTable.html
سلام.یه سورسی بود مربوط به یاهو.کارش این بود که پی ام میفرستاد به این صورت که وقتی Hi رو انتخاب میکردیم با شکلک ستاره Hi رو درست میکرد و میفرستاد یا با شکلک گل عکس قلب رو درست میکرد و واسه اون ادلیستی که مشخص کرده بودیم میفرستاد.آخرش همه نوشته میشد barnamenevis.org.هرچی گشتم تو سایت پیداش نکردم.ممنون میشم اگه کسی داره بزاره.
یک مثال برای کار با اسپریت ها و نیز چرخش شی با توجه به مکان موس: