我在 VB6 中有一个使用 ADODC 记录集对象填充的数据网格。我已经成功地将数字字段格式化为小数点后 2 位,但现在我想要的是,如果字段中的值为零,则它必须截断所有尾随零并在单元格中只留下一个句号。我该怎么办?
换句话说,如果单元格中的值为 2,我希望它显示 2.00
如果它为 0,我希望它显示。(句号)
请注意我在 VB6 中使用 Datagrid 控件的属性页对话框。自定义格式类型类别中的格式选项卡。在格式字符串文本框中
启动 IDE 并启动一个新的标准 EXE 项目。
添加代码:
Option Explicit
Private Sub Form_Load()
AutoRedraw = True
Font.Size = 12
Print Format$(871.35, "0.00;-0.00;.")
Print Format$(0, "0.00;-0.00;.")
Print Format$(-12.6, "0.00;-0.00;.")
End Sub
我想你会发现这个格式字符串可以满足你的要求。如果没有,您可以根据需要对其进行调整。
在您的网格控件中应该可以使用相同类型的字符串。