包含vb.net显示文本的词条

VB.NET怎样打开text文件并显示到文本框里文本框通常用来显示文本字符,以下是用
VB
编写的打开某
txt
文件,并把文件内容显示在文本框的步骤及代码:
1、添加必要的组件(文本框、按钮)
2、设置属性:
3、编写按钮的响应代码:
vb.net 高亮度显示文本选中就是高亮vb.net显示文本 , 首先得到vb.net显示文本你找到vb.net显示文本的文本字符vb.net显示文本的起始位置和长度,然后
TextBox.Select(start,length)

TextBox.SelectionStart = start
TextBox.SelectionLength = length
VB.NET如何显示多种颜色的一段文本?Label控件是没有办法实现多种颜色的文字的,只能用RichTextBox来实现,而且你的自定义格式字符串也没有结尾的,这样很不好,至少也要red红色字/redyellow黄色字/yellow,而且实现也很麻烦的 , 下面的代码我没有检测正确性 , 有错误的自己改一改吧
Dim colortag() as string
dim colors() as color
const txt as string="red红色字/redyellow黄色字/yellow"
private sub Form_Load(object sender,eventargs e)handles mybase.load
colortag(0)="red":Colortag(1)="yellow"
colors(0)=color.red:colors(1)=color.yellow
richtextbox1.text=txt
for i as integer=0 to colortag.lenght-1
dim tag as string=""colortag(i)""
dim endtag as string="/"colortag(i)""
dim find as integer=1
do
find=instr(find,txt,tag) tag.lenght
if(find0)then
dim find1 as integer=instr(find,txt,endtag)
richtextbox1.SelectionStart=find
richtextbox1.selectionlenght=find1-find
richtextbox1.selectioncolor=colors(i)
find=find1
else
exit do
end if
loop
【包含vb.net显示文本的词条】next
end sub
vb.net使用打开对话框,打开一个文本文件显示在文本框中,然后对文本框中的信息进行编辑后读文件内容到TextBox :
Try
Using sr As StreamReader = New StreamReader("C:\\TestFile.txt")
textbox1.Text = sr.ReadToEnd()
End Using
Catch E As Exception
Console.WriteLine(E.Message)
End Try
修改完成后,保存到文件:
Using sw As StreamWriter = New StreamWriter("C:\\TestFile.txt")
sw.Write(textbox1.Text)
sw.Close()
End Using
其中,流构造的参数
New StreamReader("C:\\TestFile.txt")
New StreamWriter("C:\\TestFile.txt")
中的"C:\\TestFile.txt"可以用OpenFileDialog和SaveFileDialog的FileName属性替换.
Dim openFileDialog1 As New OpenFileDialog()
openFileDialog1.InitialDirectory = "c:\"
openFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
openFileDialog1.FilterIndex = 2
openFileDialog1.RestoreDirectory = True
If openFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
Try
Using sr As StreamReader = New StreamReader(openFileDialog1.FileName)
textbox1.Text = sr.ReadToEnd()
End Using
Catch E As Exception
Console.WriteLine(E.Message)
End Try
End If
保存的时候换成SaveFileDialog就好
求大神指点vb.net PictureBox1 上面怎么显示文字呢? 要最小化在还原也不会变的那种VB.NET在PicTureBox控件里显示文本vb.net显示文本,似乎并不简单vb.net显示文本,试试这段代码,自己琢磨一下:
Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
Dim format1 As New StringFormat(StringFormatFlags.NoClip)'封装文本布局信息(如对齐、文字方向和 Tab 停靠位)
format1.LineAlignment = StringAlignment.Center'垂直居中
format1.Alignment = StringAlignment.Center'水平居中
Dim MyFont As New Font("宋体", 12, FontStyle.Regular)
Dim displayRectangle As New Rectangle()'存储一组整数,共四个,表示一个矩形vb.net显示文本的位置和大小
displayRectangle = New Rectangle(New Point(20, 20), New Size(200, 100))
e.Graphics.DrawString("欢迎使用VB Net", MyFont, Brushes.Black, RectangleF.op_Implicit(displayRectangle), format1)'显示单元格里vb.net显示文本的文本
End Sub
vb.net怎么用循环一行一行的取文本文件放到文本框显示Dim st As New System.IO.StreamReader("E:\User Documents\Master\My Documents\电子阅读\一元二次方程.txt", System.Text.Encoding.Default)
Do Until st.EndOfStream
TextBox1.AppendText(st.ReadLine()vbCrLf)
Loop
st.Close()
vb.net显示文本的介绍就聊到这里吧 , 感谢你花时间阅读本站内容,更多关于、vb.net显示文本的信息别忘了在本站进行查找喔 。

    推荐阅读