小白自学，求助大神

想根据字段自动添加label控件，利用fcount（或reccount）和for循环顺利建立label，label的caption就是字段名或数据值。

现在想要给每个label加上click事件，在点击该label时把label的caption值传递出去，就在for中添加procedure form1.&labelname..click和endproc，编译提示出错，将procedure...endproc做成独立prg执行也无效，只能把最后一个label的caption值传递出去而且点击无效~

方法很笨，请大神指导~~

另外尝试强行用bindevent（）绑定click事件，可以实现每个label添加click事件控制其他form控件等功能，但是就是没法传递caption值出去，不知道应该怎么写句子

[此贴子已经被作者于2020-5-12 00:25编辑过]

已解决，非常好用，谢谢！！！！！！

谢谢大大回复，小白刚开始自学，很多自定义类等高级手法还不会，也没有好的编程习惯，慢慢学习中~~~~

多谢多谢，多交流相互学习

查了好多，目前发现只能用bindevents绑定~~现在代码已经用的烂熟了，可是原理依然没弄明白。。。。