国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

VB.Net打開文本文件，編輯修改后進行保存的方法   代碼如下：

Public Class Form1

    Dim fileName As String

    Private Sub Button1_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button1.Click

        '選擇一個文本文件
        OpenFileDialog1.ShowDialog()
        fileName = OpenFileDialog1.FileName

        '將文本文件讀入文本框
        TextBox1.Text = _
            My.Computer.FileSystem.ReadAllText(fileName, _
            System.Text.Encoding.GetEncoding("GB2312"))
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button2.Click

        My.Computer.FileSystem.WriteAllText(fileName, TextBox1.Text, False, _
            System.Text.Encoding.GetEncoding("GB2312"))
        MsgBox("保存成功")
    End Sub
End Class