Course Solutions Uncategorized (Solved) : Flowchart Code Private Sub Commandbutton3click Textbox9value Textbox4value 025 Nota1 End S Q26162045 . . . .

(Solved) : Flowchart Code Private Sub Commandbutton3click Textbox9value Textbox4value 025 Nota1 End S Q26162045 . . . .

 

Flowchart for this code

Private Sub CommandButton3_Click()
TextBox9.Value = TextBox4.Value * 0.25 ‘Nota1

End Sub

Private Sub CommandButton4_Click()
TextBox10.Value = TextBox5.Value * 0.25 ‘Nota2

End Sub

Private Sub CommandButton5_Click()
TextBox11.Value = TextBox6.Value * 0.2 ‘Nota3

End Sub

Private Sub CommandButton6_Click()
TextBox12.Value = TextBox7.Value * 0.3 ‘Nota4
End Sub

Private Sub CommandButton7_Click()
Dim suma As Double
‘Sumatoria de notas
suma = Val(TextBox4.Text) + Val(TextBox5.Text) + Val(TextBox6.Text)+ Val(TextBox7.Text)
TextBox8 = Str(suma)
TextBox13 = (TextBox4 * 0.25) + (TextBox5 * 0.25) + (TextBox6 *0.2) + (TextBox7 * 0.3)
End Sub

Expert Answer


An answer will be send to you shortly. . . . .

Leave a Reply

Your email address will not be published. Required fields are marked *

Related Post