首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

instr函数循环输出的有关问题

2013-07-01 
instr函数循环输出的问题|202013000005|20130423194812.0|@a978-7-5135-2677-7@dCNY18.00|@a20130407d2012

instr函数循环输出的问题
|202013000005|20130423194812.0|  @a978-7-5135-2677-7@dCNY18.00|  @a20130407d2012    cd y0chiy0110    ea|1 @achi@ceng|  @aCN@b110000|  @aa   z   000ay|  @ar|1 @a狼犬卡维克@9lang quan ka wei ke@f(美)沃尔特·莫里著@g梁颖译|  @a北京@c外语教学与研究出版社@d2012|  @a233页@c图@d22cm|2 @a传世今典·动物小说| 0@12001 @a传世今典·动物小说|0 @a长篇小说@y美国@z现代|  @aI712.45@v4| 1@c(美)@a莫里@9mo li@b沃尔特@gMorey, W.@4著| 0@a梁颖@9liang ying@4译| 0@aCN@bNLC@c20130423|  @aTSG


如何获取字符串中“|”的位置,并依次输出到text1.text文本中
[解决办法]
本帖最后由 bcrun 于 2013-05-05 09:03:17 编辑

p = InStr(1, s, "
[解决办法]
")
While p > 0
  Print p
  p = InStr(p + 1, s, "
[解决办法]
")
Wend

热点排行