請教高人，關(guān)於VB與PLC通信的問題(以下是我的代碼)!

本人用的是三菱PLCf1s
想通過VB讀取D0數(shù)據(jù)，程序?qū)崿F(xiàn)如下：
 Private Sub Form_Load()
   MSComm1.ComPort=1
   MSComm1.Settings="9600,N,8,1"
 End Sub

 Private Sub Command1_Click()
   MSComm1.PortOpen=True
   MSComm1.Inputlen=0
   SendCom$=Chr(5)+"01FFWR0D000001"+Chr(13)+Chr(10)
   MSComm1.Output=SendCom  '向PLC發(fā)出讀取D0數(shù)據(jù)命令字符串
   DoEvents
   RdStr$=MSComm1.Input    '接收PLC發(fā)回數(shù)據(jù)
   Rvd$=Mid(RdStr,1,5)    
   If Rvd=Chr(2)+"01FF" Then '是否接收到
      ACKStr$=Chr(6)+"01FF"
      MSComm1.Output=ACKStr
      RdStr=Val("&H"+Trim(Mid(RdStr,6,4))) '取出D0數(shù)據(jù)
      Label1.Caption=RdStr
      Msgbox "讀取正確",16
   Else
      Msgbox "讀取錯誤!",16
   End If
 End Sub
但不能讀到D0數(shù)據(jù)，上面程序有錯嗎？或者與PLC命令通信字符有錯嗎？
有些資料書上說還要設(shè)置PLC的D8120寄存器，我設(shè)了，還是不行.
還請高人指點指點!!
  敬上!