我最近在一个小工具上工作,用于检查和编辑MS SQL数据库。但现在我站在一堵墙前。我想把一个大的数字从一个列分成几个小的。例如,我的号码是195872323,我希望它显示为 195 Diamonds 872 Gold 323 Platinum idk。如何将此数字拆分为此类字符串?
感谢无私的帮助我。
答案 0 :(得分:0)
要创建所需的字符串,请使用此选项。我应该补充一点,Stack Overflow并不是严格意义上的代码编写服务,但它快速而简单..原始数字原本是铂金数量 - 假设每金1000铂金和每颗钻石1000金
Private Function SplitToCurrency(x As Integer) As String
Dim diamonds As Integer = CInt(Math.Truncate(CDec(x / 1000000)))
Dim gold As Integer = CInt(Math.Truncate(CDec(x - diamonds * 1000000) / 1000))
Dim platinum As Integer = x - diamonds * 1000000 - gold * 1000
Return diamonds.ToString & " Diamonds " & gold.ToString & " Gold " & platinum.ToString & " Platinum"
End Function
钻石的计算方法是将原始数除以1,000,000并删除小数
等等。