0

テキスト ファイルから得られるスコアの配列があり、それらをループしてすべてのスコアを合計しようとしています。スコアは現在文字列になっているので、それらを整数に変換し、ループを使用してそれらをすべて加算するのに助けが必要です.

変換して追加する必要があるスコアは、p1、p2、p3、p4、p5、p6、exam1、exam2 です。

ここに私のコードがあります。助けていただければ幸いです。ありがとう!

Imports System.IO

Public Class Form1

Dim textFile As String

Private Sub btnSelect_Click(sender As Object, e As EventArgs) Handles btnSelect.Click
    OpenFileDialog1.ShowDialog()
    textFile = OpenFileDialog1.FileName
    Dim data() As String = File.ReadAllLines(textFile)


    Dim myArray As String = data(0)
    Dim studentInfo() = myArray.Split(","c)

    Dim studentname As String = studentInfo(0)
    Dim subject As String = studentInfo(1)
    Dim semester As String = studentInfo(2)
    Dim photo As String = studentInfo(3)
    Dim p1 As String = studentInfo(4)
    Dim p2 As String = studentInfo(5)
    Dim p3 As String = studentInfo(6)
    Dim p4 As String = studentInfo(7)
    Dim p5 As String = studentInfo(8)
    Dim p6 As String = studentInfo(9)
    Dim exam1 As String = studentInfo(10)
    Dim exam2 As String = studentInfo(11)


    lblName.Text = studentname
    lblSubject.Text = subject
    lblSemester.Text = semester
    PictureBox1.Image = Image.FromFile(photo)
    lblP1.Text = p1
    lblP2.Text = p2
    lblP3.Text = p3
    lblP4.Text = p4
    lblP5.Text = p5
    lblP6.Text = p6
    lblExam1.Text = exam1
    lblExam2.Text = exam2
End Sub

End Class
4

1 に答える 1