我在VBA中有以下函数:
Private Function Option1Checked(option1 As OptionButton) As Integer
option1.ForeColor = vbGreen
If (option1.Value = True) Then
Option1Checked = 1
End If
Option1Checked = 0
End Function
每当我尝试像这样调用函数
counter = counter + Option1Checked(OptionButton1)
我在运行时遇到了类型不匹配的错误。但是OptionButton1是一个OptionButton,那么我做错了什么?