vb.net如何打开选定文件夹下所有TXT文件,读取数据,写入数据,并保存数据至新的文件?

191 2024-01-03 02:41

Using FolderBrowserDialog As New FolderBrowserDialog

If FolderBrowserDialog.ShowDialog = Windows.Forms.DialogResult.OK Then

Dim 资料夹 As String() = System.IO.Directory.GetFiles(FolderBrowserDialog.SelectedPath, "*")

For Each 文件 In 资料夹

MsgBox(My.Computer.FileSystem.ReadAllText(文件)) '读取数据

My.Computer.FileSystem.WriteAllText(文件, "数据", False) '写入数据

Next

End If

End Using

顶一下
(0)
0%
踩一下
(0)
0%
相关评论
我要评论
点击我更换图片