زنگ تفریح
این بار یه مطلب جدید به عنوان زنگ تفریح!!!!!
بازی طناب را ببر(Cut The Rope)یه بازی فکری برای گوشی های هوشمند است.
ولی این بار نسخه ی آنلاین بازی رو تجربه کنید.
![]()
این بار یه مطلب جدید به عنوان زنگ تفریح!!!!!
بازی طناب را ببر(Cut The Rope)یه بازی فکری برای گوشی های هوشمند است.
ولی این بار نسخه ی آنلاین بازی رو تجربه کنید.
![]()
اگه دیده باشید شکل فرم در VB.net همیشه به صورت یه مستطیله(مثل شکل زیره).و با کدنویسی نمیشه شکلشو عوض کرد!(یعنی نمیشه مثلا به شکل دایره دراورد.)اگه شما هم میخواهید این ترفند رو یاد بگیرید.به ادامه مطلب بروید.
این برنامه رو چند روز پیش نوشته ام.برای دانلود به ادامه بروید.
راهنمایی:با Picturebox و Imagelist نمیشه!
شاید دیده باشید که اگه یه کدی بنویسید که غلط باشه برنامه ارور میده و بسته میشه (مثلا دستور پخش آهنگی بدیم که وجود نداشته باشه)خب اگه بخوایم اون خطا رو نادیده بگیره و رد بشه(یعنی برنامه بسته نشه) باید چکار کنیم؟
به ادامه بروید
?
1-فرق Textbox و Richtextbox در چیست؟
2-برای پاک کردن فایلی به نام abc با هر فرمتی از کدام دو تابع زیر استفاده می کنیم؟چرا؟
راهنمایی:هر دو تابع زیر برای پاک کردن یک فایل است.(در هر دو تابع مسیر فایل باید بصورت رشته باشد).
My.Computer.FileSystem.DeleteFile("abc.*")
Kill("abc.*")

.
.
.
next
شاید شما هم دیده باشید که اگه توی VB یه حلقه ی بزرگ رو بذارین هنگ میکنه و Not Responding میده برای حل این مشکل چندین راه وجود داره که هر کدوم یه سری مشکلات دارن:
1-استفاده از تایمر به جای حلقه,مشکل:سرعت تایمر خیلی پایین تر از حلقه است.ولی به هیچ وجه هنگ نمیکنه.
2-استفاده از Thread,مشکل:یادگرفتن و نوشتنش خیلی سخته.
3-استفاده از کلک:این روش فکر کنم بهترین روشه.همیشه کلک زدن جواب میده!!!!
حالا این کلک رو توضیح میدم:
خیلی آسونه کافیه در حلقه ی خود این کد رو وارد کنید.
Application.DoEvents
و تمام ...
حلقه قفل نمیکنه و شما تا پایان کار حلقه میتونین از برنامه استفاده کنید.
امیدوارم خوشتون اومده باشه.

مشکل قطعه کد چیست؟چرا همیشه مقدار 1 را چاپ می کند؟چرا به مقدارش اضافه نمی شود؟؟؟
Public Class Form1
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a
a = a + 1
(Msgbox(a
End Sub
End Class
مهلت پاسخ گویی به پایان رسید همونطور که یکی از دوستان گفت, در واقع چون متغیر بصورت محلی است هر بار با اجرای قطعه کد متغیر مقدار صفر می گیرد و بعد بعلاوه ی 1 می شود و دوباره صفر می شود.

مشکل قطعه کد زیر چیست؟؟؟؟؟؟؟؟
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
My.Computer.Audio.Play("d:\Music\music.mp3")
End Sub
End Class
فرض:فرض می کنیم در مسیر تعیین شده یک آهنگ Mp3 هست.خب پس چرا این آهنگ را پخش نمی کند؟
راهنمایی:این کد را در ویژوال بیسیک دات نت اجرا کنید و ببینید چه اروری میده؟؟؟
پاسخ:شما نمیتونین از طریق این کد آهنگ با فرمت mp3. رو پخش کنین این کد فقط برای پخش Wav. هست!
در این بخش آموزش کدنویسی در ماکرو رو یاد میدم....
کارهایی که میشه با macro انجام داد که همه رو یاد میدم:
تغییر دسته جمعی انیمیشن های اسلایدها(مثلا 100 اسلاید با هم)
اجرای برنامه ای در حین نمایش اسلاید
پرینت گرفتن از هر صفحه ای که دوست دارید در حین نمایش اسلاید
ایجاد 10000 تا اسلاید(یا بیشتر) به صورت یک جا
و ....
چیزهایی که نیاز دارید:
آفیس(ورژن مهم نیست!!)
آشنایی با VB 6.0(مثلا باید بلد باشید حلقه بنویسید.)
اگر مشخصات بالا را دارید برای آموزش به ادامه بروید.

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

برای دانلود و مشاهده ی اطلاعات بیشتر به ادامه بروید: