vb 如何截取动态字符串

来源:百度知道 编辑:UC知道 时间:2024/06/18 10:28:18
请大侠们给与指导指导,如何用VB截取动态字符,并附于不同的TEXT.TEXT.如能带上注解更好,谢谢
例如我有一个文本,
[资料1]
金属类:金=10,银=100,铜=300,铁=1500,铝=800
非金属类:木=1000,塑料=900,布=300,线=700,纸=600
如何在combo的下拉菜单中出现:金属类,非金属类
然后选择:金属类时
将金的10,银的100,铜的300,铁的1500,铝的800
分别附给TEXT1.TEXT,TEXT2.TEXT,TEXT3.TEXT,TEXT4.TEXT,TEXT5.TEXT
选择非金属类时,
显示的是非金属类的数据.
另注,以上数据为动态的,
谢谢.等待中ing...
另外,偶分数不多,先给这些.
有多的一定再追加上...谢谢.
TEXT1.TEXT=10,TEXT2.TEXT=100,TEXT3.TEXT=300,TEXT4.TEXT=1500,TEXT5.TEXT=800

用控件数组
在窗口上放多个控件,然后修改为同一个名字
然后就可以用数组的方式来操作

Text1(0)=10
Text1(1)=100
Text1(2)=300
......

至于数据为动态,如果是固定的格式的话,可以用正则表达式来匹配

金=10,银=100,铜=300,铁=1500,铝=800
金=([0-9]{1,4}),银=([0-9]{1,4}),铜=([0-9]{1,4}),铁=([0-9]{1,4}),铝=([0-9]{1,4})

Text1(0)=mh.SubMatchs(0)
Text1(1)=mh.SubMatchs(1)
Text1(2)=mh.SubMatchs(2)
...........

1.读取资料
2.存入数组
3.动态生成text控件,并存入相应的值
首先必需知道你资料的格式,比如说是
金属:金=1000,银=100,....
非金属:木=1000,...
这样有固定格式才能读取