Converting Between Decimal, Octal, and Binary Numbers
ID: Q31789
|
The information in this article applies to:
-
Microsoft Visual Basic for MS-DOS 1.0
-
Microsoft Visual Basic for Windows, versions 1.0, 2.0, 3.0
-
Microsoft BASIC Compiler, version 1.0
on the following platforms: MACINTOSH
-
Microsoft BASIC Interpreter for Apple Macintosh, versions 1.0, 1.01, 2.0, 2.1, 3.0
-
Microsoft QuickBasic Compiler for the IBM PC, versions 1.0, 1.01, 1.02, 2.0, 2.01, 3.0, 4.0, 4.0b, 4.5
-
Microsoft BASIC Compiler for MS-DOS, version 6.0
-
Microsoft BASIC Compiler for MS-DOS and MS OS/2, versions 5.35, 5.36
-
Microsoft Basic Professional Development System (PDS) for MS-DOS and MS OS/2, versions 7.0, 7.1
-
Microsoft GW-Basic Interpreter, version 3.20
SUMMARY
The Microsoft Basic code below demonstrates how to perform the
following conversions between decimal, octal, and binary numbers:
- Convert an octal number to a decimal (base 10) number
- Convert a decimal number to an octal (base 8) number
- Convert a decimal number to a binary (base 2) number
MORE INFORMATION
The following code example will perform the conversions:
' 1. Octal string to decimal Number:
INPUT "INPUT Octal number:"; octal$
PRINT VAL("&O" + octal$)
' 2. Decimal Number to octal string:
INPUT "INPUT Decimal number:"; Decimal
PRINT OCT$(Decimal)
' 3. Decimal Number to Binary string:
Bin$ = ""
INPUT "INPUT Decimal number:"; Decimal
FOR i = 14 TO 0 STEP -1 ' Positive numbers only
pow2 = 2 ^ i
IF Decimal >= pow2 THEN
Decimal = Decimal - pow2: Bin$ = Bin$ + "1"
ELSE Bin$ = Bin$ + "0"
END IF
NEXT i
PRINT Bin$
The above information applies to most Microsoft Basic products,
including the following Basics:
- Microsoft Visual Basic version 1.0 for MS-DOS
- Microsoft Visual Basic versions 1.0, 2.0, 3.0 for Microsoft Windows.
NOTE: You will need to replace the INPUT statement in the above code
with a feature that is supported in this product, such as a text box
used with a Click event procedure.
- Microsoft Basic Compiler version 1.0 for the Apple Macintosh
- Microsoft Basic Interpreter versions 1.0, 1.01, 2.0, 2.1, and
3.0 for the Apple Macintosh
- Microsoft QuickBasic Compiler versions 1.0, 1.01, 1.02, 2.0,
2.01, 3.0, 4.0, 4.0b, and 4.5 for the IBM PC
- Microsoft Basic Compiler versions 5.35 and 5.36 for MS-DOS
- Microsoft Basic Compiler version 6.0 for MS-DOS and MS OS/2
- Microsoft Basic PDS versions 7.0 and 7.1 for MS-DOS and MS OS/2
- Microsoft GW-Basic Interpreter version 3.2
Additional query words:
VBmsdos QuickBas BasicCom 1.00 2.10 3.00 3.20 4.00 4.00b 4.50 6.00 6.00b 7.00 7.10
Keywords :
Version : MS-DOS:1.0; :1.0,1.01,1.02,2.0,2.01,2.1,3.0,3.20,4.0,4.0b,4.5,5.35,5.36,6.0,7.0,7.1
Platform : MS-DOS
Issue type :
|