我正在嘗試在我的 Richtextbox 多行中查找一個字符,并且我想對它們旁邊的整數求和。我正在尋找如下字符“M”:
68.9M
4.13M
5.05M
洗掉 M 并嘗試對它們求和,但它只是洗掉了 M 而沒有顯示任何帶有總和的訊息框。這是我正在使用的代碼:
Dim sum As Integer = 0
RichTextBox1.Text = RichTextBox1.Text.Replace("M", "")
For Each s As String In RichTextBox1.Lines
Dim num As Integer = 0
If Integer.TryParse(s, num) Then
sum = num
MsgBox(sum)
End If
Next
我做錯了什么?謝謝
uj5u.com熱心網友回復:
由于我使用doubles、decimals或float (Single)值進行操作,Integer.TryParse()因此測驗將失敗。此外,我當前的文化使用點作為千位分隔符。
所以正確的代碼如下,確保在回圈外使用 MessageBox:
Dim sum As Double = 0
RichTextBox1.Text = RichTextBox1.Text.Replace("M", "")
For Each s As String In RichTextBox1.Lines
Dim num As Double = 0
If Double.TryParse(s, NumberStyles.Float, CultureInfo.InvariantCulture, num) Then
sum = num
End If
Next
MsgBox(sum)
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/410502.html
標籤:
