Sub yx(ByVal zf$, ByRef count%) 过程定义中有两个参数,而你在调用的时候只传递了一个参数Label3.Caption = yx(Text1.Text) Text1.Text是一个参数