怎样用VB复制字符


昨天考试有一道题不会做,题是这样的,画两个文本框 ,两个按钮,假定文本框名为TXT1,TXT2,按钮caption为复制,删除
要求是你在TXT1中输入一些字符,并用鼠标拖动选中其中的一部分字符,点击复制按钮,可以把你所选中的字符复制到TXT2中,点击删除则是删除你选中的字符,请问应该怎样实现啊,谢谢~~~

解决方案 »

  1.   

    示意程序
    sub 复制_click()
        text2.text = text1.seltext
    end sub
    sub 删除_click()
        text1.seltext = ""
        text2.seltext = ""
    end sub
      

  2.   

    text2.text=text1.SelText
    若是删除就自己再想办法了，利用一些函数很容易实现的
      

  3.   

    text1.seltext
    不是text1.text 
    楼主看清楚
      

  4.   

    靠！代码总是记不住
    只好给你说思路了！
    有人看的懂我说的
    请写代码：先找到光标在text1中的位置，好象是text1.sets...什么的，记不清了，返回一个integer数
    然后text2.text=right(text1.text,len(text1.text)-text1.sets...)好象是text1.setstort
      

  5.   

    text1.setstart
    就是他了！
    呵呵
    还有可能不对！
      

  6.   

    text2.text = text1.seltext
    ------------------------------
    抱歉。笔误。正确的就象Featured所说是：
    text2.seltext = text1.seltext
      

  7.   

    我搞糊涂了。楼主说：“点击复制按钮,可以把你所选中的字符复制到TXT2中”，什么意思啊？
      

  8.   

    楼主有没有运行过我的代码（应该很容易变成实际代码的），再加上被大家一讨论，我有点不明白了：如果楼主的目的就是：Text2的内容就是Text1选中的部分。那么我第一次的回答就是正解。
      

  9.   

    to YaDa:
    抱歉,我运行的时候把代码输入错了,呵呵,OK了谢谢大家