0

تاپیک تخصصی تالار برنامه نویسی : پاسخگویی به روز به کلیه سوالات عمومی و تخصصی

 
hosseinb68
hosseinb68
کاربر طلایی1
تاریخ عضویت : بهمن 1389 
تعداد پست ها : 1269
محل سکونت : بوشهر

پاسخ به:تاپیک تخصصی تالار برنامه نویسی : پاسخگویی به روز به کلیه سوالات عمومی و تخصصی
چهارشنبه 1 دی 1395  9:29 AM

نقل قول yashar020

سلام یه سوال داشتم می خواستم در ویژوال بیسیک بخش آرایه 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

موفق باشید

تشکرات از این پست
دسترسی سریع به انجمن ها