Try this:
Dim b As Long = 5 * 1024L * 1024 * 1024
This browser is no longer supported.
Upgrade to Microsoft Edge to take advantage of the latest features, security updates, and technical support.
Dim b As Long = 5 * 1024 * 1024 * 1024
Why it's not right?
Try this:
Dim b As Long = 5 * 1024L * 1024 * 1024