VB⼩技巧——读取⽂本⽂件并显⽰到⽂本框中
textbox控件边框设置VB⼩技巧——读取⽂本⽂件并显⽰到⽂本框中
第⼀步,在⼯具箱添加OpenFileDialog控件
第⼆步 openfiledialog 属性 filter设置为:
⽂本⽂件(*.txt)|*.txt|配置⽂件(*.ini*)|*.ini*|所有⽂件(*.*)|*.*
第三步 添加如下代码:(先添加⼀个按钮和Box)
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
If OpenFileDialog2.ShowDialog()= DialogResult.OK Then
Try
Box3.Text = OpenFileDialog2.FileName
Box2.Text = My.Computer.FileSystem.ReadAllText(OpenFileDialog2.FileName, System.Text.Encoding.Default) '读取TXT⽂件内容ANSI编码 Catch ex As Exception
MessageBox.Show(ex.Message, My.Application.Info.Title, MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End If
End Sub
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论