صفحه اصلی سایت | صفحه اصلی انجمنها | قوانین سایت | ارسال ترفند | تبلیغات | تماس با ما
انجمن های تخصصی ترفندستان |‌ Tarfandestan Forums

     

 


اطلاع رسانی

ارسال موضوع جدید  پاسخ
لینک تاپیک ابزارهای تاپیک نحوه نمایش
ساخت یک برنامه به ظاهر ساده
 
 
MirHossein MirHossein آنلاین نیست.
(Nervy سابق)
امتیاز: 10,174, درجه: 30
امتیاز: 10,174, درجه: 30 امتیاز: 10,174, درجه: 30 امتیاز: 10,174, درجه: 30
درجه بالاتر: 38%, 376 امتیاز مورد نیاز
درجه بالاتر: 38% درجه بالاتر: 38% درجه بالاتر: 38%
فعالیت: 1.6%
فعالیت: 1.6% فعالیت: 1.6% فعالیت: 1.6%
اهدای امتیاز به این کاربر

تاریخ عضویت: Jun 2009
محل سکونت: تهران ↓
پست ها: 460
تاپیک ها: 67
Nokia-6300
NOD32 Opera Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-128 Kb/S

سپاس ها: 520
سپاس شده 717 بار در 244 پست
مطالب وبلاگ: 46
 
9 November 2009
 امتیاز:     
