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

بستن ریجستری

بعضی از برنامه ها این کار را انجام می دهند ولی برای بستن ریجستری بدون برنامه گزينه Run را از منوي Start انتخاب كنيد. سپس در آن Gpedit.msc را تايپ كرده و Ok كنيد . در پنجره ظاهر شده مسير زير را دنبال كنيد :

user configuration > administrative templates > system

حال در سمت راست روي گزينه prevent access to registry editing tools دابل كليك كنيد و در پنجره اي كه باز مي شود گزينه Enable را فعال كرده و Ok كنيد . حال ریجستری ویندوز بسته شده است . می توانید امتحان کنید .

باز کردن ریجستری

برای باز کردن ریجستری و از بین بردن قفل آن مراحل ذکر شده را می روید و اين بار به جاي Enable گزينه Disableرا برگزينيد و Ok بزنید . حال ریجستری شما باز شده و قابل اجراست.

سلام

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

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

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Command1_Click()
ShellExecute hwnd, "open", "http://programming..ir/", vbNullString, vbNullString, conSwNormal
End Sub

Private Sub Form_Load()
Command1.Caption = "Open My blog"
End Sub

یک برنامه ساده برای مبتدیان

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

کافیه مسیر مورد نظرتون از رجیستری رو به تابع زیر بفرستید تا برنامه Regedit در
اون مسیر باز بشه.

طرز کار این تابع اینجوریه که مسیر ورودی رو به عنوان آخرین مسیر بازدید شده
توسط Regedit ، در رجیستری

ذخیره میکنه و سپس برنامه رو صدا میزنه.

Sub RegJump(regKeyStr As String)
 Dim RegObj
 Set RegObj = Create("W.Shell")
 Call RegObj.RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\
 CurrentVersion\Applets\Regedit\LastKey", regKeyStr, "REG_SZ")
 RegObj.Run ("regedit")
 Set RegObj = Nothing
End Sub

 بسم الله الرحمن الرحیم

برای ساخت این برنامه ابتدا یک Form ایجاد کرده .

سپس از جعبه ابزار یک کنترل PictureBox و یک Command برروی Form قرار دهید .

نام PictureBox را Pic و command را cmdCls قرار دهید .

حال کد زیر را به برنامه اضافه کنید .

Dim XX, YY

Private Sub cmdCls_Click()
pic.Cls
End Sub

Private Sub pic_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
XX = X
YY = Y
End Sub

Private Sub pic_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
pic.Line (XX, YY)-(X, Y)
XX = X
YY = Y
End If
If Button = 2 Then
pic.Line (XX, YY)-(X, Y)
pic.ForeColor = RGB(0, Rnd * 255, 0)
End If
End Sub

موفق باشید

از منوی start و در کادر run تایپ کنیدregedit  و بعد در مسیر HKEY_CLASSES_ROOT > Inkfile  رفته و پارامترis shortcut را به  is shortcutnot  را تغییر نام دهید

آيكون هاي روي دسكتاپ رو مخفي و ظاهر كنيد

کد زیر با ویژوال بیسیک 6 می تواند ایکون های دسکتاپ را مخفی و نشان داد.

کد زیر را در قسمت general    نوشته

Option Explicit
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long

بعد سهتا كامند براي ظاهر كردن آيكون ها مخفي كردن آنها و خروج از فرم را روی فرم قرار دهید

هر کد را در جای خود قرار دهید 

کامند مخفی کردن  
Private Sub cmdDHide_Click()
Dim hWnd As Long
hWnd = FindWindowEx(0&, 0&, "Progman", vbNullString)
ShowWindow hWnd, 0
End Sub'--------------------------------

کامند نشان دادن

Private Sub cmdDShow_Click()

Dim hWnd As Long
hWnd = FindWindowEx(0&, 0&, "Progman", vbNullString)
ShowWindow hWnd, 5
End Sub'---------------------------------

کامند خروج
Private Sub cmdExit_Click()
Me.Hide
End

End Sub'-------------------------------------

