火山软件开发平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 火山 源码 类库
查看: 368|回复: 2
打印 上一主题 下一主题

[视窗] 问下 这个VBA如何能在用火山执行

[复制链接]

1

主题

15

帖子

59

积分

核心用户

Rank: 9Rank: 9Rank: 9

积分
59
跳转到指定楼层
楼主
发表于 2024-4-9 11:56:01 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
常量内容是
Function Getcpuid()
Dim cpuSet,cpu
    Set cpuSet = GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf("Win32_Processor")
    For Each cpu In cpuSet
      getcpuid=cpu.ProcessorId
      exit for
    Next
end Function


我想在火山里执行并且返回CPUID

IP`X~(HNK~AL~GE}]]D_XFC.png (39.86 KB, 下载次数: 3)

IP`X~(HNK~AL~GE}]]D_XFC.png
回复

使用道具 举报

13

主题

67

帖子

416

积分

核心用户

Rank: 9Rank: 9Rank: 9

积分
416
沙发
发表于 2024-4-10 20:49:28 | 只看该作者
:噜阿噜 CMD不行吗
回复

使用道具 举报

13

主题

137

帖子

1251

积分

金牌会员

Rank: 6Rank: 6

积分
1251
板凳
发表于 2024-4-11 01:30:57 | 只看该作者
必须是32位程序 COM对象才能创建成功


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|火山软件开发平台 ( 鄂ICP备18029190号 )

GMT+8, 2024-5-22 08:30 , Processed in 0.094291 second(s), 21 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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