vb6 - 格式化整数

标签 vb6 vbscript

我的问题几乎分为两部分。首先,我尝试格式化已转换为整数的字符串。我有以下代码:

If Idx2 = 0 Then    
    response.Write(sName & vbKeyTab & " E01 " & vbKeyTab & CInt(oSplit(1)) & "</br>")
End If

这会正确地将我在 oSplit(1) 中的值显示为 75。我想显示为 00075.00

我已经尝试过此操作,但收到 500 错误:

Format(CInt(oSplit(1)), "00000.00")

我的第二个问题是关于我的代码的 CInt 部分。 oSplit 数组中的数据是一个字符串,我将其转换为整数。然而,似乎 CInt 正在四舍五入我的值。是否有一个参数可以传递给 CInt 来防止这种情况发生?

谢谢。

最佳答案

要处理 0.05,您需要将其转换为小数而不是 Int:

  Format(CDec(oSplit(1)), "00000.00")

关于vb6 - 格式化整数,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/11363495/

相关文章:

javascript - 窗体或面板中的默认焦点未设置在 Web 浏览器控件内

scripting - 使用VB代码检测是否安装了adobe reader

vbscript - 如何在 VBScript 中将 SAPI 文本保存为语音文件?

error-handling - 如何重构 VB6 代码以防止运行时错误

vb6 - 如何通过 USB HID API 从游戏 Controller 请求输入数据?

c# - 使用非 VB6 对象在 VS2008 中调试 VB6

vbscript - Internet Explorer 获取内部 IP 地址

javascript - VBScript 匿名关联数组? (就像 JavaScript 中一样)

VBscript "Expected Statement"错误

excel - 从 vbscript 自动填充 Excel 文件中的 Excel 用户表单