none
ListBoix로부터 젤 작은값과 큰값을 구해오고 싶습니다. RRS feed

  • 질문

  • ListBoix로부터 젤 작은값과 큰값을 구해오고 싶습니다.

    {1,3,5,7,9}가 있다면 작은값 1과 9를... ListBox.Items.mas()뭐 이런거 있나요???

    2012년 3월 31일 토요일 오후 2:39

답변

  • 안녕하십니까? 질문하신 "ListBox 내 데이터에서 최소값과 최대값 얻어오는 방법" 관련하여 답변드리도록 하겠습니다.

    폼에 ListBox1 와 Button 2개, Label1 이 올려져있다고 가정, 답변 안내 드립니다.

                ' 최소값
    
                Dim i As Integer, c As Double, min As Double = Double.MaxValue
                If ListBox1.Items.Count = 0 Then min = 0.0#
                For i = 0 To ListBox1.Items.Count - 1
                    c = CDbl(ListBox1.Items.Item(i))
                    If c < min Then min = c
                Next
                Label1.Text = "통계 결과 : " + CStr(min)

               ' 최대값
    
                Dim i As Integer, c As Double, max As Double = Double.MinValue
                If ListBox1.Items.Count = 0 Then max = 0.0#
                For i = 0 To ListBox1.Items.Count - 1
                    c = CDbl(ListBox1.Items.Item(i))
                    If c > max Then max = c
                Next
                Label1.Text = "통계 결과 : " + CStr(max)

    위와 같은 방법으로 얻어오실 수 있습니다.

    감사합니다.

    답변이 도움 되셨기 바라며, 문제 해결에 도움이 되었다면 답변으로 채택을 부탁드립니다.
    하지만 문제 해결이 되지 않아서 정확한 답변을 원하는 경우에는 문제의 정보를 더 자세하게 답변으로 제공해주시기 바랍니다.
    • 편집됨 devlife 2012년 4월 2일 월요일 오후 12:40
    • 답변으로 제안됨 아쿠아마린 2012년 4월 2일 월요일 오후 12:52
    • 답변으로 표시됨 Jina LeeModerator 2012년 4월 23일 월요일 오전 1:36
    2012년 4월 2일 월요일 오후 12:38

모든 응답

  • 안녕하십니까? ASPWant 님,
    Microsoft MSDN의Forum 사이트를 방문해 주셔서 감사합니다.

    문의 하신 ”ListBoix로부터 젤 작은값과 큰값을 구해오고 싶습니다.”에 대해 답변드리겠습니다.

    아래 참조 자료를 보시면 유용할 것 같습니다.
    [참조자료]
    How Count Sort Works

    제시해 드린 답변이 도움이 되었기를 바랍니다.

    답변이 문제 해결에 도움이 되었다면 답변으로 채택을 부탁드립니다.
    하지만 문제 해결이 되지 않아서 정확한 답변을 원하는 경우에는 문제의 정보를 더 자세하게 답변으로 제공해주시기 바랍니다.
     

    2012년 4월 2일 월요일 오전 9:35
    중재자
  • 안녕하십니까? 질문하신 "ListBox 내 데이터에서 최소값과 최대값 얻어오는 방법" 관련하여 답변드리도록 하겠습니다.

    폼에 ListBox1 와 Button 2개, Label1 이 올려져있다고 가정, 답변 안내 드립니다.

                ' 최소값
    
                Dim i As Integer, c As Double, min As Double = Double.MaxValue
                If ListBox1.Items.Count = 0 Then min = 0.0#
                For i = 0 To ListBox1.Items.Count - 1
                    c = CDbl(ListBox1.Items.Item(i))
                    If c < min Then min = c
                Next
                Label1.Text = "통계 결과 : " + CStr(min)

               ' 최대값
    
                Dim i As Integer, c As Double, max As Double = Double.MinValue
                If ListBox1.Items.Count = 0 Then max = 0.0#
                For i = 0 To ListBox1.Items.Count - 1
                    c = CDbl(ListBox1.Items.Item(i))
                    If c > max Then max = c
                Next
                Label1.Text = "통계 결과 : " + CStr(max)

    위와 같은 방법으로 얻어오실 수 있습니다.

    감사합니다.

    답변이 도움 되셨기 바라며, 문제 해결에 도움이 되었다면 답변으로 채택을 부탁드립니다.
    하지만 문제 해결이 되지 않아서 정확한 답변을 원하는 경우에는 문제의 정보를 더 자세하게 답변으로 제공해주시기 바랍니다.
    • 편집됨 devlife 2012년 4월 2일 월요일 오후 12:40
    • 답변으로 제안됨 아쿠아마린 2012년 4월 2일 월요일 오후 12:52
    • 답변으로 표시됨 Jina LeeModerator 2012년 4월 23일 월요일 오전 1:36
    2012년 4월 2일 월요일 오후 12:38