递归火山软件开发平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

2

主题

23

帖子

126

积分

核心用户

Rank: 9Rank: 9Rank: 9

积分
126
跳转到指定楼层
楼主
发表于 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, 下载次数: 24)

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

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-11-11 04:01 , Processed in 0.098973 second(s), 22 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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