1、查看窗体上控件是否齐全,2、查看Check1控件是否为控件数组形式,不是的话删除其它的只留下Check1,然后 在它上面右单击鼠标,选择复制,然后移动 鼠标到没有控件的地方,右单击鼠标,选择 粘贴,在弹出的窗口选择”是“,然后继续 粘贴到你想要的个数为止。
Private Sub Command1_Click()'Dim y%, m%y = Val(Text1.Text) ' 注意!这两行,需要改成点".",而不是逗号","!并且在点右边没有空格!m = Val(Text2.Text)Print "本年为;"; y; "年"; m; "月"; IIf(Day(DateSerial(y, 3, 0)) = 29, "闰年", "不是闰年")Print "目...
vb错误的参数号或无效的属性赋值 代码如下:PrivateSubCommand1_Click()Dimz1,z2,z5AsIntegerDimi,m,n,a,P,n1,n6,n16,TAsDoublei=Val(Text2,Text)P=Val(Text1,Text)n=Val(Text4,Text)m=Val(Text3,Text)DimkAsIntegerD... 代码如下:Private Sub Command1_Click()Dim z1, z2, z5 As IntegerDim...
一般情况下是你的函数需要传入的参数与你真正传入的参数个数不符造成的,也有可能是你用到的控件属性赋值不符合要求。
这一般是你的函数需要传入的参数与你真正传入的参数个数不符,也有可能是你用到的控件属性赋值不符合要求造成的。
DisplayLine这个函数找不到或参数错误,你要到frmButtonMain定义的这个类里找这个函数的定义看看是写的不全,还是你调用的时候用的不正确
你多了个参数,可能。Sub RegWrite(Name As String, Value, [Type])
请注意,sin是一个函数,不能用作变量名、控件名等,Private Sub sin_Click() 这里的sin请改成其他的如改成Private Sub CmdSin_Click() ,当然,属性窗口那边也是改成一样的。改了之后估计你还有其他问题,再追问吧,满意请采纳!
问题的提示是在这,但出错不一定是这句,你要向上翻,看看MYFEATURE的定义。
在我电脑上可以正常的运行。y = Val(Text1, Text)m = Val(Text2, Text)里面的逗号改为.y = Val(Text1.Text)m = Val(Text2.Text)