使用vb.net从txt文件修改/删除文本中的字符
我在AutoCAD 0.000000、0.000000、0.000000中捕获了一个文本字符串,该字符串保存到名为position.txt的基于文本的文件中 由于您可能使用position.txt等文件名收集文本,因此文本可以由任意随机数组合组成,例如:5.745379、0.846290、150.6459046 然而,为了使它对我有任何用处,我需要捕获的字符串不带空格或括号,在VB.net中如何实现这一点?使用。这可能不是最有效的方法,但它将完成工作使用vb.net从txt文件修改/删除文本中的字符,vb.net,text-files,Vb.net,Text Files,我在AutoCAD 0.000000、0.000000、0.000000中捕获了一个文本字符串,该字符串保存到名为position.txt的基于文本的文件中 由于您可能使用position.txt等文件名收集文本,因此文本可以由任意随机数组合组成,例如:5.745379、0.846290、150.6459046 然而,为了使它对我有任何用处,我需要捕获的字符串不带空格或括号,在VB.net中如何实现这一点?使用。这可能不是最有效的方法,但它将完成工作 Dim file as String = M
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)
如上
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
AutoLISP解决方案不是更有用吗?您想将5.745379、0.846290、150.6459046转换为5.7453790.846290150.6459046?我几乎想保留逗号,但下面的代码足以使用romthanks@albert-如果您认为我的解决方案有用,请接受is作为“已接受的解决方案”。这将提高你的声誉,因此你将来更有可能得到答案。谢谢:作为字符串替换,我希望这是一个变量,那么output.txt文件也是兼容的吗?@albert-是的。Replace函数返回一个字符串变量。因此,在我的代码示例中,输出变量包含position.txt的内容,但没有空格或括号。忽略WriteAllText行