يه سوال ساده

واضح آرشیو وب فارسی:سایت ریسک: View Full Version : يه سوال ساده homa m09-05-2008, 05:01 PMبنظرتون فرق اين دو تا برنامه چيه هر دو تاشم اجرا ميشن :1) Private Sub Form_Click() Cls Dim a As Integer, b As Integer a = Text1.Text b = Text2.Text c = a + b Print c End Sub Private Sub Form_DblClick() Cls Dim a As Integer, b As Integer a = Text1.Text b = Text2.Text c = a * b Print c End Sub -------------------------------------------------------------------- :2) Private Sub Form_Click() box3.Text = Val(box1.Text) + Val(box2.Text) End Sub Private Sub Form_DblClick() box3.Text = box1.Text * box2.Text End Sub .................................................. ............... بالايي روش خودمه پاييني روش كتابه, بنظرتون كدومش بهتره چون من با بالايي راحت ترم Ar@m09-05-2008, 09:27 PMتنها چيزي كه بنظرم مي رسه اينه كه تو متغيرهايي تعريف كردي كه نياز نبوده تعريف كني پس فضايي رو درگير كردي كه نياز نبوده درگير كني و اين يعني كاهش سرعت برنامه البته توي برنامه كوچيكي مثل اين به چشم نمي ياد اما كلي كه نگاه كنيم روش دوم خيلي بهتره atifazi14-05-2008, 01:36 PMهر دو روش درست هستند. ولی روش دوم بهتره چون هم از فضای کمتری استفاده میکنه هم تعداد خط اون کمتره و خوندنشو واسه انشجو بهتر میکنه . اگه دقت کنی در روش کتاب از تابع val استفاده کرد که مقدار تکس باکس را به عددی از نوع enteger تبدیل میکنه . ما فرض این را میگیریم که در هر دو تکس باکس عددی را وارد کردی چون در غیر اینصورت در برنامه شما خطا در ضرب تولید میشه و در کتاب در هر ضرب و جمع خطا تولید میشه . Julian14-05-2008, 04:21 PMروش دوم بهتره. اصلا لازم نیست متغیر تعریف کنی. همیشه اسون ترین روش بهترین روشه. ULF_VB 614-05-2008, 04:51 PMهمیشه اسون ترین روش بهترین روشه. کاملا با این جمله مخالفم. homa m23-05-2008, 09:11 PMيه سوال ديگم دارم درباره ارايه دو بعدي كه نميدونم 5 و 8 تو دستور زير از كجا اومده لطف كنيد توضيح بدين ضمنا همين فرمول رو هم كه مينويسم ارور ميده ارايه اي دو بعدي به ابعاد 4 در 3 از نوع رشته اي : Private Sub Command 1_Click() dim a(5 to 8, 2 to 4)as string for i=5 to 8 for j= 2 to 4 a(i,j)=inputbox(prompt,"enter name [next i end sub بازم ممنون از پاسخگوييتون:20: black_storm29-05-2008, 12:59 PMاوه .... ! چرا اينقدر مي پيچونيدش ! Ramin_371103-06-2008, 01:45 PMسلام دوست من 5 خانه اول آرایته و 8 خانه اخر ارایته البته بصورت سطری میگم در ضمن مشکل برنامت اینه که دو تا for آوردی و یکیشون رو نبستی یعنی باید بعد از next i یه next دیگه هم بنویسی و یه چیز دیگه که لازم نیست اسم متغیر رو بعد از next بنویسی چون ویژوال بصورت پیش فرض حلقه ها رو از بیرون به داخل میخووووونه devil_ff200803-06-2008, 04:54 PMPrivate Sub Command 1_Click() dim a(5 to 8, 2 to 4)as string for i=5 to 8 for j= 2 to 4 a(i,j)=inputbox(prompt,"enter name") next i next j end sub سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود

این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]

[مشاهده در: www.ri3k.eu]

[تعداد بازديد از اين مطلب: 312]