大佬们这是我的代码

我输入的数据是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

我这里测试未见异常

一、输入的内容要参加运算，要分三次输入，不能一次输入三个数字；
二、每次输入的必须是纯数字，不得有空格。