..... 그렇다면 문이 제대로 작동하지 않습니다.

나는이 이상한 문제가 있습니다.

다음은 내 코드 스 니펫입니다.

Dim apantisi_pou_edwse As String 
    Dim objreader As New StreamReader(TEST_NAME) 
    Dim Answer1 As String = Split(objreader.ReadToEnd(), vbCrLf)(1) & vbCrLf 

    If test1.RadioButton1.Checked = True Then 
       apantisi_pou_edwse = test1.RadioButton1.Text.ToString() 

      ElseIf test1.RadioButton2.Checked = True Then 
       apantisi_pou_edwse = test1.RadioButton2.Text.ToString() 
      End If 
    If apantisi_pou_edwse = Answer1 Then 
       RichTextBox1.BackColor = Color.Green 
       RichTextBox1.Text = "Right answer!" 
      ElseIf apantisi_pou_edwse <> Answer1 Then 
       RichTextBox1.BackColor = Color.Red 
       RichTextBox1.Text = "Sorry, wrong anwser" 
      End If

그래서 텍스트 파일의 한 줄을 읽고이를 Answer1 문자열 변수에 할당합니다. 그런 다음 해당 라디오 버튼의 Text 속성을 가져 와서 String 변수 apantisi_pou_edwse에 할당합니다. 마지막으로 apantisi_pou_edwse = Aswer1인지 확인합니다. 문제는 두 개가 같아도 if ... then 문이 해당 내용을 인식하지 못하고 항상 elseif 섹션으로 이동한다는 것입니다. 내가 무엇을 놓치고 있습니까? 덕분에 많은

편집

나는 위의 하나 내 if 문을 변경하지만 여전히 작동하지 않습니다 :(

If String.Compare(apantisi_pou_edwse, Answer1) = 0 Then 
      RichTextBox1.BackColor = Color.Green 
      RichTextBox1.Text = "Συγχαρητήρια απάντησες σωστά" 
     Else 
      RichTextBox1.BackColor = Color.Red 
      RichTextBox1.Text = "Λυπάμαι απάντησες λάθος" 
     End If

Edit2가 이 감사 Mortalus과 답변 Enigmativity가! 그들은 해결 문제

출처

2012-10-03 Pantheo

을, 어떤 이유로, 당신은 문자열의 끝에서 'vbCrLf'을 추가 한 당신 파일에서 읽었지만 라디오 버튼 텍스트에는 그 파일이 들어 있지 않습니다. 또한 '텍스트'는 이미 문자열입니다. 왜 ToString()을 호출할까요? –

또한,'ElseIf apantisi_pou_edwse <> Answer1 Then'''' 그냥'Else' 일 수도 있습니다 - 당신은 이미'If'에 의해 두 값이 일치하지 않는다고 확정했습니다. –

에 한번이 줄을 변경 아마 그

Dim Answer1 As String = Split(objreader.ReadToEnd(), vbCrLf)(1)

출처

2012-10-03 07:29:35 Enigmativity

고마워요. Enigmativity. 결국 트릭을 만들었습니다. – Pantheo

다음 줄에서 문자열을 비교하려면 다른 방법을 사용해야합니다.

이 줄

시도가 사용 Answer1 변수로 apantisi_pou_edwse의 참조를 비교한다. 이것에

Dim Answer1 As String = Split(objreader.ReadToEnd(), vbCrLf)(1) & vbCrLf

String.Compare(apantisi_pou_edwse, Answer1)

출처

2012-10-03 07:20:03 Mortalus

고마워 Mortalus – Pantheo

..... 그렇다면 문이 제대로 작동하지 않습니다.

답변

관련 문제