看板Programming
标 题棘手的文字档处理问题
发信站梦之大地 (Thu Jan 11 23:19:06 2007)
转信站ptt!ctu-reader!ctu-gate!news.nctu!news.nsysu!news.mksh.phc!news.ccns.n
遇到了棘手的问题！
以下是文字档：
测站: A1 仪器高:1.500 ID:
後视点: A2 觇标高:1.500 Pcode: 水平角: 75.4227 天顶距: 97.5308 斜距:0.846平距:0.838
SS 点号: 11.1 觇标高:1.500 Pcode: 水平角: 75.4234 天顶距: 97.5204 斜距:0.846平距:0.838
测站: A2 仪器高:1.500 ID:
後视点: A4 觇标高:1.500 Pcode: 水平角: 0.0003 天顶距: 97.0003 斜距:0.932平距:0.925
SS 点号: Q1 觇标高:1.500 Pcode: 水平角: 0.0003 天顶距: 97.0007 斜距:0.932平距:0.925
SS 点号: 11.6 觇标高:1.500 Pcode: 水平角: 0.0003 天顶距: 97.0009 斜距:0.932平距:0.925
SS 点号: 11.7 觇标高:0.000 Pcode: 水平角: 0.0006 天顶距: 96.5940 斜距:0.932平距:0.925
如何利用程式去指定抓出特定文字後面的值
「测站:」ex. A1
「仪器高:」ex.1.500
「ID:」如果有值的话
「觇标高:」、「水平角:」、「天顶距:」、「斜距:」、「平距:」
「点号:」有文字或数字 ex. 11.1 or Q1
有可能实现这种函数吗？
Read_Value("测站:")
然後函数传回 A1....等值
Read_Value("水平角:")
然後函数传回 0.0006....等值
在下是VB菜鸟，听过VB字串处理很强才开始学
不过这问题对我来说太复杂了！
谢谢您拨冗阅读、回覆。
--
◢◣ ︵︵ █▔◣ █▔█ █▔▔ █▔█ █▆▉ █ █▔█ █◣█ █▔●
◢◤█◣◢◣ ︵︵ █ █ █▁◤ █▁▁ █▁█ ▉▉▉ █ █▁█ █◥█ █ █
梦之大地 逼逼ㄟ四 █▁◤ █ █ █▁▁ █ █ ▉▉▉ █▁ █ █ █ █ █▁◤
※ Origin: <bbs.ccns.ncku.edu.tw> ◆ From: 220.131.230.226