1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
@Code
Dim i as Integer = 1
End Code
@While i <= 10
@<p>Hello from VB.Net, #@(i)</p>
i += 1
'End While
End While
@If i = 11 Then
@<p>We wrote 10 lines!</p>
Dim s = "End If"
End If
@Select Case i
Case 11
@<p>No really, we wrote 10 lines!</p>
Case Else
@<p>Actually, we didn't...</p>
End Select
@For j as Integer = 1 to 10 Step 2
@<p>Hello again from VB.Net, #@(j)</p>
Next
@Try
@<p>That time, we wrote 5 lines!</p>
Catch ex as Exception
@<p>Oh no! An error occurred: @(ex.Message)</p>
End Try
@With i
@<p>i is now @(.ToString())</p>
End With
@SyncLock New Object()
@<p>This block is locked, for your security!</p>
End SyncLock
@Using New System.IO.MemoryStream()
@<p>Some random memory stream will be disposed after rendering this block</p>
End Using
@SyntaxSampleHelpers.CodeForLink(Me)
|
