PreExecuteReportSet.md
... ...
@@ -60,7 +60,7 @@ End Sub
60 60
61 61
##Hidden Filter VB.NET
62 62
63
-```VB
63
+```visualbasic
64 64
Public Overrides Sub PreExecuteReportSet(ByVal reportSet As Izenda.AdHoc.ReportSet)
65 65
MyBase.PreExecuteReportSet(reportSet)
66 66
Dim emails(1) As String
... ...
@@ -72,7 +72,7 @@ Public Overrides Sub PreExecuteReportSet(ByVal reportSet As Izenda.AdHoc.ReportS
72 72
filter.Values = emails
73 73
reportSet.Filters.AddHidden(filter)
74 74
End Sub
75
-```
75
+
76 76
77 77
##Using a stored procedure
78 78