我喜欢从txt文件中读取以下文本,但希望将三个数字中的每一个赋值给各个变量,我该如何执行此操作?分割字符串并将分割段分配给变量
(234.134, 105.087, 0.000000)
EDDIT:
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim str As String
Dim XVAL As String
Dim YVAL As String
Dim ZVAL As String
Dim strArr() As String
Dim count As Integer
str = "(0.123, 4.467, 8.910)"
strArr = str.Split(", ")
For count = 0 To strArr.Length - 3
XVAL = (strArr(count))
Next
For count = 0 To strArr.Length - 2
YVAL = (strArr(count))
Next
For count = 0 To strArr.Length - 1
ZVAL = (strArr(count))
Next
Label1.Text = XVAL + ZVAL
Label2.Text = YVAL
Label3.Text = ZVAL
End Sub
现在才XVAL和ZVAL的产品显示为0.123 8.910,而不是0.123 + 8.910 = 9.033
的9.033这是林后
我设法编写了以下代码(请参阅eddit) – alf 2010-11-29 15:28:16