vbscript - 如何在 VBScript 中将字符串转换为 double 值？

Question

我需要在 VBScript 中编写一些代码，并在需要比较的文本文件中有一个版本号字符串。如果我将此代码编写为测试:

option explicit

Dim VersionString
VersionString = "6.2.1"

Dim Version
Version = CDbl (VersionString)

Version = Version * 100

我在 CDbl 行上收到错误消息:
Microsoft VBScript runtime error: Type mismatch: 'CDbl'
我应该如何阅读和比较这个字符串值？

Answer 1

"6.2.1"不是格式化为字符串的 Double。所以 CDbl() 不能转换它。您的选择是:

将版本视为字符串；好的，如果你只需要比较相等性，如果你需要“6.9.1”比“6.10.2”小，那就不好了

Split() “.”上的字符串并分别处理部分(可能转换为Integer/Long)；你需要为这样的数组编写一个比较函数

删除“.”并CLng结果字符串；对于“6.10.2”等版本会中断

Split() “*”上的字符串并乘以+添加“数字”以获得一个(整数)版本号(对于您的样本，6 * 100 + 2 * 10 + 1 * 1 = 621)；对于像“15.00.30729.01”这样的版本可能更复杂