有如下一个函数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处理选中状态。
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处理选中状态。
解决方案 »
- 大家都到哪里找东西啊?
- 哪位有窗体的ico图标和漂亮的窗体背景?
- 菜鸟请教:设@a='name',如何用@a代替select name from Table1中的"name"???我试过select @a from Table1不行
- 捕捉窗体最小化时的事件
- VB怎样读取库中的二进制数据? 急..
- 为什么Label控件总在TabStrip控件后面,被覆盖在后面了,其他的控件不会.
- 请帮助我
- vb 编写telnet 功能时返回的一些非乱码的字符
- 如果调用VB API 禁止窗口移动
- 一个关于MSFLEXGRID的问题
- VB如何读取二进制数据
- 查询一个80万的IP地址数据库,VB程序会在查询的时候停顿,必须在查询完成后才能进行其它操作,请教高手如何处理?
参考byval vb 的特殊用法
调用时,只能用 Byval 关键字。