| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 840 人关注过本帖
标题:小白求助大神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
快速回复:小白求助大神vbs报错问题
数据加载中...
 
   



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

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