Question

我在AutoCAD (0.000000, 0.000000, 0.000000)中捕获了一串文本，保存到名为position.txt的基于文本的文件中。

因为您可能已经收集了诸如position.txt之类的文件名，所以文本可以由任意随机数组合组成，例如：（5.745379,0.846290,150.6459046）。

然而，对于它对我有用，我需要捕获的字符串不存在空格或括号如何在VB.net中实现这一点？

Answer 1

使用String.Replace。它可能不是最有效的方式，但它可以完成工作。

Dim file as String = My.Computer.FileSystem.ReadAllText("position.txt")

Dim output as String = file.Replace(" ", "") _
                           .Replace("(", "") _
                           .Replace(")", "")

My.Computer.FileSystem.WriteAllText("output.txt", output, false)

Answer 2

如上所述

s = "(5.745379, 0.846290, 150.6459046)"
s = s.replace("(","")
s = s.replace(")","")

然后

dim answer() as string = s.split(",")
dim number as double
For each a as string in answer
  if double.tryparse(a,n) then
    console.writeline(n.tostring & " is a number")
  else
    console.writeline(n.tostring & " is rubbish")
next

修改/删除来自txt文件ussing vb.net的文本中的字符

2 个答案: