久久精品人成免费_国产精品久久久久久久白皙女_一级片播放_日韩欧美在线免费_亚洲AV无码精品色午夜果冻不卡_成人高潮免费视频

xmutcrs
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看xmutcrs的 主題 / 回貼
樓主  發表于: 2009-11-01 10:38
如題,謝謝大家,
xmutcrs
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看xmutcrs的 主題 / 回貼
1樓  發表于: 2009-11-01 11:05
Private Sub Command1_Click() '電機啟動
Dim a As Integer
Dim b As Integer
b = 0
a = MsgBox("是否在啟動電機時就啟動監視功能并進入曲線監控畫面", 4, "監控選擇")
If a = 6 Then
'曲線監控.Visible = True
If qxstart_flag = False Then
Set 曲線監控.s = CreateObject("Excel.Application")
                '曲線監控.s.Visible = True
          Set 曲線監控.exwbook = Nothing
          Set 曲線監控.exsheet = Nothing
          Set 曲線監控.exwbook = 曲線監控.s.workbooks.open("d:/vb98/3-1.xls")
          Set 曲線監控.exsheet = 曲線監控.exwbook.Worksheets("sheet1")
qxstart_flag = True
End If
曲線監控.Visible = True
曲線監控.Timer1.Enabled = True
End If
Do While Form1.complish = True
a = 0
Loop
Form1.complish = True
a = Form1.forcem_y("m0", 1)
Do While b < 10000
b = b + 1
Loop
Do While Form1.complish = True
a = 0
Loop
Form1.complish = True
a = Form1.forcem_y("m0", 0)
End Sub
上面是我寫的電機啟動代碼,上升沿置啟動指令,下降沿置M8122發送請求
本帖最近評分記錄:
  • 下載積分:+2(小玉2013) 好貼好貼!
  • 下載積分:+2(夏日雪夢) 熱心助人
    xmutcrs
    級別: *
    精華主題: * 篇
    發帖數量: * 個
    工控威望: * 點
    下載積分: * 分
    在線時間: (小時)
    注冊時間: *
    最后登錄: *
    查看xmutcrs的 主題 / 回貼
    2樓  發表于: 2009-11-02 15:01
    希望有這方面的高手指點一下,不勝感激
    zony210
    級別: *
    精華主題: * 篇
    發帖數量: * 個
    工控威望: * 點
    下載積分: * 分
    在線時間: (小時)
    注冊時間: *
    最后登錄: *
    查看zony210的 主題 / 回貼
    3樓  發表于: 2009-11-23 02:46
    QJ71E71-100 的以太網通信 誰知道呀  也 幫我  qq 13030299

    主站蜘蛛池模板: 午夜色片| 欧美精品久久久久久久久久 | 日韩午夜伦伦午夜伦老司机 | 蜜桃精品免费久久久久影院 | 日韩一区二区三区不卡视频 | 精品人妻无码一区二区三区四区无码 | 成年美女黄网站色视频免费 | 成人永久看片免费视频天堂 | 爆乳2把你榨干哦 | 国产三级九九久久久久三级 | 国产福利合集 | 男人扒开女人腿做爽爽视频 | 亚洲午夜小视频 | 日本精品视频在线播放 | 熟女少妇a性色生活片毛片 国产导航在线 | 日韩高清在线观看一区二区 | 乱人伦av | 火之迷恋三级无删减视频 | 男人天堂网2017 | 久久国产精品视频免费看 | 中文字幕仓人妻偷偷久久 | 全部免费A片在线观看VR系列 | 免费看日韩片 | 欧洲美女与动交ZOZ0Z喝奶水 | 亚洲精品久久MM131泳装图片 | 日本妇人成熟免费视频 | 国产精品一区二区久久精品 | 成年人在线观看视频 | 欧美一级毛片免费网站 | 男女在一起拔萝卜免费视频大全 | 日韩成人高清无码 | 亚洲欧美日韩另类国产第一 | 欧美国产综合色视频 | 久久久久影视 | 8x8x成人网 | 扒开美女内裤狂揉下部 | 欧洲美女与动交ZOZ0Z喝奶水 | 99亚洲天堂 | 岛国大片免费视频 | 一区二区小视频 | 催眠极品YIN荡人妻合集H |