Arrays 当使用数组时,如何使textbox.text中的字符串给出整数值?

Arrays 当使用数组时,如何使textbox.text中的字符串给出整数值?,arrays,vb.net,Arrays,Vb.net,我使用整数数组来保存一个值,因此函数可以检查该文本框中的值。在本例中,答案为(4)。当该值等于1时,将输出一个标签(在完成函数后),说明输入文本框的文本是真还是假 但是,当文本在文本框中键入并按下按钮时,我会得到一个错误,因为数组是整数,而文本框中的文本是字符串,所以不会这样做 如何使文本输入给出一个整数值 Public Class Form1 Public score As Integer Dim answers(10) As Integer Private Sub

我使用整数数组来保存一个值,因此函数可以检查该文本框中的值。在本例中,答案为(4)。当该值等于1时,将输出一个标签(在完成函数后),说明输入文本框的文本是真还是假

但是,当文本在文本框中键入并按下按钮时,我会得到一个错误,因为数组是整数,而文本框中的文本是字符串,所以不会这样做

如何使文本输入给出一个整数值

Public Class Form1

    Public score As Integer
    Dim answers(10) As Integer

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TxTq4.TextChanged    
        If TxTq4.Text = "true" Then
            Me.score = Me.score + 1
            answers(4) = 1
        ElseIf TxTq4.Text = "True" Then
            Me.score = Me.score + 1
            answers(4) = 1
        ElseIf TxTq4.Text = ("") Then
            Me.score = Me.score + 0
        End If    
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If answers(4) = answer(TxTq4.Text) Then
            lq4.Show()
        End If
    End Sub

    Private Function answer(ByVal val As Integer)
        Dim numberTrue As Boolean    
        If answers(4) = 1 Then
            lq4.Text = "True"
            lq4.BackColor = Color.Green
            numberTrue = True    
        Else
            lq4.Text = "False"
            numberTrue = False
            lq4.BackColor = Color.Red
        End If    
        Return numberTrue    
    End Function

End Class

您可以使用以下代码,但是文本必须为真或假(大写或小写无关紧要),否则会出现问题:

If answers(4) = answer( Convert.ToInt32(Convert.ToBoolean(TxTq4.Text)) ) Then

您是否可以执行与
TextBox1\u TextChanged
事件中类似的逻辑?如果
TxTq4.Text=“true”
将变量的值指定为1。然后,如果
回答(4)=变量
,则进入条件。