VB.NET成绩分级系统：计算时跳过空文本框的实现技术问询

嘿，我来帮你搞定这个需求！要实现跳过空文本框的功能，核心思路是先判断文本框是否有有效内容（非空且是可转换的数值），只有满足条件时才执行分级逻辑，否则直接跳过不处理对应的结果框。另外，你原来的代码直接用字符串和数字比较存在隐式转换的风险，如果文本框输入非数字内容会报错，所以我们顺便把类型验证也加上，让程序更健壮。

下面是修改后的完整代码，我会逐段解释：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ' 处理第一个成绩文本框（TextBox1）和结果框（TextBox4）
    Dim score1 As Integer
    ' 检查文本框非空且能转换为整数
    If Not String.IsNullOrWhiteSpace(TextBox1.Text) AndAlso Integer.TryParse(TextBox1.Text, score1) Then
        Select Case score1
            Case 0 To 50
                TextBox4.Text = "1"
            Case 51 To 100
                TextBox4.Text = "0"
        End Select
    Else
        ' 空文本框或无效输入，跳过处理，也可以选择清空结果框：TextBox4.Text = ""
    End If

    ' 处理第二个成绩文本框（TextBox2）和结果框（TextBox5）
    Dim score2 As Integer
    If Not String.IsNullOrWhiteSpace(TextBox2.Text) AndAlso Integer.TryParse(TextBox2.Text, score2) Then
        Select Case score2
            Case 0 To 50
                TextBox5.Text = "1"
            Case 51 To 100
                TextBox5.Text = "0"
        End Select
    Else
        ' 空文本框或无效输入，跳过处理
    End If
End Sub

关键细节说明 #

• String.IsNullOrWhiteSpace：比String.IsNullOrEmpty更严谨，不仅检查空字符串，还会过滤掉只有空格、制表符等空白字符的情况，确保真正的空内容被跳过。
• Integer.TryParse：安全地将文本转换为整数，避免输入非数字时抛出异常。如果转换成功，会把数值存入对应的变量（比如score1），同时返回True，触发后续的分级判断。
• Select Case语句：替代原来多个If判断，代码更简洁易读，逻辑清晰。
• 跳过逻辑：当文本框为空或无效时，不会执行结果框的赋值操作，自然就实现了“跳过”的需求；如果需要清空结果框，可以在Else块里添加TextBoxX.Text = ""。

内容的提问来源于stack exchange，提问作者aksl