| 查看: 1242 | 回复: 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 |
回复此楼» 猜你喜欢
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有6人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有5人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有6人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有4人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有4人回复
-
售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急
已经有6人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有5人回复
-
课题组会帮你通过考核么？
已经有4人回复
-
各位大佬，路线设计求助
已经有8人回复
-
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有3人回复
» 抢金币啦！回帖就可以得到:
-
求助DL 5009.1-2014
规程 第1部分：火力发电》
+1/487
-
沈阳工业大学 环境电化学技术研究团队 招收硕士研究生（学硕/专硕）
+2/84
-
爱丁顿实验
+1/37
-
高分辨质谱测试丨科研单位对外服务
+1/20
-
细胞检定样品，您用对了吗？
+1/3
-
委托检验的安全锁：质量保证协议，你签了吗？
+1/3
-
CAHSS（艺术、人文与社会科学国际会议）
+1/2
-
ICoEP（教育与心理学国际会议）
+1/2
-
ICoAAD（建筑、艺术与设计）
+1/2
-
GCHSD（全球文化遗产可持续发展大会）
+1/2
-
仪器验证全生命周期管理：检测数据精准与否的前提
+1/2
-
智能传感器网络实时数据处理：时序分析、DNN调度与MQTT边缘AI工作站配置
+1/1
-
清华大学-区域环境安全全国重点实验室招聘地下水科学/水文地质方向助理研究员/副研究�
+1/1
-
ICoFEE（林业、生态与环境）
+1/1
-
单细胞VDJ测序：从B细胞库中精准挖掘抗体药优势克隆
+1/1
-
CoIMCT（信息、媒体与通信技术）Informatics, Media and Communication Technology
+1/1
-
ECNLPIR（自然语言处理与信息检索）
+1/1
-
ECSFS（能源、气候与可持续发展峰会）
+1/1
-
CoEES（能源与地球科学）2027 International Conference on Energy and Earth Science
+1/1
-
新能源并网仿真：AI实现规程问答与试验报告生成，电磁暂态图形工作站硬件配置方案
+1/1
★
lixiumei2006(金币+4): 2010-12-21 09:46:15
余泽成(金币+1):谢谢参与应助！ 2010-12-21 11:01:21
lixiumei2006(金币+4): 2010-12-21 09:46:15
余泽成(金币+1):谢谢参与应助！ 2010-12-21 11:01:21
7楼2010-12-20 14:53:17
2楼2010-12-16 22:13:00
3楼2010-12-17 09:21:53
4楼2010-12-17 10:51:19