A.Sub f1(ByVal() As Integer)
B.Sub f1(n() As Integer)As Integer
C.Function f1(f1 As Integer)As Integer
D.Function f1(ByVa1 f as Integer)