(例1)
dim strSQL as String
strSQL = "Select * " & _
"From T_Hoge" & _
"Where hogeId = 1"
(例2)
Private Declare Function AnimateWindow Lib "user32.dll" _
(ByVal hWnd As Long, _
ByVal dwTime As Long, _
ByVal dwFlags As Long) As Long