QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 3875|回复: 5
收起左侧

[求助] 来怎么使用VB.NET 控制PowerMILL版本

[复制链接]
发表于 2011-8-7 10:31:25 | 显示全部楼层 |阅读模式 来自: 中国广东广州

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
各位二次开发的高手们:% I& Q1 L, T0 D! \6 W

* X7 i( p3 |. a' F' V3 E你们好! " w& ]/ X3 h: Q
1 e# a2 x$ Q' p
本人在做PowerMILL二次开发方面的事情。遇到了个不能解决的问题。
7 b4 S$ Z4 V& s" n2 G- E1 n本人的电脑中装有多个版本的PowerMILL,例如PowerMILL 10.0, PowerMILL 2010,PowerMILL 2011和PowerMILL 2012 RC2版本。$ X! z' v$ g  s* G' k! _
我怎么可以通过VB.NET 来控制不同版本的运行,比如说,我有一个combobox,通过下拉选择不同的值,来启动不同版本的PowerMILL
3 b8 V9 ~: Y3 A. {) G
. C5 J1 ^+ M8 g期望各位高手的帮忙!
发表于 2011-8-7 10:55:21 | 显示全部楼层 来自: 中国江苏苏州
这个比较麻烦,你必须通过VB.NET修改注册表中的地址。。。而且每次都必须修改。。还是放弃吧
 楼主| 发表于 2011-8-7 14:02:16 | 显示全部楼层 来自: 中国广东广州
2# 56180825 9 V7 J, W' Q1 i8 {$ j
二楼的,请问需要修改的注册表哪个值?
发表于 2011-10-11 12:59:30 | 显示全部楼层 来自: 中国广东深圳
本帖最后由 yue2233 于 2011-10-14 10:17 编辑 8 ]1 K, W4 e! D

! b8 O, V" b$ B; J5 w取注册表HKEY_LOCAL_MACHINE\SOFTWARE\Delcam\PowerMILL) Q2 V* }% N( @5 p, s* P- T
! V, e/ f3 Z* \. _8 r  `# H
源代码:
  o& w. |" J; x
* A& n  [+ K; u5 v( D6 wImports Microsoft.Win32
5 S3 x: F2 U7 k& S5 e/ l' XPublic Class Form1# o1 e  X1 {/ \, A
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
4 I1 Z4 d* E- T" }: O6 K'查找电脑所有已安装的powermill版本( i' W4 J5 _- \
        Try
! r$ ^# A6 m$ U" i) c  S8 r            Dim hklm As RegistryKey = Registry.LocalMachine
( w. z+ G0 P5 f* s2 q7 U9 y0 N2 g            Dim d As RegistryKey = hklm.OpenSubKey("software\delcam\powermill")
+ }' G3 \0 o# C, j            Dim s() As String = d.GetSubKeyNames! A- \7 d% n2 p4 h
            For Each obj In s/ W5 L8 V$ N2 l3 a* I' U
'根据查找结果,填充选择框
) P+ o1 N: b2 W) f3 P& ~                Me.ComboBox1.Items.Add(obj)6 b  m; H9 {& g: _7 @
            Next2 d# r6 a% w1 L
        Catch ex As Exception
/ o1 O) _  i! c3 a4 f        End Try
5 W) }8 Q, Z1 `4 `( V    End Sub) h  M8 _) x* Z* e# _

. U& Z6 E" J9 S2 E" A: q4 x'根据选择结果,运行相应版本的powermill
5 A3 p. I6 c" b* x& q3 c+ Z4 \    Private Sub ComboBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.TextChanged' R. c/ H6 T" v* c# A; U
        Try5 Q2 Z- {! P" v: Z9 T: q
            System.Diagnostics.Process.Start(My.Computer.Registry.LocalMachine.OpenSubKey("software\delcam\powermill\" + Me.ComboBox1.Text, False).GetValue("ExecutablePath")): X* [, ~' X3 q+ ~, Y5 V$ y- i
        Catch ex As Exception2 W  J5 l% X- c: U
        End Try
2 R) L: e$ N/ V2 t/ E    End Sub; w9 o% K' e% g1 M
End Class
发表于 2011-10-28 20:43:00 | 显示全部楼层 来自: 中国广东广州
学习了。谢谢分享
发表于 2011-11-5 19:15:29 | 显示全部楼层 来自: 中国浙江宁波
这个比较高深  还是你们讨论把
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表