Click here to Skip to main content
15,892,746 members

Comments by segedy (Top 8 by date)

segedy 26-May-14 12:53pm View    
Please can you take a look at the code again......I posted the wrong one previously
segedy 26-May-14 9:07am View    
Really sorry about this...I posted the wrong code
segedy 26-May-14 9:02am View    
I get the title error when I run the code.....I need help in fixing not a help in English
segedy 3-Apr-14 14:44pm View    
the QuestionID on the options table is a foreign key to the QuestionID(primary key) on the QuestionTable..............am sorry my reply is coming this late
segedy 10-Mar-14 15:54pm View    
forgot to add the gp code...this is it below

Dim TV1 As Double = 0.0
Dim TV2 As Double = 0.0
Dim TV3 As Double = 0.0
'TV stands for text value
Dim TV4 As Double = 0.0
Dim TV5 As Double = 0.0

If (ComboBox1.Text Is "A") Then
TV1 = 3 * 5
ElseIf (ComboBox1.Text Is "B") Then
TV1 = 3 * 4
ElseIf (ComboBox1.Text Is "C") Then
TV1 = 3 * 3
ElseIf (ComboBox1.Text Is "D") Then
TV1 = 3 * 2
ElseIf (ComboBox1.Text Is "E") Then
TV1 = 3 * 1
ElseIf (ComboBox1.Text Is "F") Then
TV1 = 3 * 0
End If

If (ComboBox2.Text Is "A") Then
TV2 = 3 * 5
ElseIf (ComboBox2.Text Is "B") Then
TV2 = 3 * 4
ElseIf (ComboBox2.Text Is "C") Then
TV2 = 3 * 3
ElseIf (ComboBox2.Text Is "D") Then
TV2 = 3 * 2
ElseIf (ComboBox2.Text Is "E") Then
TV2 = 3 * 1
ElseIf (ComboBox2.Text Is "F") Then
TV2 = 3 * 0
End If


If (ComboBox3.Text Is "A") Then
TV3 = 3 * 5
ElseIf (ComboBox3.Text Is "B") Then
TV3 = 3 * 4
ElseIf (ComboBox3.Text Is "C") Then
TV3 = 3 * 3
ElseIf (ComboBox3.Text Is "D") Then
TV3 = 3 * 2
ElseIf (ComboBox3.Text Is "E") Then
TV3 = 3 * 1
ElseIf (ComboBox3.Text Is "F") Then
TV3 = 3 * 0
End If

If (ComboBox4.Text Is "A") Then
TV4 = 3 * 5
ElseIf (ComboBox4.Text Is "B") Then
TV4 = 3 * 4
ElseIf (ComboBox4.Text Is "C") Then
TV4 = 3 * 3
ElseIf (ComboBox4.Text Is "D") Then
TV4 = 3 * 2
ElseIf (ComboBox4.Text Is "E") Then
TV4 = 3 * 1
ElseIf (ComboBox4.Text Is "F") Then
TV4 = 3 * 0
End If

If (ComboBox5.Text Is "A") Then
TV5 = 3 * 5
ElseIf (ComboBox5.Text Is "B") Then
TV5 = 3 * 4
ElseIf (ComboBox5.Text Is "C") Then
TV5 = 3 * 3
ElseIf (ComboBox5.Text Is "D") Then
TV5 = 3 * 2
ElseIf (ComboBox5.Text Is "E") Then
TV5 = 3 * 1
ElseIf (ComboBox5.Text Is "F") Then
TV5 = 3 * 0
End If

GP = (TV1 + TV2 + TV3 + TV4 + TV5) / 15