Visual Basic

akanchu wrote:

However since no properties are visible in the migrated code we are not able to do the mapping.

Private Sub Main()
    UpdateDriveInformation()
    ProgressIndicator.Style = ProgressBarStyle.Marquee
    startTime = Now
    Timer.Enabled = True

    If PROC_MAKELIST Then
        ThreadID.Text = TXT_MAKELIST
        BackgroundWorker2.RunWorkerAsync()
    Else
        ThreadID.Text = TXT_DELREPORTS
        GroupBox1.Text = TXT_MAKELIST
        BackgroundWorker3.RunWorkerAsync()
    End If
End Sub

Private Sub Timer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer.Tick
    Dim mDbl As Double = Now.ToOADate - startTime.ToOADate
    Dim mDat As DateTime = DateTime.FromOADate(mDbl)
    Try
        Dim mDat2 As Date = Date.FromOADate(mDbl)
        lblTimer.Text = mDat2.ToString("mm:ss")
    Catch ex As Exception
        lblTimer.Text = "Timer Error!"
        Err.Clear()
    Finally
        lblTimer.Refresh()
    End Try
End Sub

Mika Wendelius wrote:

The need to optimize rises from a bad design

Mika Wendelius wrote:

However, it's possible that you are blocking the whole UI thread (I take it that the timer is in main UI thread) and in that case the tick won't occur. If that's true your UI should also be non-responding.

re = New Regex("^(?<start>\w:\\[\w\s]+\\).*\\(?<end>.*)$")
tmpText = re.Match(Text).Result("${start}...\${end}")</end></start>