Option Explicit
Dim strData
Dim strData() ReDim strData(2)
If a = b Then Elseif c = d Then Else End If
Dim i For i = 0 To 2 Next Exit For
Do While i < 3 Loop Do Loop While i < 3 Do Until > 2 Loop Do Loop Until > 2 Exit Do
getData getData()
Sub getData() End Sub
strData = getData strData = getData()
Function getData() getData = "abc" End Function