标题:小白求助大神vbs报错问题
取消只看楼主
Pangda5268
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2023-3-18
结帖率:0
已结贴  问题点数:20 回复次数:0 
小白求助大神vbs报错问题
大佬们这是我的代码

我输入的数据是6   5.3    32
vbs文件用的是ansi
它显示:
行:21
字符:1
错误:类型不匹配:"[string:"5.3"]'
代码:800A000D
源:Microsoft VBScript 运行时错误


程序代码:
Dim h,g,m,hmsg,gmsg,mmsg

hmsg="CPU core:"

h=InputBox(hmsg)

If h>8 Then

h=8

End If

gmsg="CPU frequency:"

g=InputBox(gmsg)

mmsg="RAM:"

m=InputBox(mmsg)

c2=h*g

cm2=h*g*m

cr=c2*1

cmr=cm2*3/10

cmrz=Round(cmr, 0) 

crz=Round(cr, 0) 

If crz > cmrz Then
    
    MsgBox(cmrz)
    
ElseIf cmrz > crz Then
    
    MsgBox(crz)
    
ElseIf cmrz = crz Then

    MsgBox(crz)
    
End If
搜索更多相关主题的帖子: 报错 vbs Then If MsgBox 
2023-03-18 23:07



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-511592-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.077256 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved