请帮分析以下函数错在哪里？？

access_boy_li · 发表于 2009-5-13 00:55:33

Public Function getCenter(frm As Form)
Dim intLeft As Integer
intLeft = (Forms.[frm].WindowWidth - Forms.[frm].[lbl].Width) / 2
End Function

Private Sub Command7_Click()

Label1.Move getCenter(frm1)

End Sub

编译错误:
ByRef 参数类型不符.

tz-chf · 发表于 2009-5-13 06:08:56

变量写法不对

access_boy_li · 发表于 2009-5-13 10:07:54

谢谢，可以指出错在哪里吗？？不知道怎么改？？

tz-chf · 发表于 2009-5-13 14:45:24

intLeft = (frm.WindowWidth - frm.[lbl].Width) / 2

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] 请帮分析以下函数错在哪里？？

群介绍
主题无相 (随机显示版	同地区群块其他地区)