Please enable JavaScript to use regex101
/
^
r
e
g
e
x
[
\
-
_
]
?
1
0
1
$
/
i
Reg
ular
Ex
pressions
101
Upgrade to Pro
Enterprise
Regular Expression
/
Public(?: ReadOnly)? Property (?<prop>.*?)\(\) As [a-zA-Z]*(?: Implements )?.*? End Property
/
gis
Input 1
Imports System.Windows.Forms Imports System.Drawing Imports CapReportLib Imports ReportControls.Database Imports System.Threading Imports System.ComponentModel Public Class Report : Implements IReport #Region "Fields" Friend MyReportRunTime As TimeSpan Friend MyLastException As New Exception("No Errors") Friend RepParams As New ReportParameters() Friend Shared DBA As ReportControls.Database.DataAccess Private lastResult As New ReportResult(False, New TimeSpan, String.Empty) Private Shared delRunReport As IReport.Execute = Nothing Private repSync As ISynchronizeInvoke Private repThread As Thread Private repHandler As IReport.ReportHandler Private repParamsSync As ISynchronizeInvoke Private threadIsRunning As Boolean = False Private Delegate Sub EnableCsvHandler(ByVal enable As Boolean, ByVal value As String) Private enableCsv As EnableCsvHandler Private csvData As String = String.Empty Private startDate As Date = Now P
Extraction
Imports System.Windows.Forms Imports System.Drawing Imports CapReportLib Imports ReportControls.Database Imports System.Threading Imports System.ComponentModel Public Class Report : Implements IReport #Region "Fields" Friend MyReportRunTime As TimeSpan Friend MyLastException As New Exception("No Errors") Friend RepParams As New ReportParameters() Friend Shared DBA As ReportControls.Database.DataAccess Private lastResult As New ReportResult(False, New TimeSpan, String.Empty) Private Shared delRunReport As IReport.Execute = Nothing Private repSync As ISynchronizeInvoke Private repThread As Thread Private repHandler As IReport.ReportHandler Private repParamsSync As ISynchronizeInvoke Private threadIsRunning As Boolean = False Private Delegate Sub EnableCsvHandler(ByVal enable As Boolean, ByVal value As String) Private enableCsv As EnableCsvHandler Private csvData As String = String.Empty Private startDate As Date = Now P