VB6报表标签中函数的使用

Question

我正在尝试使用函数将数字转换为 VB6 报告中的单词 "SpellIndian"..如何使用存储在带有 VB6 数据报告标签的模块中的函数？..任何帮助表示赞赏

report.Sections(5).Controls.Item("label22").Caption = SpellIndian(Format(rs.Fields("Amount"), "0.00"))

Answer 1

report.Sections("Section2").Controls("Label2").Caption = SpellIndian(val(rs!Amount & ""))

Use of function in VB6 report label