2013-04-02 2 views
0

사용자가 검색하려는 문자를 검색 할 수있는 프로그램을 만들어야합니다. 사용자가 TextBox에 뭔가 쓸 것이고 그/그녀가 검색을 누르면 InputBox에 문자를 쓰라고 묻는 메시지가 나타납니다. 프로그램은 문자가 TextBox에 나타나는 데 많은 시간이 있음을 알려줍니다. 이것은 내가 지금까지 무엇을 가지고 :루프와 카운터를 사용하는 방법을 알 수 없습니다.

Public Class Form1 

    Private Sub BtnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnClear.Click 
     TxtboxInput.Clear() 
    End Sub 

    Private Sub BtnQuit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnQuit.Click 
     Me.Close() 
    End Sub 

    Private Sub BtnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSearch.Click 
     Dim intStartIndex As Integer 
     Dim intFoundIndex As Integer 
     Dim counter = 0 
     Dim hitcounter = 0 
     Dim blnFlag = True 
     Try 

      InputBox(" Enter Letters", "Input Needed") 
     Catch 
     End Try 
    End Sub 
End Class 
+0

루프 및 카운터를 어떻게 사용 하시겠습니까? – viclim

+0

어디에서 입력 상자를 검색하고 싶습니까? 귀하의 질문을 명확하게 적어주십시오. – Kasnady

+0

until and counter = +1 – user2189046

답변

0

나는 당신이하려는 정확히 잘 모르겠지만, 당신은 하나의 문자로 제한하는 경우 다음과 같은 뭔가가 작동합니다.

Private Sub BtnSearch_Click(sender As System.Object, e As System.EventArgs) Handles BtnSearch.Click 
    Dim counter = 0 
    Try 
     Dim search As String = InputBox(" Enter Letters", "Input Needed") 
     For Each c As Char In TxtboxInput.Text 
      If c.ToString = search Then 
       counter += 1 
      End If 
     Next 
    Catch 
    End Try 
End Sub 
+0

도와 주셔서 감사합니다. – user2189046

+0

당신은 오신 것을 환영합니다. –

+0

예를 반복하는 방법은 대소 문자를 구분합니다. 대소 문자를 구분하지 않으려면 값을 대문자 또는 소문자로 변환해야합니다. 'c.ToString.ToLower = search.ToLower' –

관련 문제