VB多窗体传值问题：stock.vb标签无法获取login.vb的LoginUser值

看起来你遇到的问题核心在于窗体实例的生命周期，咱们一步步拆解原因和解决方案：

问题根源 #

你在login.vb里用Public LoginUser As String声明的变量，是属于login窗体实例的。当你登录后如果用Me.Close()关闭了login窗体，这个实例就会被销毁。之后stock.vb里通过My.Forms.login.LoginUser访问时，VB.NET会自动创建一个全新的login窗体实例——这个新实例里的LoginUser是空的，自然显示不出内容。

而dashbord.vb能正常显示，大概率是因为你在login窗体还没关闭的时候就打开了它，此时访问的还是原来的那个login实例，所以能拿到正确的LoginUser值。

几种可行的解决方案 #

方案1：隐藏而非关闭登录窗体 #

最简单的临时解决方法：把登录按钮事件里的Me.Close()改成Me.Hide()，这样原来的login窗体实例会保留在内存中，后续任何窗体通过My.Forms.login.LoginUser都能拿到正确的值。

示例代码（login.vb登录按钮事件）：

Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
    LoginUser = txtUser.Text
    ' 打开dashboard窗体
    My.Forms.dashbord.Show()
    ' 隐藏登录窗体，而不是关闭
    Me.Hide()
End Sub

方案2：使用静态类存储全局用户信息 #

这是更规范的做法，避免依赖窗体实例的生命周期。创建一个专门的静态类来保存当前登录用户信息，所有窗体都从这里读取：

1. 添加一个新的类文件（比如UserSession.vb）：

Public Class UserSession
    ' 静态属性，全局可访问
    Public Shared Property CurrentLoggedInUser As String
End Class

2. 在login.vb的登录按钮事件中赋值：

Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
    UserSession.CurrentLoggedInUser = txtUser.Text
    My.Forms.dashbord.Show()
    Me.Close() ' 现在可以放心关闭登录窗体了
End Sub

3. 在dashbord.vb的Load事件中读取：

Private Sub Dashbord_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    hi.Text = UserSession.CurrentLoggedInUser
End Sub

4. 在stock.vb的Load事件中读取：

Private Sub Stock_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Label1.Text = UserSession.CurrentLoggedInUser
End Sub

方案3：打开窗体时直接传递用户信息 #

如果不想用全局变量，可以在打开stock窗体的时候，把用户信息直接传递给它：

1. 在stock.vb里声明一个公共属性：

Public Property LoggedInUser As String

2. 在dashbord.vb中打开stock窗体的地方（比如某个按钮事件）：

Private Sub btnOpenStock_Click(sender As Object, e As EventArgs) Handles btnOpenStock.Click
    Dim stockForm As New stock()
    ' 传递用户信息
    stockForm.LoggedInUser = UserSession.CurrentLoggedInUser ' 或者用My.Forms.login.LoginUser（如果login没关闭）
    stockForm.Show()
End Sub

3. 在stock.vb的Load事件中赋值：

Private Sub Stock_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Label1.Text = LoggedInUser
End Sub

推荐用方案2，这是企业级开发中常用的方式，结构清晰，不依赖窗体实例的状态。

内容的提问来源于stack exchange，提问作者Abhi Banik