پاسخ به:تاپیک تخصصی تالار برنامه نویسی : پاسخگویی به روز به کلیه سوالات عمومی و تخصصی
چهارشنبه 1 دی 1395 9:29 AM
سلام یه سوال داشتم می خواستم در ویژوال بیسیک بخش آرایه min رو پیدا کنم
For i = 1 To x.Length - 1
min = x(i)
If min > x(i) Then
min = x(i)
End If
رو وارد کردم اما عدد اخر رو به عنوان عدد کوچکتر نشون میده
با سلام و احترام
دستور مقداردهی در بالای شرط if نیاز نیست باشه ، برای همین هست که آخرین مقدار رو نشون میده اون رو حذف کنید مشکلتون حل میشه البته قبلش برای پارامتر min یک مقدار پیشفرض مثلا مقدار اول از آرایه x رو در نظر بگیرید تا در شرط به مشکل برنخورید
min=x(1)
For i = 1 To x.Length - 1
If min > x(i) Then
min = x(i)
End If
موفق باشید
مدیر تالار های: