مشاهده نسخه کامل
: سر ريز شدن اين برنامه ( مربوط به Vb )
Bad.Sector
10-06-2006, 02:41
دوستان من اين برنامه رو درست كردم ولي در خط 7 خطاي سر ريز شدن ميده(البته مي دونم قاعدتا بايد اينجوري بشه به هر حال چون اين كد گويا تر از 50 خط توضيح فكر كردم همين كد و بزارم)
حالا چكار كنم. فقط نگين دستي بايد همه چي رو حساب كرد :sad:
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
A_M_IT2005
10-06-2006, 11:11
سلام
من نمی فهمم خط ششم چیکار میکنه.
من سورس شمارو به این شکل تغییر دادم (با اجازه)
-----------------------------------------------------------
Private Sub Command1_Click()
Dim Code As Double
UserName = Text1.Text
Code = 1
For i = 1 To Len(UserName)
Code = Code * Asc(Mid(UserName, i, 1))
Next i
Code = Code
Text2.Text = Code
End Sub
----------------------------------------------------------
برای بهره مند شدن از کمک بیشتر لطفا خط شش رو توضیح بده. :biggrin:
Bad.Sector
10-06-2006, 14:19
اون خط 6 نمي خام حذف شه مهمه
AND يه عملگر بيتيه ديگه
مثلا براي دو عدد 23 و 39
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
code برابر 7 مي شه
اينم به صورت بيتي
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
1 در 1 مي شه 1
0 در 0 و 0 در 1 هم مي شه 0
نمي خوام خودم حساب كنم، اگه راهي، تابعي،ميونبري چيزي كه راحت بشه اين حالت رو حساب كرد،
خيلي ممنونت مي شم اگه راهنماييم كني
vBulletin , Copyright ©2000-2024, Jelsoft Enterprises Ltd.