有如下一个函数Private Function s(Byref d As Long) As Long
  Dim m As Long
  m = d
End Function以下是某个调用此函数的过程
Private Sub Command1_Click()
  dim a as long ,b as long
  c=1234
  a=s(byval c)
  a=s(byref c)
End Sub为什么 a=s(byval c) 没有问题,而写完 a=s(byref c)就直接提示 缺少表达式,且byval处理选中状态。