Hello! I need some help with my code. Here's the background information:
Six students take three tests. I need to find the grade average of each student (test 1, 2, and 3), then I need to find the average grade of test 1, test 2, and test 3. Next, I have to find the average of the student's average. Finally, I need to put the information in FileInfo Class form.
Sorry, if I confused you, however, this is the code I have so far. Don't worry about the FileInfo if it's too much or if you're not sure what I'm talking about, I believe I have a packet that explains the process to me.
Here's the code I created. When it gets to finding the average of the avverages, it doesn't work.
Dim quiz1_a = CInt(quiz1a.Text) Dim quiz2_a = CInt(quiz2a.Text) Dim quiz3_a = CInt(quiz3a.Text) stuav1.Text = CInt(CInt(quiz1_a(1, 1) + quiz2_a(1, 2) + quiz3_a(1, 3) / 3)) Dim quiz1_b = CInt(quiz1b.Text) Dim quiz2_b = CInt(quiz2b.Text) Dim quiz3_b = CInt(quiz3b.Text) stuav2.Text = CInt(CInt(quiz1_b(2, 1) + quiz2_b(2, 2) + quiz3_b(2, 3)) / 3) Dim quiz1_c = CInt(quiz1c.Text) Dim quiz2_c = CInt(quiz2c.Text) Dim quiz3_c = CInt(quiz3c.Text) stuav3.Text = CInt(CInt(quiz1_c(3, 1) + quiz2_c(3, 2) + quiz3_c(3, 3)) / 3) Dim quiz1_d = CInt(quiz1d.Text) Dim quiz2_d = CInt(quiz2d.Text) Dim Quiz3_d = CInt(quiz3d.Text) stuav4.Text = CInt(CInt(quiz1_d(4, 1) + quiz2_d(4, 2) + Quiz3_d(4, 3)) / 3) Dim quiz1_e = CInt(quiz1e.Text) Dim quiz2_e = CInt(quiz2e.Text) Dim Quiz3_e = CInt(quiz3e.Text) stuav5.Text = CInt(CInt(quiz1_e(5, 1) + quiz2_e(5, 2) + Quiz3_e(5, 3)) / 3) Dim quiz1_f = CInt(quiz1f.Text) Dim quiz2_f = CInt(quiz2f.Text) Dim Quiz3_f = CInt(quiz3f.Text) stuav6.Text = CInt(CInt(quiz1_f(6, 1) + quiz2_f(5, 2) + Quiz3_f(5, 3)) / 3) quiz1av.Text = CInt(CInt(quiz1_a(1, 1) + quiz1_b + quiz1_c + quiz1_d + quiz1_e + quiz1_f) / 6) quiz2av.Text = CInt(CInt(quiz2_a + quiz2_b + quiz2_c + quiz2_d + quiz2_e + quiz2_f) / 6) quiz3av.Text = CInt(CInt(quiz3_a + quiz3_b + quiz3_c + Quiz3_d + Quiz3_e + Quiz3_f) / 6)
Sorry if I seem idiotic, it's just that I'm a novice to VB.