View Full Version : یک سوال کوچیک از دوستان برنامه نویس
photolady
شنبه 24 فروردین 1392, 21:32 عصر
سلام دوستان . سوالم اینه که
برنامه ای که دو عدد را از ورودی خوانده و حاصلضرب دو عدد را بدون استفاده از عملگر ضرب نمایش دهد ؟؟
من یه کامپوننت ms flex grid توی صفحه ی کار وی بی گذاشتم و بعد روی اون ، این کد رو نوشتم ولی دلیلشو نمیدونم که چرا درست خطا میده .:اشتباه:
Private Sub MSFlexGrid1_Click()
For i = 1 To 10
For j = 1 To 10
MSFlexGrid1.Row = i
MSFlexGrid1.Col = j
MSFlexGrid1.Text = i * j
Next i.j
End Sub
میشه اینو هم بگید که من توی فرم به غیر از کنترل MSFlexGrid چه کنترل دیگه ای هم قرار بدم ؟
h_a_m_i_d
شنبه 24 فروردین 1392, 21:53 عصر
Private Sub MSFlexGrid1_Click()
For i = 1 To 10
For j = 1 To 10
MSFlexGrid1.Row = i
MSFlexGrid1.Col = j
MSFlexGrid1.Text = i * j
Next
next
End Sub
دوست عزیز اینو بزن ببین درست میشه
photolady
شنبه 24 فروردین 1392, 22:01 عصر
راستش اینو هم تست کرده بودم ولی جواب نداد .:افسرده:
h_a_m_i_d
شنبه 24 فروردین 1392, 22:08 عصر
من کامپوننتش رو ندارم رو ویژوال استادیوم (تو choose ithemam نیست البته :بامزه:)
مگرنه نمونه کد بهتون میدادم
چون توضیح دادنم خیلی داغونه اکثر مواقع سورس میذارم:لبخند:
بازم یک سرچ میکنم ببینم میتونم کامپوننت رو گیر بیارم
میشه سورس خودتونو بذارید
zahedi121
یک شنبه 25 فروردین 1392, 00:25 صبح
سلام
عدد را بدون تغییر دارید داخل تکست میریزید !
Private Sub MSFlexGrid1_Click()
For i = 1 To 10
For j = 1 To 10
MSFlexGrid1.Row = i
MSFlexGrid1.Col = j
MSFlexGrid1.Text =cstr( i * j)
Next j
next i
End Sub
ولی این چه ربطی به انجام ضرب بدون عملگر ضرب دارد ؟ اگر میخواهید از عملگر ضرب استفاده نکنید ، مثلا برای i*j باید از یک کدی مثل این استفاده کنید :
x=i
for a = 2 to j
i = i + x
next a
اگر بازهم خطا داد یک عکس از خطا بگذارید تا بشه راهنمایی کرد.
موفق باشید
xxnagin
یک شنبه 25 فروردین 1392, 00:36 صبح
سلام
Private Sub MSFlexGrid1_Click()
For i = 1 To 10
For j = 1 To 10
MSFlexGrid1.Row = i
MSFlexGrid1.Col = j
MSFlexGrid1.Text = i * j
Next i.j
End Sub
این کدها برای vb6 هستش بهتر نبود تو تالار خودش سوالتون رو میپرسیدین اینجا vb.net هستش
به همین خاطر دوستان درست نتونستن راهنمایت کنن
و دانلود این active x (http://www.ocxdump.com/ocxfiles/M/MSFlexGrid.ocx)
photolady
یک شنبه 25 فروردین 1392, 14:55 عصر
سلام
عدد را بدون تغییر دارید داخل تکست میریزید !
Private Sub MSFlexGrid1_Click()
For i = 1 To 10
For j = 1 To 10
MSFlexGrid1.Row = i
MSFlexGrid1.Col = j
MSFlexGrid1.Text =cstr( i * j)
Next j
next i
End Sub
ولی این چه ربطی به انجام ضرب بدون عملگر ضرب دارد ؟ اگر میخواهید از عملگر ضرب استفاده نکنید ، مثلا برای i*j باید از یک کدی مثل این استفاده کنید :
x=i
for a = 2 to j
i = i + x
next a
اگر بازهم خطا داد یک عکس از خطا بگذارید تا بشه راهنمایی کرد.
موفق باشید
راستش دوست عزیز اینو هم تست کردم ولی هی این خطا رو بهم میده ::ناراحت:
http://https-sock-vpn.persiangig.com/image/mx%20flex%20grid.png102808
فک کنم واسه next j یا next i.j گیر میده چون موقع خطا دادن حرف i.j قسمت next رو انتخاب میکنه و Private Sub MSFlexGrid1_Click رو هم به حالت زرد رنگ که انتخاب میکنه :ناراحت:
خلاصه اگه یه جور دیگه هم امکانش هست کدنویسی بشه ولی با همین کامپوننت MSFlexGrid
میشه خودتون هم تست بکنید ممنون میشم :خجالت:
SlowCode
یک شنبه 25 فروردین 1392, 15:01 عصر
مشکل اینه که جای next i و next j رو اشتباه نوشتی.
جاشون رو عوض کنی درست میشه.
aliphp1
یک شنبه 25 فروردین 1392, 15:10 عصر
شما که از ضرب استفاده کردی دوست عزیز
for( i=1; i>=j)
sum=sum+x
i شمارشگر حلقه
j یکی از اعداد
x یکی دیگر از اعداد
sum حاصل
من کلا vb کار نکردم ولی منطق اینکه بخوای از ضرب استفاده نکنی فکر کنم این باشه
zahedi121
یک شنبه 25 فروردین 1392, 15:34 عصر
راستش دوست عزیز اینو هم تست کردم ولی هی این خطا رو بهم میده ::ناراحت:
http://https-sock-vpn.persiangig.com/image/mx%20flex%20grid.png102808
فک کنم واسه next j یا next i.j گیر میده چون موقع خطا دادن حرف i.j قسمت next رو انتخاب میکنه و Private Sub MSFlexGrid1_Click رو هم به حالت زرد رنگ که انتخاب میکنه :ناراحت:
خلاصه اگه یه جور دیگه هم امکانش هست کدنویسی بشه ولی با همین کامپوننت MSFlexGrid
میشه خودتون هم تست بکنید ممنون میشم :خجالت:
سلام
همانطور که آقا محسن گفتند جای next ها را اشتباه نوشتید!
سوال vb را در انجمن vb.net دارید پیگیری میکنید!
کدی که اول گذاشتید با اینکه الان گذاشتید فرق میکنه!(i-1 , j-1 )
بالاخره هدفتون از این کد چیه ؟ ضرب نمیخواهید استفاده کنید (کدش را نوشتم ) ؟ با حلقه ها مشکل دارید (جای next ها را درست کنید) ؟ قراره این کد چکار انجام بده ؟ بگین راهنمایی راحتره.
موفق باشید .
photolady
یک شنبه 25 فروردین 1392, 22:12 عصر
واقعا که انجمن برنامه نویس انجمن خوبی هستش . چون کاربرانش خیلی فعال هستن . من انتظار این همه جواب رو نداشتم و تجب کردم وقتی اینهمه جواب رو گرفتم . راستش مشکل از همون سمت next هستش و من میرم به قسمت vb و این مشکل رو مطرح میکنم شاید جوابشو بگیرم
بازم خیلی ممنون از همه :بوس::قلب::بوس:
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.