..:: مغز کامپیوتر ::..
کلید رهایی از تاریکی
درباره وبلاگ



مدیر وبلاگ : علی عبدیان
مطالب اخیر
نویسندگان
نظرسنجی
شما بیشتر به چه نوع مطلبی علاقه دارید ؟








یه دونه

 

Name: dial

BorderStyle:Solid

FillStyle:Solid

Shape:Circle

Width: 3495

Height: 3690

 

به فرم اضافه کرده و مشخصاتشو مثل زیر تنظیم کنید: Lineحالا 3تا

 

‘Line1

Name:Second

BorderWidth:3

 

‘Line2

Name: Minutes

BorderWidth:8



ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :

 

به فرمتون اضافه کنین و مشخصاتشو مثل زیر تنظیم کنین:TextBox,CommandButton,DriveListBoxیه دونه

 

 

TextBox:

Name: Txtserial

 

DriveListBox:

Name:D

 

حالا کدای زیر وارد برنامتون کنین:

 

Private Declare Function GetVolumeSerialNumber Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long

Public Function DiscSerialNumber(ByVal RootPath As String) As String

    Dim VolLabel As String

    Dim VolSize As Long

    Dim Serial As Long

    Dim MaxLen As Long

   

ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :

 به فرمتون اضافه کنین وکدای زیررو وارد برنامتون کنین:CommandButtonدو تا دونه


Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

 

 

Sub OpenCDDoor()

 

  mciSendString "Set CDAudio Door Open Wait", 0&, 0&, 0&

 

End Sub



ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :

به فرمتون اضافه کرده و کدهای زیررو وارد فرمتون کنین:Timerیه دونه

 رو برابر1 قرار بدینTimer Intervalتوجه کنین که

 

 

Private 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

 



ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :

ابتدا دو عدد کامند باتون و یک کامند دایلوگ روی فرم قرار داده و کد زیر را در آن کپی کنید

 

Private Type NOTIFYICONDATA
cbSize As Long
hWnd As Long
uId As Long
uFlags As Long
uCallBackMessage As Long
hIcon As Long
szTip As String * 64
End Type

Private Const NIM_ADD = &H0
Private Const NIM_MODIFY = &H1
Private Const NIM_DELETE = &H2

Private Const WM_MOUSEMOVE = &H200
Private Const NIF_MESSAGE = &H1
Private Const NIF_ICON = &H2
Private Const NIF_TIP = &H4

Private Const WM_LBUTTONDBLCLK = &H203 'Double-click
Private Const WM_LBUTTONDOWN = &H201 'Button down
Private Const WM_LBUTTONUP = &H202 'Button up



ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :
آموزش کامل ویژوال بیسیک با مثال در چندین صفحه با توضیحات کامل
برای دیدن متن کامل روی ادامه مطلب کلیک کنید-----------------------------------------------------
مقدمه ؛ (( چگونه یک برنامه بنویسیم و چگونه یک برنامه نویس خوب شویم ؟ ))
چون قصد من آموزش برنامه نویسی شیء گراست و آن هم به آسان ترین روش ( یعنی پرهیز از الگوریتم و فلوچارت ) ، لذا مطالب زیر را به دقت دنبال نمائید ؛
طرح برنامه برای حل مساله :
روش ما در طراحی یک برنامه شامل سه گام اساسی است :
گام اول : تحلیل مساله
گام دوم : طراحی برنامه
گام سوم: به کار گیری و اجرای برنامه ( شامل کد نویسی و برسی اشتباهات و…
ویژوال بیسیک یک زبان شیء گراست و این زبان جزء زبان های گرافیکی ( ویژوال ) محسوب می شود. محیط ویژوال بیسیک نیز ساده است. شما یه راحتی می توانید هر یک از اشیاء موجود را به روی فرم قرار دهید و برای آن هم کد بنویسید. روش کد نویسی نیز به این صورت است که با دابل کلیک کردن بر روی هر شیء شما وارد محل کد نویسی می شوید و می توانید کد دلخواه خود را بنویسید.
برای اینکه یک برنامه نویس خوب هم شوید باید ابتدا مساله را تحلیل کنید ؛ یعنی مثلاً می خواهید یک برنامه بنویسید که دو عدد از کاربر بگیرد و حاصل ضرب آن ها را بگوید ؛
خوب تحلیل این مساله این چنین است :
ما احتیاج به دو کادر Text داریم که کاربر عدد ها را در آن وارد کند ، دو کلید جهت محاسبه و خروج از برنامه و همچنین نوشتن کد صحیح برنامه و اجراء درست آن.
به همین ترتیب شما هم برای نوشتن هر برنامه ای احتیاج به همین کار دارید.
چند اصطلاح در زبان برنامه نویسی ویژوال بیسیک 6 و سایر زبان های برنامه نویسی :
متد : متدها سبب می شوند که شیء کاری انجام دهد.


ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :

خوب حالا نوبتیم كه باشه نوبته ویژوال بیسیكه

می خوایم كه با هم با تابع Msgbox( ) و تابع inputbox( ) به همراه دستور شرطی if و هم چنین عملگر And آشنا شویم.

تابع Msgbox( ): كه كادر پیامی را مانند شكل زیر ظاهر می كند كه شما می توانید آیكون و نوشته و تعداد دكمه های آن را تععین كنید.در واقع فرم تابع msgbox( ) با آرگومان های آن به صورت زیر است:

Intrespose = Msgbox (strprompt,[intstyle],[strtitle] )

تابع msgbox ( ) یك آرگومان اجباری strtprompt)) و دو آرگومان اختیاری (intstyle , strtitle) دارد .از پیشوند نام این آرگومان می توانید حدس بزنید كه نوع آن ها چیست.آرگومان اول پیامی است كه باید كادر پیام نشان دهد و آرگومان دوم تعداد و نوع دكمه های كادر پیام را تعیین خواهد كرد و آرگومان سوم عنوان پنجره كادر پیام خواهد بود .برای فهم بیشتر شما عزیزان یك مثال میزنم كه شكلش هم می توانید مشاهده كنید: یك Command از كنترل ها به صفحه اضافه كنید و روی آن دابل كلیك كنید تا صفحه كد نویسی باز شود و سپس كد های زیر را وارد كنید:

a = MsgBox("خوش آمدید", vbYesNoCancel + vbInformation + vbDefaultButton2, "اطلاعات")

سپس برنامه را به همان روشی كه قبلا گفتم Exe كنید و سپس آن را اجرا كرده و روی Command كلیك كنید تا برنامه اجرا شود شكل این برنامه به صورت زیر است:



ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :
آموزش گام به گام ویژوال بیسیک با سورس هستشدر زیر به اون می پردازم

 

كنترل Command Button : این كنترل كه به آن دكمه فرمان هم میگن برای شروع و یا توقف و یا پایان یك فرایند است.

 

كنترل text : كه برای نوشتن متن در داخل آن به كار می رود.



ادامه مطلب


نوع مطلب : برنامه سازی، 
برچسب ها :
لینک های مرتبط :


( کل صفحات : 4 )    1   2   3   4   
آمار وبلاگ
  • کل بازدید :
  • بازدید امروز :
  • بازدید دیروز :
  • بازدید این ماه :
  • بازدید ماه قبل :
  • تعداد نویسندگان :
  • تعداد کل پست ها :
  • آخرین بازدید :
  • آخرین بروز رسانی :
 
 
 
شبکه اجتماعی فارسی کلوب | Buy Website Traffic | Buy Targeted Website Traffic