Private Sub Command4_Click()
D.ima As Integer,bASInteger
a=1
b=2
PrintN(a,b)
E.nd Sub
F.unction N(X As Integer,yAsInteger)AsInteger
N=IIf(x>y,x,y)
E.nd Funcfion
A.
B.
C.
D.