قفل کردن موس در سر جای خود

1 کد زیر را درقسمت  general نوشته

Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

2 کد زیر را در قسمتload form نوشته یا بر روی یک command  نوشته

  DoEvents

  BlockInput True      'True=1

  Sleep 10000

  BlockInput False     'False=0

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

همكاران سيستم- تخصص برنامه​نویس نوشتن برنامه یا نرم افزار کامپيوتری است. برنامه نویس پس از تحلیل مسئله ای که قرار است برنامه حلش کند، حل مسئله را  با الگوریتم‌های منطقی و با یک زبان صوری برای کامپیوتر تعریف می‌کند. میزان پیچیدگی برنامه‌ای که یک برنامه​نویس می‌نویسد، بسته به نوع کاربرد متفاوت است. به عنوان مثال دستورالعمل‌های برنامه‌ای که تاریخ شمسی را به میلادی تبدیل می‌کند، با دستورالعمل‌های برنامه‌ای که قرار است محیط درون هواپیما را برای یک خلبان تازه​کار شبیه‌سازی کند بسیار متفاوت است. با اینکه ممکن است در چند ساعت یک برنامه را نوشت، ساخت بعضی نرم‌افزارها می‌تواند  بیش از یک سال طول بکشد. برنامه‌نویس را با نام زبانی که در آن مهارت دارد، مثلا برنامه‌نویس جاوا یا نوع کار یا محیطی که در آن کار می‌کند، مثلا برنامه‌نویس پایگاه داده و برنامه‌نویس وب می‌شناسند.

پس از اینکه  برنامه‌نویسِ سرپرست یا تحلیلگر سیستم، طرح کلی برنامه را مشخص کرد و مرحله  طراحی برنامه تمام شد، نوبت به برنامه​نویس می‌رسد تا این طرح را به دستورالعمل‌ها و کدهایی تبدیل کند که برای کامپیوتر قابل فهم باشد. پس از نوشتن برنامه،  برنامه‌نویس نتایج را آزمایش می‌کند تا ببیند برنامه همان کاری را که قرار بوده انجام داده یا خیر. به اين ترتيب اشکالات برنامه مشخص می‌شوند. در مرحله رفع خطا  که گاه بیش از نوشتن برنامه اصلی زمان می‌برد، برنامه‌نویس اشکالات برنامه را رفع می‌کند و  با ایجاد تغییرات لازم از صحت کار برنامه‌اش اطمینان پیدا می‌کند. بعد از اینکه کدهای برنامه نوشته شد، اشكالات رفع شد و آزمایش نهايي انجام گرفت، این کدها به‌صورت یک بسته نرم‌افزاری در قالب یک سی دی یا دی وی دی به‌صورت آنلاین در دسترس مشتری قرار می‌گیرد. وظیفه نگهداری برنامه​نویس پس از نوشتن کد اصلی برنامه شروع می‌شود و شامل به روزرسانی، تعمیر، اصلاح و گسترش برنامه های موجود است. 

برنامه​نویس بسته به کارکرد برنامه از زبان‌های برنامه‌نویسی متفاوتی در کارش بهره می‌برد، برای مثال از زبان سی پلاس پلاس برای نوشتن برنامه‌های تجاری و صنعتی استفاده می‌کنند. برنامه نویسان برنامه‌های تحت وب با  زبان‌های جاوا و پی اچ پی راحت‌ترند. برنامه​نویس معمولا بیش از یک زبان برنامه​نویسی می‌داند و به دلیل شباهت زیاد این زبان‌ها به هم، یادگیری زبان دوم برای یک برنامه​نویس کار چندان سختی نیست. برنامه‌نویسی ترکیبی از علم و فن و هنر است و  قدرت تحلیل قوی، روحیه کار تیمی و  ارتباط کلامی خوب برای یک برنامه‌نویس ضروری است. جالب است بدانید که دولت روسیه روزی را به نام روز برنامه‌نویس در كشور خود تعطیل رسمي اعلام كرده است.