1 (#)  
 
سلام دوستان
در نوشتن یک برنامه بهمشکلی برخوردم
توی این برنامه نیاز داریم به اینکه اعداد 0 تا 15 را به هم ریخته به ما بدهد
و هربار که اجرا میشه اعداد متفاوت باشد (randomize timer )
در ضمن اعداد در یک ارایه ذخیره بشه مثلا arra(0 to 15)

هر مدل که کمکم کنید ممنونتون میشم ولی نوشتن کدش خیلی بهتره

.
.

جوری زندگی‌ می‌کنم که انگار می‌میرم صبح
ظهر محشرم. جواهر رو ول کن من خود معدنم
 
 
پاسخ با نقل قول
 
کاربر ذیل به علت این پست مفید از MirHossein تشکر کرده است:
pesare shoja (12 November 2009)
 
behroz1992 behroz1992 آنلاین نیست.
امتیاز: 15,172, درجه: 37
امتیاز: 15,172, درجه: 37 امتیاز: 15,172, درجه: 37 امتیاز: 15,172, درجه: 37
درجه بالاتر: 41%, 478 امتیاز مورد نیاز
درجه بالاتر: 41% درجه بالاتر: 41% درجه بالاتر: 41%
فعالیت: 0%
فعالیت: 0% فعالیت: 0% فعالیت: 0%
اهدای امتیاز به این کاربر

تاریخ عضویت: May 2009
محل سکونت: مازندران
سن: 19
پست ها: 782
تاپیک ها: 92
SonyEricsson-K800
Avira Firefox Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-64 Kb/S

سپاس ها: 166
سپاس شده 827 بار در 407 پست
behroz1992 به  ICQ ارسال پیام behroz1992 به MSN ارسال پیام behroz1992 به Yahoo ارسال پیام فرستادن پیام با Skype به behroz1992
 
10 November 2009
 امتیاز:     
2 (#)  
 
دوست عزیز بیبین این برنامه بدردت میخوره:
کد:
Private Sub Timer1_Timer()
Dim a(15) As Integer
Dim c As Integer
For k = 0 To 15
c = (Rnd * k)
Next
Print c
End Sub

IP YOU




 
 
پاسخ با نقل قول
 
2 کاربر ذیل به علت این پست مفید از behroz1992 تشکر کرده اند:
MirHossein (11 November 2009), pesare shoja (12 November 2009)
 
MirHossein MirHossein آنلاین نیست.
(Nervy سابق)
امتیاز: 10,174, درجه: 30
امتیاز: 10,174, درجه: 30 امتیاز: 10,174, درجه: 30 امتیاز: 10,174, درجه: 30
درجه بالاتر: 38%, 376 امتیاز مورد نیاز
درجه بالاتر: 38% درجه بالاتر: 38% درجه بالاتر: 38%
فعالیت: 1.6%
فعالیت: 1.6% فعالیت: 1.6% فعالیت: 1.6%
اهدای امتیاز به این کاربر

تاریخ عضویت: Jun 2009
محل سکونت: تهران ↓
پست ها: 460
تاپیک ها: 67
Nokia-6300
NOD32 Opera Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-128 Kb/S

سپاس ها: 520
سپاس شده 717 بار در 244 پست
مطالب وبلاگ: 46
 
12 November 2009
 امتیاز:     
3 (#)  
 
این روش کاملا اشتباه است

یه خورده مسعله رو باز تر میکنم شاید بتونین کمکم کنید(خدایا یعنی میشه)
من یه ارایه 15 تایی دوبعدی دارم که توی اون برنامه نیاز هست که بهم بریزه
حالا چطور باید این کار رو کرد؟؟؟
با تشکر

.
.

جوری زندگی‌ می‌کنم که انگار می‌میرم صبح
ظهر محشرم. جواهر رو ول کن من خود معدنم
 
 
پاسخ با نقل قول
 
کاربر ذیل به علت این پست مفید از MirHossein تشکر کرده است:
pesare shoja (12 November 2009)
 
HvPc HvPc آنلاین نیست.
امتیاز: 4,309, درجه: 19
امتیاز: 4,309, درجه: 19 امتیاز: 4,309, درجه: 19 امتیاز: 4,309, درجه: 19
درجه بالاتر: 15%, 341 امتیاز مورد نیاز
درجه بالاتر: 15% درجه بالاتر: 15% درجه بالاتر: 15%
فعالیت: 0%
فعالیت: 0% فعالیت: 0% فعالیت: 0%
اهدای امتیاز به این کاربر

تاریخ عضویت: Sep 2009
محل سکونت: ايران سراي من است
پست ها: 226
تاپیک ها: 82
SonyEricsson-C905
Kaspersky Opera Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-1 Mb/S

سپاس ها: 494
سپاس شده 138 بار در 101 پست
 
15 November 2009
 امتیاز:     
4 (#)  
 
منظور ت از 2 بعدی 3 در 5 هست
یعنی
3,5
یا
15و15
 
 
پاسخ با نقل قول
 
 
HvPc HvPc آنلاین نیست.
امتیاز: 4,309, درجه: 19
امتیاز: 4,309, درجه: 19 امتیاز: 4,309, درجه: 19 امتیاز: 4,309, درجه: 19
درجه بالاتر: 15%, 341 امتیاز مورد نیاز
درجه بالاتر: 15% درجه بالاتر: 15% درجه بالاتر: 15%
فعالیت: 0%
فعالیت: 0% فعالیت: 0% فعالیت: 0%
اهدای امتیاز به این کاربر

تاریخ عضویت: Sep 2009
محل سکونت: ايران سراي من است
پست ها: 226
تاپیک ها: 82
SonyEricsson-C905
Kaspersky Opera Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-1 Mb/S

سپاس ها: 494
سپاس شده 138 بار در 101 پست
 
15 November 2009
 امتیاز:     
5 (#)  
 
من یکی برات نوشتم اون چیزی که من متوه شدم اگه میتونی بیشتر توضیح بده و کامل آرایه .

این قسمت در بخش جنرال بنویس
کد:
Dim HvP(1 To 15) As Byte
یه لیست باکس هم به فرمت اضافه کن
کد:
    Dim H As Byte
    Randomize Timer
    List1.Clear
    For H = 1 To 15
        HvP(H) = Int(Rnd * 15)
        List1.AddItem HvP(H)
    Next
 
 
پاسخ با نقل قول
 
2 کاربر ذیل به علت این پست مفید از HvPc تشکر کرده اند:
behroz1992 (15 November 2009), MirHossein (19 November 2009)
 
MirHossein MirHossein آنلاین نیست.
(Nervy سابق)
امتیاز: 10,174, درجه: 30
امتیاز: 10,174, درجه: 30 امتیاز: 10,174, درجه: 30 امتیاز: 10,174, درجه: 30
درجه بالاتر: 38%, 376 امتیاز مورد نیاز
درجه بالاتر: 38% درجه بالاتر: 38% درجه بالاتر: 38%
فعالیت: 1.6%
فعالیت: 1.6% فعالیت: 1.6% فعالیت: 1.6%
اهدای امتیاز به این کاربر

تاریخ عضویت: Jun 2009
محل سکونت: تهران ↓
پست ها: 460
تاپیک ها: 67
Nokia-6300
NOD32 Opera Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-128 Kb/S

سپاس ها: 520
سپاس شده 717 بار در 244 پست
مطالب وبلاگ: 46
 
19 November 2009
 امتیاز:     
6 (#)  
 
سلام ببخشید یه مدت نبودم
دوست عزیز شما هر جور که میتوننید کد بنویسید
اعداد 0 تا 15 رو نامنظم بچینه
و اصلا هم تکراری نباشه
ممنونم

.
.

جوری زندگی‌ می‌کنم که انگار می‌میرم صبح
ظهر محشرم. جواهر رو ول کن من خود معدنم
 
 
پاسخ با نقل قول
 
 
HvPc HvPc آنلاین نیست.
امتیاز: 4,309, درجه: 19
امتیاز: 4,309, درجه: 19 امتیاز: 4,309, درجه: 19 امتیاز: 4,309, درجه: 19
درجه بالاتر: 15%, 341 امتیاز مورد نیاز
درجه بالاتر: 15% درجه بالاتر: 15% درجه بالاتر: 15%
فعالیت: 0%
فعالیت: 0% فعالیت: 0% فعالیت: 0%
اهدای امتیاز به این کاربر

تاریخ عضویت: Sep 2009
محل سکونت: ايران سراي من است
پست ها: 226
تاپیک ها: 82
SonyEricsson-C905
Kaspersky Opera Windows-7 IR-TCI
نوع و سرعت اینترنت:
ADSL-1 Mb/S

سپاس ها: 494
سپاس شده 138 بار در 101 پست
 
20 November 2009
 امتیاز:     
7 (#)  
 
خوب من اینو نوشتم

عدد تکراری نمیده

اول کد زیر رو تو قسمت جنرال کپی کن
کد:
Dim HvP(1 To 15) As Byte
یه لیست باکس اضافه کن به فرمت

و این کد رو در فرم لود کپی کن و برنامه رو اجرا کن
کد:
    Dim H As Byte
    hp = 0
    hsa = 0
    Randomize Timer
    List1.Clear
    For hmv = 1 To 15
    HvP(hmv) = 16
    Next
Do While List1.ListCount <> 15
        Hv = Int(Rnd * 16)
        Refresh
        For ha = 1 To 15
        If Hv <> HvP(ha) Then hp = hp + Val(1)
        Next
        If hp = 15 Then
        hsa = hsa + Val(1)
        HvP(hsa) = Hv
        List1.AddItem HvP(hsa)
        End If
        hp = 0
Loop
 
 
پاسخ با نقل قول
 
کاربر ذیل به علت این پست مفید از HvPc تشکر کرده است:
MirHossein (22 November 2009)
پاسخ

اضافه کردن این تاپیک به یک سایت اشتراک‏گذاری لینک

برچسب ها
یک, به, برنامه, ساخت, ساده, ظاهر


کاربران در حال دیدن موضوع: 1 نفر (0 عضو و 1 مهمان)
 
ابزارهای تاپیک
نحوه نمایش

مجوز های ارسال و ویرایش
شما نمیتوانید موضوع جدیدی ارسال کنید
شما امکان ارسال پاسخ را ندارید
شما نمیتوانید فایل پیوست در پست خود ضمیمه کنید
شما نمیتوانید پست های خود را ویرایش کنید

BB code is فعال
شکلک ها فعال است
کد [IMG] فعال است
کد HTML غیر فعال است
Trackbacks are غیر فعال
Pingbacks are غیر فعال
Refbacks are فعال

انتخاب سریع یک انجمن

موضوعات مشابه
موضوع ارسال کننده تاپیک انجمن پاسخ ها آخرین نوشته
يك پيشنهاد خوب dragon_boy نظرات و پیشنهادات 19 7 September 2011 11:54 AM
ترينر برا Prince Of Persia : The Two Thrones مربا بده بابا PC 12 4 September 2010 12:41 PM
کد های تقلب بازی های گوناگون پی اس پی mab کنسول PlayStation 11 7 June 2010 11:11 PM
مقالات آموزشی فارسی ... nextslit مقالات اینترنت و شبکه 240 3 July 2009 01:28 PM
درخواست تحقیق """""" موضوع : تشریح اصل استقلال امضائات Hamzeh_rfj مسائل متفرقه 7 14 February 2009 03:31 PM


اکنون ساعت 02:57 PM برپایه ساعت جهانی (GMT - گرینویچ) +4.5 می باشد.
Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2012, vBulletin Solutions, Inc.


کلیه حقوق مادی و معنوی مربوط و متعلق به وب سایت ترفندستان است.
برداشت مطالب در نشریات، سایت‏ها و وبلاگ‏ها تنها با ذکر نام ترفندستان مجاز است.
هر گونه استفاده تجاری از ترفندهای ترفندستان به صورت کتاب، کتابچه، جزوه، دست‏نویس، CD و DVD و نظایر آن به هر شکل و نحو کاملاً ممنوع می‏باشد و هر گونه تخلف پیگرد قانونی دارد.
واژه «ترفندستان» برای اولین بار در ادبیات فارسی توسط وب‏سایت ترفندستان ابداع شده است و سایت‏ها و وبلاگ‏ها با نام مشابه هیچ ارتباطی با این سایت ندارند.
پشتیبانی و میزبانی توسط HostDL