首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

!button 作为参数传递,类型不功不匹配

2012-02-19 
求助!button 作为参数传递,类型不功不匹配如新建一个标准工程,添加一控件button名为cmdButton1,把cmdButto

求助!button 作为参数传递,类型不功不匹配
如新建一个标准工程,添加一控件button   名为   cmdButton1,把cmdButton1作为参数传给TestSub,报 "Run-time   error '13 ':type   mismatch ",重装系统前还是好的,现在不知道少了些什么东东就变的不能用了,还望高手不吝赐教,谢了先!

代码如下:

'引用了控件:Microsoft   windows   common   controls   6.0(sp6)

Private   Sub   Form_Load()
        TestSub   cmdButton1
End   Sub

Private   Sub   TestSub(ByVal   cmdTestButton   As   Button)
        MsgBox   cmdTestButton.Caption
End   Sub


[解决办法]
'引用了控件:Microsoft windows common controls 6.0(sp6)

Private Sub Form_Load()
TestSub cmdButton1
End Sub

Private Sub TestSub(Byref cmdTestButton As Button)
MsgBox cmdTestButton.Caption
End Sub

------------------------
button是类对象,不能传值,应该传址

热点排行