VB.NET textbox里所有指定字符串后面的数字相乘?

求教巨佬,怎么实现通过button1按钮实现textbox1内所有time_0=的数字乘以2 ?
最新回答
傲娇到底

2025-03-28 00:49:35

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim s() As String
s = Split(TextBox1.Text, vbCrLf)
For i = 0 To UBound(s)
If s(i) Like "time_0=*" Then s(i) = "time_0=" & Val(Split(s(i), "=")(1) * 2)
Next
TextBox1.Text = Join(s, vbCrLf)
End Sub