litung
臺(tái)灣-李同在
級(jí)別: VIP會(huì)員
![]() |
使用純軟體的方式來模擬PLC的動(dòng)作 環(huán)境: GPPW+LLT+MX+VB6+電腦一臺(tái) ^_^ 使用方法: 1 先開啟 GPPW 2 載入PLC程式 3 執(zhí)行LLT 4 執(zhí)行VB6 5 開啟附件檔(vb6程式碼) 動(dòng)作: 有VB6的畫面來模擬氣壓缸的前進(jìn)與後退。 PS:有興趣的朋友可以抓回去看看。 |
|
---|---|---|
本帖最近評(píng)分記錄:
|
夏日雪夢
為了夢,夢一生
級(jí)別: VIP會(huì)員
![]() |
想要繼續(xù)增加按扭要如何做呢?怎么編寫VB代碼,如添加二個(gè)點(diǎn)動(dòng)按扭,謝謝了。 |
---|---|
|
夏日雪夢
為了夢,夢一生
級(jí)別: VIP會(huì)員
![]() |
樓主你好,我寫了好久還是沒能讀出D值,請你幫忙做個(gè)示例了。 |
---|---|
|
夏日雪夢
為了夢,夢一生
級(jí)別: VIP會(huì)員
![]() |
19樓,你看一下這個(gè)是不是讀32位寄存器 Private Sub btn_Write32BitInteger_Click() Dim lReturnCode As Long 'Return code Dim buffer32BitInteger As udt32BitInteger 'User-defined type for '32bit Integer' data Dim bufferInteger As udtInteger 'User-defined type for writing to the PLC 'Error Handler On Error GoTo CatchError 'Copy the TextBox data to the user-defined type for '32bit Integer'. buffer32BitInteger.l32BitInteger = CLng(txt_Write32BitInteger.Text) 'Copy the 'buffer32BitInteger' to the user-defined type for writing to the PLC. LSet bufferInteger = buffer32BitInteger 'The WriteDeviceBlock2 method is executed.(to D10-D11) lReturnCode = ActEasyIF1.WriteDeviceBlock2("D10", |
---|---|
|
夏日雪夢
為了夢,夢一生
級(jí)別: VIP會(huì)員
![]() |
呵呵,樓主再辛苦你來一個(gè)寫D0 值的示例了。 [ 此帖被夏日雪夢在2009-09-01 10:24重新編輯 ] |
---|---|
|
夏日雪夢
為了夢,夢一生
級(jí)別: VIP會(huì)員
![]() |
樓主:我怎么運(yùn)行寫入后,原有的數(shù)值變?yōu)?了。 |
---|---|
|