vb.net 在每一个winform的textbox7 显示登入者的UserName以及ModDepartment

在VB.NET中，如果你想要在每个Windows Form（窗体）的TextBox控件（如TextBox7）里显示登录用户的用户名和部门，你可以这样做：

1. 首先，在用户成功登录后，你需要存储用户名和部门信息。这通常在`Login`事件处理程序或登录验证后的某个方法中完成。假设你有一个全局变量或属性`CurrentUser`来保存这些信息。

Public Class MainForm
    Public Property CurrentUser As User
End Class

' 在登录方法中设置 CurrentUser
Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
    If loginValidation() Then
        Dim newUser As New User ' 这里假设User是一个自定义类，包含UserName和ModDepartment属性
        CurrentUser = newUser
    End If
End Sub

2. 然后，在Form_Load或TextBox7加载时，更新其文本内容。

Private Sub MainForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    TextBox7.Text = "用户名: " & CurrentUser.UserName & ", 部门: " & CurrentUser.ModDepartment
End Sub

3. 如果用户名和部门信息变化，确保及时更新`TextBox7`的内容。例如，在`User`类中添加一个`UpdateProperties()`方法。

Public Class User
    Public Property UserName As String
    Public Property ModDepartment As String
    
    Public Sub UpdateProperties()
        TextBox7.Text = "用户名: " & UserName & ", 部门: " & ModDepartment
    End Sub
End Class

每当`CurrentUser`的属性发生变化时，调用`UpdateProperties`即可。