简单的微机原理程序运行结果

MOV DX,0F100H DX=0F100H

MOV DH,[DX] DH=(0F100H)='A'=41HDX=4100H 取内存0f100h处存放的字符'A'存入DH，'A'的ASCII码为41H，DH为DX寄存器高位，所以DX发生变化

MOV AH,[DX] AH=(04100H)='B'=42H 原理同上

所以正确的是AH中存放的是42H，不是41H，另外DX寄存器不能作为间接寻址寄存器，可以使用BX寄存器代替。

Option Base 1

Dim arr() As Integer

Private Sub Form_Click()

Dim i As Integer,j As Integer

ReDim arr(3,2)

For i=1 To 3

For j=1 To 2

arr(i,j)=i*2+j 'arr()=[3 4

5 6

7 8]

Next j

Next i

ReDim Preserve arr(1,4)

'arr=[3 4 0 0

5 6 0 0

7 8 0 0]

For j=3 To 4

Arr(3,j)=j+9 'arr(3,3)=12,arr(3,4)=13

Next j

Print arr(3,2)arr(3,4)

End Sub

arr(3,2)=0

arr(3,4) =13

---