使用純軟體的方式來模擬PLC的動作

環境： GPPW+LLT+MX+VB6+電腦一台 ^_^

使用方法：
1 先開啟 GPPW
2 載入PLC程式
3 執行LLT
4 執行VB6
5 開啟附件檔(vb6程式碼)

動作：
有VB6的畫面來模擬氣壓缸的前進與後退。

PS：有興趣的朋友可以抓回去看看。

谢谢你分享了

想要继续增加按扭要如何做呢？怎么编写VB代码，如添加二个点动按扭，谢谢了。

谢谢，我写写看了，有问题了再向你请教了。

楼主你好，我写了好久还是没能读出D值，请你帮忙做个示例了。

谢谢楼主了

19楼，你看一下这个是不是读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",

呵呵，楼主再辛苦你来一个写D0 值的示例了。

好的，谢谢楼主，我这就试试

楼主：我怎么运行写入后，原有的数值变为0了。

那要如何指定数值呢？

楼主，麻烦你再辛苦一下了，做个示例了，还是做不出来，呵呵太笨了。