Vb6 如何将显示的值0.00替换为'-'；Visualbasic 6.0中的连字符

如何将Visualbasic 6.0中显示的值0.00替换为“-”连字符 e、 我在下面有一行代码显示出来，但是有些记录是0.00，我想把它们显示为空白或带“-”

 .PDFTextOut FormatNumber(IIf(IsNull(adRst![Outstanding Portofolio]), Empty, adRst![Outstanding Portofolio]), 2, True, True, True), 180, Str(xCtR)

---

您可以使用VB6替换功能

Replace$（表达式、查找、替换为[、开始[、计数[、比较]]）

看

试着这样做：

sNewStr=REPLACE(sOldStr, "0.00", "-")

其中，

sOldStr

是带0.00的字符串，

sNewStr

是输出

Format$（）函数接受由“；”字符分隔的三部分格式字符串。例如：

Dim Expression As Single
Dim Formatted As String

Expression = 0
Formatted = Format$(Expression, "0.00;-0.00;\-")
MsgBox Formatted

---

不能使用VB6内置的格式化函数格式化字符串吗？或者使用REPLACE函数删除您不需要的内容，并添加连字符或减号？我想将它们替换为连字符

2000.00

变为

200-

<代码>替换（）不适用于此。