[Help]School Work?[Solved]

[MargZXerO]

i want to show the result in the msg box

tnx more power MPGH

[Hassan]

i want to show the result in the msg box

tnx more power MPGH

Post your code here...Not in an attachment !!

['Bruno]

1. Your very first post to ask for someone to do what you should be doing it's just wrong.
2. You can't have an attachment without virus scan.
3. How can you learn if someone is doing it for you?

e// gosh Hassan.. :\ faster

[MargZXerO]

Dim average As Integer
Dim units As Integer

Const math = 4
Const science = 3
Const english = 3
units = math + science + english
average = (Val(txtenglish * english + Val(txtscience) * science + Val(txtmath) * math)) / units
lblanswer.Caption = average
msg = MsgBox("Success Your Average Grade Is I WANT TO SHOW THE RESULT HERE!", vbInformation)

tnx in advance

[Hassan]

tnx in advance

Dim average As Integer
Dim units As Integer
 Const math = 4
Const science = 3
Const english = 3
units = math + science + english
average = (Val(txtenglish * english + Val(txtscience) * science + Val(txtmath) * math)) / units
lblanswer.Caption = average
msg = MsgBox("Success Your Average Grade Is I WANT TO SHOW THE RESULT HERE!", vbInformation)

Fixed Code:

Dim average As Integer
 Dim units As Integer
 
 Const math = 4
 Const science = 3
 Const english = 3
 units = math + science + english
 average = (Val(txtenglish * english + Val(txtscience) * science + Val(txtmath) * math)) / units
 lblanswer.Caption = average
 MsgBox("Success Your Average Grade Is: " & average)

Easy Much ?

e// gosh Hassan.. :\ faster

[MargZXerO]

Dim average As Integer
Dim units As Integer
 Const math = 4
Const science = 3
Const english = 3
units = math + science + english
average = (Val(txtenglish * english + Val(txtscience) * science + Val(txtmath) * math)) / units
lblanswer.Caption = average
msg = MsgBox("Success Your Average Grade Is I WANT TO SHOW THE RESULT HERE!", vbInformation)

Fixed Code:

Dim average As Integer
 Dim units As Integer
 
 Const math = 4
 Const science = 3
 Const english = 3
 units = math + science + english
 average = (Val(txtenglish * english + Val(txtscience) * science + Val(txtmath) * math)) / units
 lblanswer.Caption = average
 MsgBox("Success Your Average Grade Is: " & average)

Easy Much ?

WOW
awesome it's so easy for you..

[Hassan]

WOW
awesome it's so easy for you..

Thanks

AND

[NextGen1]

@Xscape
Still think that GUI could use more work
(inside joke)

Anyway, Marked Solved

[Jason]

@Xscape
Still think that GUI could use more work
(inside joke)

Anyway, Marked Solved

It's too square IMO.

[Blubb1337]

Hahahahahaha, insider jokes ftw.

[Hassan]

It's too square IMO.

Think you're better ?