آموزش برنامه نویسی ویژوال بیسیک ساخت ماشین حساب

  • به نام خدا


برای اینکار 4 command لازم است caption ان ها رو به ترتیب (*,-,+,/)بگذارید.


2 textbox هم لازم است که اعدادی که میخواهید جمع وتفریق کنیددر ان ها باید وارد کنیدو label که برای جواب می خواهیم.

خوب حا لا کد نویسی

در command 1 مینویسیم ;که همان * میشود

(label1.caption=val (text1.text)* val (text2.text

 برای کد های بقیه ی command ها همهمین کد ها رو کپی کنید فقط برای هر کدام بجای علامت* علامت مربوطه را جایگزین کنید

موفق باشید

دانلود ویدیو

دانلود سورس کد بیسیک

سورس کدهای آماده بیسک



دانلود فایل



رمزتمامی فایل ها:mohammadniko

ساخت ساعت دیجیتالی با ویژوال بیسیک

به نام خدا

سلام محمد نیکو هستم با آموزش ویژوال بیسیک در خدمت شما

 

برای این کار یک Timer لازم است و Interval اش را 1000 کنید 

حالا کد نویسی اول در Form hdکد را بنویسید

me.backcolor=vbblack

حا لا در Timer این کد را بنویسید.

Form1.Refresh
X = Form1.Width / 2
Y = Form1.Height / 2.2
Circle (X, Y), Y - 200, vbWhite
Circle (X, Y), Y - 220, vbWhite
For i = 1 To 12
Circle (X + (Y - 400) * Cos(i * 22 / 42), Y + (Y - 400) * Sin(i * 22 / 42)), 50, vbRed
Next
h = Hour(Time())
If h > 12 Then
h = h - 12
End If
m = Minute(Time())
s = Second(Time())
Line (X, Y)-(X + (Y - 600) * Cos((66 / 14 + s * (44 / 420))), Y + (Y - 600) * Sin((66 / 14 + s * (44 / 420)))), vbBlue
Line (X, Y)-(X + (Y - 800) * Cos((66 / 14 + m * (44 / 420))), Y + (Y - 800) * Sin((66 / 14 + m * (44 / 420)))), vbYellow
Line (X, Y)-(X + (Y - 1200) * Cos(66 / 14 + h * (44 / 84) + (m / 12) * (44 / 420)), Y + (Y - 1200) * Sin(66 / 14 + h * (44 / 84) + (m / 12) * (44 / 420))), vbWhite

 

آموزش برنامه نویسی ویژوال بیسیک مد رنگ rgb

دانلود ویدیو

به نام خدا

سلام من محمد نیکو هستم همرا ه شما در آموزش  برنامه نویسی ویژوال بیسیک 6

درس امروز کار کردن با مد رنگ های  مدلVBوRGB هستش

خوب برای این کار یک labelلازم است وبعد داخل labelین کد ها رو می نویسید.

label1.backcolor..vbred

همون طور که میبینید با مدل vb است این کد فقط شما برای ساختن رنگ vb رو مینویسیدو بعد رنگ مورد نظر خود را مینویسید  لازم به ذکر است که با مدل vb نمی نوان رنگ های بسیار استفاده کرد برای همین به مدلrgb این کارو انجام میدیم

(label1.backcolor=rgb(112,212,121

عدد های داخل پرانتز میتواند از 0 تا 255 باشند

موفق باشید