نقشه کد گذاری کاراکترها در سیستم ایران

نقشه کد گذاری

0x90	0x200C 0x0627	# ARABIC LETTER ALEF, isolated form
0x91	0x200D 0x0627	# ARABIC LETTER ALEF, final form
0x92	0x0628 0x200C	# ARABIC LETTER BEH, final-isolated form
0x93	0x0628 0x200D	# ARABIC LETTER BEH, initial-medial form
0x94	0x067E 0x200C	# ARABIC LETTER PEH, final-isolated form
0x95	0x067E 0x200D	# ARABIC LETTER PEH, initial-medial form
0x96	0x062A 0x200C	# ARABIC LETTER TEH, final-isolated form
0x97	0x062A 0x200D	# ARABIC LETTER TEH, initial-medial form
0x98	0x062B 0x200C	# ARABIC LETTER THEH, final-isolated form
0x99	0x062B 0x200D	# ARABIC LETTER THEH, initial-medial form
0x9A	0x062C 0x200C	# ARABIC LETTER JEEM, final-isolated form
0x9B	0x062C 0x200D	# ARABIC LETTER JEEM, initial-medial form

0xF0	0x06AF+<ZWJ>	# ARABIC LETTER GAF, initial-medial form
0xF1	0x0644+<ZWNJ>	# ARABIC LETTER LAM, final-isolated form
0xF2	0x0644+0x0627	# ARABIC LIGATURE LAM WITH ALEF
0xF3	0x0644+<ZWJ>	# ARABIC LETTER LAM, initial-medial form
0xF4	0x0645+<ZWNJ>	# ARABIC LETTER MEEM, final-isolated form
0xF5	0x0645+<ZWJ>	# ARABIC LETTER MEEM, initial-medial form
0xF6	0x0646+<ZWNJ>	# ARABIC LETTER NOON, final-isolated form
0xF7	0x0646+<ZWJ>	# ARABIC LETTER NOON, initial-medial form
0xF8	0x0648	# ARABIC LETTER WAW
0xF9	0x0647+<ZWNJ>	# ARABIC LETTER HEH, final-isolated form
0xFA	<ZWJ>+0x0647+<ZWJ>	# ARABIC LETTER HEH, medial form
0xFB	<ZWNJ>+0x0647+<ZWJ>	# ARABIC LETTER HEH, initial form
0xFC	<ZWJ>+0x06CC+<ZWNJ>	# ARABIC LETTER FARSI YEH, final form
0xFD	<ZWNJ>+0x06CC+<ZWNJ>	# ARABIC LETTER FARSI YEH, isolated form
0xFE	0x06CC+<ZWJ>	# ARABIC LETTER FARSI YEH, initial-medial form

Hex : 630

Decimal :

6×16^(2)+3×16^(1)+0×16^(0)=1584

1584/16  16  99 0

99/16           6     3

6/16              0

0 6 3 0

1740/16  108  12(reminder)

108/16       6        12(reminder)

6/16             0          0

0 6 12 12 = 0 6 C C

Decimal 9 Hex9

Decimal 10 Hex A

Decimal 11 Hex B

Decimal 12 Hex C

Decimal 13 Hex D

Decimal 14 Hex E

Decimal 15 Hex F

1605 / 16 100 5 (reminder)

100 / 16        6    4 (reminder)

6 / 16               0

Hex : 0 6 4 5

U+0641	ف	d9 81	ف	ف	ARABIC LETTER FEH
U+0642	ق	d9 82	ق	ق	ARABIC LETTER QAF
U+0643	ک	d9 83	ك	ک	ARABIC LETTER KAF
U+0644	ل	d9 84	ل	ل	ARABIC LETTER LAM
U+0645	م	d9 85	م	م	ARABIC LETTER MEEM
U+0646	ن	d9 86	ن	ن	ARABIC LETTER NOON
U+0647	ه	d9 87	ه	ه	ARABIC LETTER HEH
U+0648	و	d9 88	و	و	ARABIC LETTER WAW
U+0649	ى	d9 89	ى	ى	ARABIC LETTER ALEF MAKSURA
U+064A	ی	d9 8a	ي	ی	ARABIC LETTER YEH

?Hex(&H & 1740)

read a binary file

Sub Temp()
    Dim intFileNum%, bytTemp As Byte, intCellRow%
    intFileNum = FreeFile
    intCellRow = 0
    Open "C:\temp.bin" For Binary Access Read As intFileNum
    Do While Not EOF(intFileNum)
        intCellRow = intCellRow + 1
        Get intFileNum, , bytTemp
        Cells(intCellRow, 1) = bytTemp
    Loop
    Close intFileNum
End Sub