VB 获取激活刀具名称

duxingrui

小弟不才，想了好久也想不出来，怎么写这个代码，请大师门帮帮小弟，在这里表示感谢，我想知道全部代码，再次感谢你们。

; v* K( m) _4 F6 X$ g" X抓取激活刀具  用Command1抓取  在text1.text中显示激活刀具
) n/ [; K% q  Q, m* P7 V

duxingrui

看的人很多，可是会的人太少，小弟等待你们的帮忙:thankfulness::thankfulness::thankfulness::thankfulness:

小明又见小小明

: Y3 k- ?) y9 \: _; e( o% w7 W3 l. ]
   
    text1.Text = ""
/ y1 Z6 C0 e0 Y# B% N5 l4 @7 m    text1.Text = pm_send_ex("PRINT FORMVALUE feedrate.toolframe.tool")
* Q! s  U  w. B! g9 s* z, z    text1.SelStart = 0
- |2 k% w) ^' U+ ~+ t    text1.SelLength = 4
  A7 L, D' Q/ ~$ S/ I& Y    text1.SelText = ""
/ Q9 D. F  l8 {" v! y
PM10以上,通用,我这是用模块写的,你用控件写,要转换一下

duxingrui

真是高手，非常好，很谢谢你，还是好人多呀！:good:good

sheepboy

那怎么得到激活刀具路径名，谢谢
( ^9 ]' z: J3 |$ q

wangzibo341224

也同上面差不多！

fhqiwmc

这个很简单的呀。。

fhqiwmc

激活刀具前面有个*号。抓它就对啦。哈哈