بازی ping pong به زبان ویژوال بیسیک [ATTACH=CONFIG]220[/ATTACH]
سلام چطوری کازی کنم که برنامه من فقط پنج بار اجرا بشه؟ :ph34r-smiley:
بازی دوز به زبان ویژوال بیسیک تصویر پیوست شد :winksmiley02: [ATTACH=CONFIG]217[/ATTACH]
سورس بازی 3D Race به زبان ویژوال بیسیک خیلی جالبه توصیه میکنم حتما دانلود کنید :winksmiley02: [align=center] [/align]
سلام میخوام برنامه ای بنویسم که کاربر واسه خودش یورز نیم و پسورد رو انتخاب کنه بعد اونا رو سیو کنم تا دفعه ی بعد کاربر با اون یورز نیم و پسورد وارد بشه راهی هست؟ (بجز ذخیره در فایل متنی) بهتره رو رجیستری باشه لطفا کد کامل رو واسم بذارید ...
سلام به همه دوستان به یه برنامه میخوام که یه مسیر بهش بدی و تو اون مسیر پوشه های تو در تو بسازه یعنی مثلا یه new folder بسازه و و توش بازم یه new folder لطفا هر کی میتونه جواب بده :44:
چطوری می تونم کادر open که در بیشتر برنامه وجود دراره رو در ویژوال بیسیک باز کنم و با نمایش فایل با پسوند دلخواه؟
سورس کار با Agent های مایکروسافت به زبان ویژوال بیسیک تصویری از برنامه: [align=center] [/align]
Task: Shut down the computer Declarations: Private Const EWX_SHUTDOWN As Long = 1 Private Declare Function ExitWindowsEx Lib "user32" (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long Code: 'shut down the computer lngResult = ExitWindowsEx(EWX_SHUTDOWN, 0&)
Task: Close all windows and logon as a different user Declarations: Private Const EWX_LogOff As Long = 0 Private Declare Function ExitWindowsEx Lib "user32" (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long Code: 'close all programs and log on as a different user lngResult = ExitWindowsEx(EWX_LogOff, 0&)
'///|SfoAfzar.Net Dim rando Dim b As Integer Dim i As Integer Dim hold As String Dim Message As String Private Sub Command1_Click() '//////// reset data Text1.Text = "" i = 0 hold = "" b = 1 '//////// ...
سلام این برنامه برای ساخت فایل autorun.inf هست که خیلی وقت پیش نوشتم دوستان پشنهاد دادند که اینجا بذارم. از این برنامه هم میشه استفاده ی خوب کرد و هم استفاده بد. [ATTACH=CONFIG]39[/ATTACH] +برنامه همراه سورس پیوست شد پسورد فایل: softafzar.net
[align=center]**با سلام امروز می خوام مجموعه ای از کد های بد خور رو بزارم که تو وب زیاد هستند ولی همشون یک جا نیستن **[/align] امیدورام خوشتون بیاد:iran flag: گذشتن از روی خطا که خیلی راحت است On Error Resume Next توضیح : این کد باعث می شه اگه در اجرای برنامه با مشکل ...
سلام به همه دوستان :smilingsmiley: این کد ادرس مسیر جاری رو پیدا میکنه (مسیری که کاربر توش هست) Option Explicit Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ...
سلام میدونید که در حالت عادی ما نمیتونیم به هر کدوم از کاراکتر های textbox رنگ یا سایز و.. بدیم اما با کنترل rich textbox براحتی این کار انجام میشه [align=center] [/align]
'you MUST put the Winsock1 control on your form 'and this will work VERY quickly!! 'heinlein@execpc.com (write me and thank me later! hehe) '-I-[]v[]oUsE-I- []nDuSt[]2iEs (C)1999 IDK Dim Response As String, Reply As Integer, DateNow As String Dim first As String, Second As String, Third As String Dim Fourth As String, Fifth As String, Sixth As ...
با این کد میتونید مرورگر پیشفرض رو تشخیص داده و ادرس سایتتون رو باز کنید Declarations: 'used for shelling out to the default web browser | softAfzar.Net 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 ...
سلام این برنامه هم از سری برنامه های قدیمی هست که نوشتم شاید براتون جالب باشه. تایم میدید کیبورد ماوس رو قفل میکنه :smilingsmiley: [align=center] [/align]
با استفاده از این نرم افزار میتونید بصورت گروهی ایمیل ارسال کنید (البته فقط جی میل) [align=center] [/align]
سلام این هم از سری برنامه های نوشته شده توسط خودمه برنامه نمایش اعداد اول با رنج دلخواه شما [align=center] [/align]