Runtime Overflow error in visual basic 6 code

Question

Following code of Visual Basic 6.0 - SP2 is giving Overflow error. Can somebody explain why?

Private Sub Form_Click()

  Dim Qty as Long

  Qty= 290 * 113       '' 112 is working fine

  MsgBox Qty

End Sub

As a side note, you might want to consider Service Pack 6.

GSerg
– GSerg

2013-04-27 11:41:13 +00:00
Commented Apr 27, 2013 at 11:41 — GSerg
– GSerg, Commented Apr 27, 2013 at 11:41

GSerg · Accepted Answer · 2019-04-19 18:54:12Z

9

The type of an expression is determined by its members, not by the variable it is going to be stored in.

113 gets typed as Byte.
290 gets typed as Integer because it won't fit into a byte.

As the largest of the involved types is Integer, the entire expression 290 * 113 is typed as Integer. An Integer can contain at most 32767, which is less than 290 * 113.

It therefore overflows upon multiplication, before the result is stored into a Long variable.

Explicitly type at least one of the numbers as Long:

Qty = 290& * 113

edited Apr 19, 2019 at 18:54

answered Apr 27, 2013 at 11:27

GSerg

78.8k18 gold badges173 silver badges377 bronze badges

Sign up to request clarification or add additional context in comments.

4 Comments

Joachim Isaksson Over a year ago

+1 Beat me to it, although I thought ! was the long type indicator. Been a while since VB6 though :)

MadanD Over a year ago

Thanks for quick response GSerg. I also found answer at vbcity.com/forums/t/42020.aspx. Anyway thanks a lot for your help!

MrSnrub Over a year ago

@JoachimIsaksson The ! suffix is for SINGLE 32 bit floating point variables.

Joachim Isaksson Over a year ago

@MrSnrub Yep, had to look it up though. That's what 12 years of not using it does to your memory :)

Collectives™ on Stack Overflow

Runtime Overflow error in visual basic 6 code

1 Answer 1

4 Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

4 Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related