UC知道VB编程-搜索并复制两个指定文字之间的内容
来源：百度知道 编辑：UC知道 时间：2024/05/22 15:35:37
比如有一段文字为：
（名称）中国（语言）汉语;（名称）中国人民共和国（语言）民族语言;（名称）英国（语言）英语;
怎样把（名称）和（语言）中间的文字复制到剪切板上？
（名称）中国（语言）汉语;（名称）中国人民共和国（语言）民族语言;（名称）英国（语言）英语;
怎样把（名称）和（语言）中间的文字复制到剪切板上？
很久没有碰vb了
大概给一下代码
请自行验证
自行补充纠错代码
function getMyStr(theIncom as string,key1 as string,key2 as string) as string
dim m as integer
dim n as integer
dim i as integer
i=length(theIncom)
m=instr(theincom,key1)
n=instr(theincom,key2)
getmystr=leftstr(theincom,key2)
getmystr=right(theincom,key1+length(key1))
//这里可以直接用一个截取中间字符的函数，但是忘记名字了……
//另外文字复制的东西忘记了，笑
//注意截取的时候要考虑key1、key2的长度，详情察看帮助
//不过建议这些东西用vba来做，这样的话复制可以使用selection.copy
//貌似是这样写的
end function