ps在选区内输入文字 VB Text里当鼠标单击某一行时即自动选取整一行文字？

VB Text里当鼠标单击某一行时即自动选取整一行文字？

只需使用这串代码。。privatesubtext1_uClick（）I=Text1。Selstart J=I do IFI=0 theme=1 IFT=0然后“如果找不到行尾，ifmid（Text1。Text，I，1）=Chr（13）theme=1“查找行的结尾，I=I-1 ENDIF ifmid（text1）。Text，J，1）=Chr（13），然后=1“如果J=len（Text1），则查找行的开头。Text）然后=1 J=J 1 ENDIF loopwhile（t=0或=0）Text1。Selstart=I文本1。Sellength=j-i-1端接头

ps在选区内输入文字 vb如何在窗体显示文字 vb如何在text里面显示文字

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。