End Module procedures that the module comprises. 7 Interface Statement Public Interface MyInterface Sub doSomething() End Interface Declares the name of an interface and introduces the definitions of the members that the interface comprises. 8 Function Statement Function myFunction (ByVal n As Integer) As Double Declares the name, parameters, and Return 5.87 * n code that define a Function End Function procedure. 9 Sub Statement Sub mySub(ByVal s As String) Return Declares the name, parameters, and End Sub code that define a Sub procedure. 10 Declare Statement Declare Function getUserName Lib "advapi32.dll" Declares a reference to a procedure Alias "GetUserNameA" implemented in an external file. ( ByVal lpBuffer As String, ByRef nSize As Integer) As Integer 11 Operator Statement Public Shared Operator + (ByVal x As obj, ByVal y As obj) Declares the operator symbol, As obj operands, and code that define an Dim r As New obj operator procedure on a class or ' implemention code for r = x + y structure. Return r End Operator 12 Property Statement ReadOnly Property quote() As String
procedures that the module comprises. End Module 7 Interface Statement Declares the name of an interface and introduces the definitions of the members that the interface comprises. Public Interface MyInterface Sub doSomething() End Interface 8 Function Statement Declares the name, parameters, and code that define a Function procedure. Function myFunction (ByVal n As Integer) As Double Return 5.87 * n End Function 9 Sub Statement Declares the name, parameters, and code that define a Sub procedure. Sub mySub(ByVal s As String) Return End Sub 10 Declare Statement Declares a reference to a procedure implemented in an external file. Declare Function getUserName Lib "advapi32.dll" Alias "GetUserNameA" ( ByVal lpBuffer As String, ByRef nSize As Integer) As Integer 11 Operator Statement Declares the operator symbol, operands, and code that define an operator procedure on a class or structure. Public Shared Operator + (ByVal x As obj, ByVal y As obj) As obj Dim r As New obj ' implemention code for r = x + y Return r End Operator 12 Property Statement ReadOnly Property quote() As String
computer_science_worksheet_for_class_11.docx