Question

我有我的主要表格，叫做家。

Home有一个名为＆＃39; activeuser＆＃39;的公共变量。此变量是一个字符串，其中包含用户名，例如＆＃34; John Smith＆＃34;。

我的其他形式之一＆＃39; caseupdate＆＃39;有一个后台工作程序，由计时器触发。此后台工作程序检查MySQL数据库以查找新记录，特别是那些被分配了＃34;对于登录的用户。

我认为这很简单，在我的SQL语句中，我只是......

    dim currentuser as string = home.activeuser

这根本不起作用，我不知道如何将用户名值输入后台工作程序以使一切正常。

任何帮助appriciated！：）

Answer 1

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    Me.RunWorker()
End Sub

Private Sub RunWorker()
    If Not Worker.IsBusy Then
        Me.Worker.RunWorkerAsync("Pablo")
    End If
End Sub

Private Sub Worker_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles Worker.DoWork
    Dim result As Boolean
    If e.Argument = "root" Then
        result = True
    Else
        result = False
    End If
    e.Result = result
End Sub

Private Sub Worker_Completed(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles Worker.RunWorkerCompleted
    MsgBox(e.Result)
End Sub

后台工作者无法从其他表单中读取变量

1 个答案: