Vb.net 如何修复我的登录重置表单？

所以，我有一个表单可以重置你的名字和密码。 当我按下重置键时，它什么也不做，没有错误，什么也不做。我已经包括了登录表单的代码和重置表单的代码。我可以登录，一切正常！只是重置不起任何作用

（词义：（图片上）Név-姓名，Jelszó-密码，Jelenlegi-当前）

我的重置表单的代码：

Imports System.IO
Public Class Reset
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim RDR As StreamReader
    Dim RDRT As String
    RDR = New StreamReader("My.Resources.Regis")
    RDRT = RDR.ReadLine
    If TextBox1.Text = RDRT Then
        RDRT = RDR.ReadLine
        If TextBox2.Text = RDRT Then
            RDR.Close()
            Dim StreamWR As StreamWriter
            StreamWR = New StreamWriter("My.Resources.Regis")
            StreamWR.WriteLine("Name: ")
            StreamWR.WriteLine("Pass: ")
            StreamWR.WriteLine("RegisOld: ")
            StreamWR.WriteLine("NoLogin: ")
            StreamWR.Close()
            MessageBox.Show("Kérlek indítsd újra a programot!", "Sikeres Reset", MessageBoxButtons.YesNo)
        End If
    End If
End Sub
End Class

密码/名称txt文件：

Name:
Pass:
RegisOld:
NoLogin:

---

谢谢大家!

您没有写入任何数据

StreamWR.WriteLine（“Name:”）

只打印您在文件中看到的内容：

Name:

我知道，我按下按钮不会显示MessageBox如果没有显示

MessageBox

，这表明

TextBox1

和

TextBox2

的内容与从“My.Resources.Regis”读取的前两行不匹配. 在dubug模式下逐步执行程序，查看问题所在。