时间戳

首页 > 解决方案 > 替换文件中的字符串数据

vb.net - 替换文件中的字符串数据

问题描述

所以你几乎已经阅读了标题，

我想让 ResolutionSizeX= 中的任何值都变成 1920 每个数字。

这是我的代码：

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

    My.Computer.FileSystem.WriteAllText("C:\Users\NarpZ\AppData\Local\FortniteGame\Saved\Config\WindowsClient\GameUserSettings.ini",
    My.Computer.FileSystem.ReadAllText("C:\Users\NarpZ\AppData\Local\FortniteGame\Saved\Config\WindowsClient\GameUserSettings.ini").Replace("ResolutionSizeX=", "ResolutionSizeX=1920"),
    False)

End Sub

标签： vb.net

解决方案

未经测试，但它应该可以解决问题。

    Dim strFile As String = "C:\Users\NarpZ\AppData\Local\FortniteGame\Saved\Config\WindowsClient\GameUserSettings.ini"

  If System.IO.File.Exists(strFile) Then

    Dim arrLines() As String = IO.File.ReadAllLines(strFile)

    For i As Integer = 0 To arrLines.Length - 1
        If Strings.Left(arrLines(i),16)="ResolutionSizeX=" Then
            arrLines(i) = "ResolutionSizeX=1920" 
        End If
    Next

    System.IO.File.WriteAllLines(strFile, arrLines) 'SAVE

  End If

推荐阅读