一行上有两个语句

Question

是否可以在一行上包含两个语句？

If .....
 Else
     Set rng = Nothing and exit Function
 End If
   .AutoFilterMode = False
 End With