当我将字母放入字符串时,为什么会出错?

时间:2016-03-07 23:59:48

标签: string vba error-handling double type-conversion

我正在制作一个小程序,用于检查您输入的数字最多为4,每个数字都会显示不同的数字。但是我希望它能说“选择一个号码”。当有人写信时。基本上我的别人应该只在答案中包含一个字母,但是当我运行程序,然后键入一个字母然后按回车键,我得到一个错误,关于无法将答案转换为双,我就是到处寻找解决这个问题,但没有任何结果。请帮助,我将非常感激。我键入了一个,按下回车键,这是我得到的错误(尽管它包含所有字母。不仅仅是一个。)错误是:{“从字符串转换”“a”“到类型'Double'无效。” } If语句开始时发生错误。

    If (e.KeyCode = Keys.Enter) Then

        Dim Answer As String

        Answer = txtAnswer.Text

        If Answer = 1 Then
            txtResponse.Text = "Good"
        ElseIf Answer = 2 Then
            txtResponse.Text = "Good again"
        ElseIf Answer = 3 Then
            txtResponse.Text = "Not too good"
        ElseIf Answer = 4 Then
            txtResponse.Text = "Terrible"
        ElseIf Answer > 4 Or Answer < 1 Then
            txtResponse.Text = "Wrong Answer"
        Else
            txtResponse.Text = "pick a number"
        End If
    End If

1 个答案:

答案 0 :(得分:0)

此代码应该可以满足您的需求。

[options.silent=false]   Boolean     If true, the updatedAt timestamp will not be updated.