源文件(txt文件1)内容如下：
JOINT
  1  X=0  Y=0  Z=0
  2  X=0  Y=0  Z=3000
  
FRAME&SEC
  1  J=1,2  SEC=1
要求转换后的文件(txt文件2)形势如下：
!Joint
Joint,1,0.00000,0.00000,0.00000  
Joint,2,0.00000,0.00000,3.00000  

!SEC
S1

!Frame 
J,1,2        
SEC,S,,,1  

请问如果用VB怎样简单的实现呢?感谢大家提出建议！