| 查看: 885 | 回复: 7 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
【求助】Vb寻址的一段程序，看不懂啊！高手解决下！
|
|||
|
在Vb查找ANSYS时的一段程序，看不懂，高手能不能给解释下！ Dim hKey As Long, ret As Long, lenData As Long, typeData As Long Dim Name, nums1, nums2, nums3 As String Dim s As String Dim num As Integer '读取value. For num = 60 To 100 Step 10 nums1 = Trim(Str(num)) Name = "ANSYS" + nums1 + "_DIR" nums2 = "Software\ANSYS, Inc.\ANSYS\ANSYS " + Trim(Str(num) / 10) + ".0" ret = RegOpenKey(HKEY_LOCAL_MACHINE, nums2, hKey) If ret = 0 Then ret = RegQueryValueEx(hKey, Name, 0, typeData, ByVal vbNullString, lenData) '注意ByVal千万别忘了 s = String(lenData, Chr(0)) RegQueryValueEx hKey, Name, 0, typeData, ByVal s, lenData '注意ByVal千万别忘了 If s <> "" Then s = Left(s, InStr(s, Chr(0)) - 1) nums3 = s + "\bin\intel\ansys" + nums1 + ".exe" frmzhi.Combo1.AddItem nums3 RegCloseKey hKey End If End If Next |
回复此楼» 猜你喜欢
免疫学博士有名额，速联系
已经有9人回复
-
退学或坚持读
已经有13人回复
-
国家基金申请书模板内插入图片不可调整大小?
已经有8人回复
-
多组分精馏求助
已经有6人回复
-
国家级人才课题组招收2026年入学博士
已经有6人回复
-
交叉科学部支持青年基金，对三无青椒是个机会吗？
已经有7人回复
-
青椒八年已不青，大家都被折磨成啥样了？
已经有15人回复
» 抢金币啦！回帖就可以得到:
-
丙烯液相
+1/79
-
“超分子材料交叉研究团队”联合诚聘博士后 [清华/吉大/复旦/北大]
+1/78
-
中国石油大学（北京）国家级大人才团队博士招生2名：化学、材料、石油工程：油田化学
+2/75
-
【2026/2027 哈工大计算机类博士/硕士招生】
+1/74
-
娃娃们今儿考试喽。。。。
+1/63
-
香港科技大学计算物理及流体力学课题组招收全奖博士后及博士生（2026年9月入学）
+1/45
-
南方医科大学生物医学工程学院招收申请考核制博士生2名、博士后2名（2026）
+1/33
-
武汉工程大学绿碳技术与智能材料课题组诚招2026年博士研究生
+2/28
-
中国科学院上海光学精密机械研究所 特种强激光薄膜课题组
+1/25
-
上海理工大学顾敏院士、张轶楠教授团队 招聘 2026级 光学工程 博士生
+2/14
-
上海理工大学顾敏院士、张轶楠教授团队 招聘 2026级 光学工程 博士生
+1/14
-
西班牙巴塞罗那访学、博后、留学互动
+1/12
-
双一流联合团队招聘团队青年人才与博后
+1/12
-
邵阳学院食品与化学工程学院硕士调剂
+1/10
-
【博士后/科研助理招聘-北京理工大学-集成电路与电子学院-国家杰青团队】
+1/8
-
复旦大学化学系凡勇教授/张凡教授团队招聘博士后
+1/6
-
山东大学集成电路学院王凌云研究员招收2026年硕士生及联合培养硕士生
+1/4
-
生信（包括AI）博后招聘（3名）：美国德州理工大学健康科学中心
+1/2
-
广东以色列理工学院博士/硕士招生-通过稀疏观测用数据驱动方法预测湍流
+1/1
-
苏州大学医学院纳米生物医学方向招收申请考核制博士生1名
+1/1
3楼2010-12-17 09:21:53
2楼2010-12-16 22:13:00
4楼2010-12-17 10:51:19
5楼2010-12-17 15:26:09