女人叫床声_动漫美女被艹视频_国产精品短篇二区_理发店女人一级毛片

alphaa
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看alphaa的 主題 / 回貼
樓主  發(fā)表于: 2010-04-26 16:12
圖片:
A-Series PLC資料讀取

各位大大:
小弟正在一所洗衣廠內(nèi)實習(xí), 與實習(xí)相關(guān)的洗衣設(shè)備以三菱A-series PLC控制, 且正在嘗試以Visual Basic 擷取PLC內(nèi)的資料,如衣物重量,洗衣程序等.

實習(xí)使用的PLC模塊: Computer Link Module (RS-232-C Unit)
模塊型號: A1SJ71UC24-R2
Computer Link Module 用以連結(jié) PLC CPU和電腦, 讓資料傳輸?shù)靡赃M(jìn)行.

實習(xí)期間使用的軟件:
GX developer version 8,
Visual Basic 6.0

請問各位: 以Visual Basic讀取A-series PLC 資料的程式該怎麼寫?
而且, PLC 編程軟件方面也要作相關(guān)的梯形圖嗎?

以下為改進(jìn)中的程式碼:

Private Sub Form_Load()

MSComm1.PortOpen = True
MSComm1.Settings = "9600,o,8,1"
'MSComm1.CommPort = 4
MSComm1.RTSEnable = True
MSComm1.RThreshold = 1
End Sub

Private Sub cmdEnd_Click()
MSComm1.PortOpen = False
End
End Sub

Private Sub cmdSend_Click()
MSComm1.Output = Chr(5) + "01" + "FF" + "QR" + "F" + "D000000" + "01" + Chr(3) + "84"
End Sub

Private Sub txtReceive_Change()
txtReceive.Text = MSComm1.Input
End Sub

請多多指教!

另外附件為 VB interface.

daizhi
一師一地一時一法
級別: VIP會員

精華主題: 0
發(fā)帖數(shù)量: 1470 個
工控威望: 1376 點
下載積分: 3900 分
在線時間: 2976(小時)
注冊時間: 2007-05-31
最后登錄: 2023-11-27
查看daizhi的 主題 / 回貼
1樓  發(fā)表于: 2010-04-27 09:28
日文資料到是有收集過,但從未認(rèn)真看過
若需要可發(fā)給您!

alphaa
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看alphaa的 主題 / 回貼
2樓  發(fā)表于: 2010-04-27 09:46
引用
引用第1樓daizhi于2010-04-27 09:28發(fā)表的 :
日文資料到是有收集過,但從未認(rèn)真看過
若需要可發(fā)給您!
[attachment=38578]



先謝謝樓主daizhi!, 可以把你提過的資料放上來嗎?
daizhi
一師一地一時一法
級別: VIP會員

精華主題: 0
發(fā)帖數(shù)量: 1470 個
工控威望: 1376 點
下載積分: 3900 分
在線時間: 2976(小時)
注冊時間: 2007-05-31
最后登錄: 2023-11-27
查看daizhi的 主題 / 回貼
3樓  發(fā)表于: 2010-04-27 10:30
看下您的郵箱