私のプロジェクトでは、成績計算機を作成することになっています。これまでのところ、すべてが機能しています。すべての平均と最終成績が計算されます。私が問題を抱えているのは、数値の等級をアルファベットの等級に変換するにはどうすればよいかということです。
これは、最終成績を計算するためのコードです。
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Dim result1 As Integer
Dim result2 As Integer
Dim result3 As Integer
Dim attendance As Integer
Dim project As Integer
Dim result As Decimal
result1 = Val(totalResultLabel.Text)
result2 = Val(totalResultLabel.Text)
result3 = Val(totalResultLabel.Text)
attendance = Val(attendanceTextBox.Text)
project = Val(projectTextBox.Text)
result = (result1 * 0.3) + (result2 * 0.15) + (result3 * 0.2) + _
(attendance * 0.1) + (project * 0.25)
finalResultLabel.Text = result
End Sub
私が望む最終結果: 学生が 85 を受け取った場合、ビジュアルは B を示す必要があります。画像を追加する必要があることはわかっていますが、変換のためにボタンを追加しますか? 私はとても混乱しています。