vb.net - 线程System.NullReferenceException

Question

我试图在选中或取消选中复选框时启动和停止自动检查功能。

    Private Sub CheckBoxautorefresh_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBoxautorefresh.CheckedChanged
    Dim AutoRefreshThread As Thread = Nothing
    If CheckBoxautorefresh.Checked Then
        AutoRefreshThread = New Threading.Thread(AddressOf Main.AutoRefresh)
        AutoRefreshThread.SetApartmentState(Threading.ApartmentState.STA)
        AutoRefreshThread.Start()
    Else
        AutoRefreshThread.Abort()
    End If
End Sub

当我选中复选框时，它会启动AutoRefresh-Sub，并且可以正常工作。在此之后取消选择它时，在此行中得到System.NullReferenceException:

   AutoRefreshThread.Abort()

自动刷新功能仅每30秒下载一次字符串。
我喜欢用复选框选中此自动刷新功能。
但是由于某种原因，它不起作用。
有人可以帮我吗？ :)

Answer 1

您正在CheckedChanged事件中定义线程:

Dim AutoRefreshThread As Thread = Nothing

如果未选中该复选框，则表示所引用的变量尚未实际实例化(仅在选中该复选框时才会发生)。选中复选框后，您不再引用创建的原始线程。

尝试在事件之外定义 AutoRefreshThread。