1

私のプロジェクトでは、成績計算機を作成することになっています。これまでのところ、すべてが機能しています。すべての平均と最終成績が計算されます。私が問題を抱えているのは、数値の等級をアルファベットの等級に変換するにはどうすればよいかということです。

これは、最終成績を計算するためのコードです。

    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 を示す必要があります。画像を追加する必要があることはわかっていますが、変換のためにボタンを追加しますか? 私はとても混乱しています。

4

2 に答える 2