作者ai15 (振袖)
看板Visual_Basic
标题Re: [.NET] VS2008 richtextbox的几个小问题
时间Fri Jun 24 07:25:32 2011
※ 引述《ai15 (振袖)》之铭言:
: 请输入专案类型(网站专案或者应用程式专案):vs2008
: 1.我想做出像记事本一样可以有自动换行的功能,请问该怎麽做?
: 我想用MenuStrip_Click来执行,
: 本来的想法是当文章内容遇上句号就自动断行(IF....EndIf),
: 可是做不出来┬▽┬
: 上网查了一下,我是不是应该用循序抓取出句号再+vbCrLf这样比较好?("。"+vbCrLf)
: 只是特别抓出某字元再断行的程式我写不出来......
Dim a As Byte
a = Val("。")
f_num = FreeFile()
Do While Not (f_num)
Input(f_num, 1)
If a = "。" Then
txtnote.Text = f_num + vbCrLf
End If
Loop
上面是自己想的,可是会在Input(f_num,1)这边发生问题(IOException未处理),
(其实也写到不知道自己在写什麽了....)
有人知道该怎麽作吗?
: 在一开始有宣告
: Public Class Form1
: Dim pf_name As String
: Dim f_name As String
: Dim f_num As Integer
: 像这样↑
: 以上两个问题请大家帮帮忙 谢谢! ^▽^
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 125.231.188.100
※ 编辑: ai15 来自: 125.231.188.100 (06/24 07:26)
※ 编辑: ai15 来自: 125.231.188.100 (06/24 07:29)
1F:→ MOONRAKER:replace()一次不就结了 06/24 10:08
2F:→ MOONRAKER:先前讲的每秒replace()是错的,那会让文字越长越大,但 06/24 10:09
3F:→ MOONRAKER:是一次replace当然不会有这个问题。完全看不出来你自己 06/24 10:09
4F:→ MOONRAKER:硬干有什麽好处。 06/24 10:09
5F:→ MOONRAKER:又者,我第一次知道VB.NET还留着input。 06/24 10:11
6F:→ ai15:我是新手,所以还有很多地方不知道,像replace()我就不知道 06/24 19:23