在VB编程中，评委打分通常涉及以下几个步骤：
输入分数：
通过InputBox对话框接收10个评委的分数，并将这些分数存储在一个数组或列表中。
计算最高分和最低分：
遍历分数列表，找出最高分和最低分。
计算最终得分：
去掉一个最高分和一个最低分后，计算剩余分数的平均值。
显示结果：
将最高分、最低分和最终得分显示在相应的文本框中。
清除输入：
提供“清除”按钮，用于清空所有输入和结果。
退出程序：
提供“退出”按钮，用于退出程序。
```vb
Private Sub Command1_Click（）
' 输入10个评委的分数
Dim scores（9） As Integer
For i = 0 To 9
scores（i） = Val（InputBox（"请输入第" & （i + 1） & "个评委的打分!"））
Next i
' 计算最高分和最低分
Dim maxScore As Integer = scores（0）
Dim minScore As Integer = scores（0）
For i = 1 To 9
If scores（i） > maxScore Then
maxScore = scores（i）
End If
If scores（i） < minScore Then
minScore = scores（i）
End If
Next i
' 计算最终得分（去掉一个最高分和一个最低分后的平均值）
Dim totalScore As Integer = 0
For i = 0 To 9
If i <> maxScore And i <> minScore Then
totalScore = totalScore + scores（i）
End If
Next i
Dim finalScore As Double = totalScore / 8 ' 8是因为去掉了两个分数
' 显示结果
Text2.Text = maxScore.ToString（）
Text3.Text = minScore.ToString（）
Text4.Text = finalScore.ToString（）
End Sub
Private Sub Command2_Click（）
' 清空所有输入和结果
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command3_Click（）
' 退出程序
End
```
建议
输入验证：
确保输入的分数是有效的整数。
错误处理：
处理可能的异常情况，例如用户取消输入或输入非数字字符。
用户界面：
设计一个简洁直观的用户界面，方便用户操作。
代码注释：
添加必要的代码注释，提高代码的可读性和可维护性。
通过上述步骤和示例代码，你可以创建一个功能完善的VB编程评委打分程序。