좋은질문

VB 비주얼베이직 배열

JustineBaek 2014. 10. 8. 01:21

 

 

 

비주얼베이직 입문자입니다

가지고 있는 숫자들을 크기순으로 정렬하여 배열에 저장하려고하는데요

 

100에서 1000까지의 숫자를 몇백개 가지고있는상태에서

300부터 700까지만 선택하여 배열에 저장하려구

if 문으로 k >300 , k <700 잘랐어요

for문이랑 배열로 얘네들 크기순 정렬후 배열 저장 하는 코드좀 알려주세요ㅠㅠ

 

 

 

 

 

안녕하세요?


1. 아래와 같이 리스트 클래스를 쓰면, 쉽게 처리할 수 있습니다.  

 

     ' 샘플 데이터를 배열에 채웁니다.

     Dim arrSource() As Integer = {105, 320, 220, 370, 330, 800, 350, 400, 720}

 

     '--------------------------------------------------------------
     ' 소스에서 범위를 추려 리스트 클래스에 저장합니다.

     '--------------------------------------------------------------

     Dim parts As List(Of Integer) = New List(Of Integer)

     For i As Integer = 0 To arrSource.Length - 1
          If (arrSource(i) > 300 And arrSource(i) < 700) Then
               parts.Add(arrSource(i))
          End If
     Next i

 

    ' 필터링 결과를 오름차순 정렬합니다. --> 내림차순: parts.Reverse()

 

     parts.Sort()

 

     ' 배열로 변환합니다.
     Dim arrResult() As Integer = parts.ToArray()

     '--------------------------------------------------------------

 

     ' 제대로 저장되었는지 확인해 봅니다.
     Dim message As String = ""
     For Each item As Integer In arrResult
          message = message + item.ToString() + " "
     Next
     MessageBox.Show(message)

 

2. 실행결과

     

 

 

 

질문에 답변이 되었기를 바랍니다.

감사합니다.

 

 

 

written by

  

JustineBaek

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

C과외/C#과외/VB과외 프로그래밍 과외.서울인천경기-방문강의.기타전국-화상강의.제대로 체계적으로 배우고싶은분들.15년경력 프리랜서.삼성/포스코/한진 등.

서울,인천,경기,분당,일산,과천,산본,부천,부평,평촌,안산,안양,광명,용인,시흥,성남,수원,평택,오산,화성,동탄,천안,아산,

c#프로그래밍1:1과외, 15년 이상 프로젝트 경력의 프리랜서 직접 강의,

c#프로그래밍 과외, c#프로그래밍교육, IT·컴퓨터·컴퓨터과외비·프로그래밍과외, c# 강좌, c# 프로그래밍,

데이터베이스, 데이터베이스 프로그래밍, db, DB, 과외비,컴퓨터1:1,컴퓨터개인지도,컴퓨터실무과외,컴퓨터과외,컴퓨터1:1과외,

서울,인천,경기,부천,안산,분당,일산,천안,과천,산본,안양,광명,평촌,수원,평택,오산,용인,부평,시흥,성남,화성,동탄

광주,부산,대구,대전,마산,창원,울산,전주,군산,원주,강릉,충청남도,충청북도,강원도,경상남도,경상북도,전라남도,전라북도,제주도