您的位置：程序门 -> vb -> 控件

如何在richtextbox最后一行，加一条蓝色的一行，然后再把这行删掉（点按钮才删)，注意只是最后一行

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

如何在richtextbox最后一行，加一条蓝色的一行，然后再把这行删掉（点按钮才删)，注意只是最后一行[已结贴,结贴人:zhangna1986_1]

发表于：2007-06-22 11:47:33 楼主

如何在richtextbox最后一行，加一条蓝色的一行文字，然后再把这行删掉（点按钮才删)，注意只是richtextbox最后一行,在线，解决即结贴

发表于：2007-06-22 13:08:101楼得分:80

private const cstrtemp as string = "wahaha "

private sub command3_click（)
richtextbox1.text = mid（richtextbox1.text, 1, len（richtextbox1.text) - len（cstrtemp) - 1)
end sub

private sub form_load（)

with richtextbox1
.text = richtextbox1.text & vbcrlf & cstrtemp
.selstart = len（richtextbox1.text) - len（cstrtemp)
.sellength = len（cstrtemp)
.selcolor = vbblue
end with
end sub

发表于：2007-06-22 15:26:582楼得分:20

http://www.cnpopsoft.com/article.asp?id=18

下一篇：谁用过imagxpress professional 控件
上一篇：listview托拽问题

其他资讯