定时器
Private objTimer As System.Threading.Timer
Public Sub New()
Dim tcb As New System.Threading.TimerCallback(AddressOf TimerMethod)
objTimer = New System.Threading.Timer(tcb,Nothing,TimeSpan.FromSeconds(1),TimeSpan.FromSeconds(10))
End Sub
Private Sub TimerMethod()
objTimer.Dispose()
End Sub
获取dll路径（含名称）：
Dim s As String
s = Assembly.GetExecutingAssembly().Location
获取dll版本号：
Dim s As String s = Assembly.GetExecutingAssembly().GetName().Version.ToString()
原文链接：https://www.f2er.com/vb/256437.html