如何用VC修改文本文件的数据并保存为另一文本文件? 20
假设有一个TXT文件,里面的内容如下:[BEGIN]类型=0x6数据=(112.89398,132.50898),(32.89396,309.50879),(321.89...
假设有一个TXT文件,里面的内容如下:
[BEGIN]
类型=0x6
数据=(112.89398,132.50898),(32.89396,309.50879),(321.89418,213.50847),(65.89448,120.50840),(432.89452,878.50827),232.89370,123.50827),(38.89355,121.50834),
[END]
[BEGIN]
类型=0x1
标识=JYD
数据=(12.04876,263.76517)
[END]
....
每个括号()内的数据相对于一组数X1,Y1,例如(12.04876,263.76517),X1=12.04876, Y1=263.76517。
想用一个VB的程序吧以上数据(每个括号内的数据)用一下公式计算出新的X2, Y2
X2=a+X1*Cos(X1-b)*sin(Y1-c)+X1
Y2=d+Y1*sin(Y1-b)*cos(Y1-c)+Y1
然后替代原来括号内的数据,再保存为文本文件(TXT)。
希望可以有一个载入TXT的按钮,修改TXT的按钮。还可以有一个地方可以输入a,b,c,d的数值。
所有类型的数据包括0x6数据和其他类型的数据都需要修改,就是所有括号内的数据。
请给出代码,谢谢 展开
[BEGIN]
类型=0x6
数据=(112.89398,132.50898),(32.89396,309.50879),(321.89418,213.50847),(65.89448,120.50840),(432.89452,878.50827),232.89370,123.50827),(38.89355,121.50834),
[END]
[BEGIN]
类型=0x1
标识=JYD
数据=(12.04876,263.76517)
[END]
....
每个括号()内的数据相对于一组数X1,Y1,例如(12.04876,263.76517),X1=12.04876, Y1=263.76517。
想用一个VB的程序吧以上数据(每个括号内的数据)用一下公式计算出新的X2, Y2
X2=a+X1*Cos(X1-b)*sin(Y1-c)+X1
Y2=d+Y1*sin(Y1-b)*cos(Y1-c)+Y1
然后替代原来括号内的数据,再保存为文本文件(TXT)。
希望可以有一个载入TXT的按钮,修改TXT的按钮。还可以有一个地方可以输入a,b,c,d的数值。
所有类型的数据包括0x6数据和其他类型的数据都需要修改,就是所有括号内的数据。
请给出代码,谢谢 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询