รบกวนถามเรื่องการใช้ for คำนวนค่าที่ดึงออกมา หรือแนะนำวิธีอื่น

sqlselect = "SELECT  weight FROM Evaluator WHERE id_evaluator = 'O000000001'"
        cmd = New SqlCommand()
        dsChk.Clear()
        daChk = New SqlDataAdapter(sqlselect, conn)
        daChk.Fill(dsChk, " Evaluator")
        With cmd
            .CommandType = CommandType.Text
            .CommandText = sqlselect
            .Connection = conn
            dr = .ExecuteReader()
        End With
        dr.Read()
        If dr.HasRows Then
            count_evaluator = CDbl(dr(0)) 'มีค่าเท่ากับ 10
        End If
        dr.Close()



 sqlselect2 = "SELECT score FROM Score_core WHERE id_evaluator = 'O000000001' "
        cmd = New SqlCommand()
        dsChk.Clear()
        daChk = New SqlDataAdapter(sqlselect2, conn)
        daChk.Fill(dsChk, "Score_core")
        With cmd
            .CommandType = CommandType.Text
            .CommandText = sqlselect2
            .Connection = conn
            dr = .ExecuteReader()
        End With
        dr.Read()
        If dr.HasRows Then
            score = CDbl(dr(0))
        End If
        dr.Close()