'假设position已经有了
类CCommand:
Public Sub RButtonDown(pPos As Position)
End Sub类Ccreateline:
Implements CCommand
Private Sub CCommand_LButtonDown(pPos As Position)
Dim pTempLine As CLine
...
end sub'然后
Dim pCommand As CCommand
Dim pCreateLine As New CCreateLine'再然后
set pcommand=pcreateline'问题1:在那里能找到msdn中文版下载
'问题2:这个set pcommand=pcreateline起到了什么作用????传递变量??这两个类都没有读写变量的属性啊
'问题3:Implements 是什么意思,呜呜,买不到msdn.大家多多帮忙了
类CCommand:
Public Sub RButtonDown(pPos As Position)
End Sub类Ccreateline:
Implements CCommand
Private Sub CCommand_LButtonDown(pPos As Position)
Dim pTempLine As CLine
...
end sub'然后
Dim pCommand As CCommand
Dim pCreateLine As New CCreateLine'再然后
set pcommand=pcreateline'问题1:在那里能找到msdn中文版下载
'问题2:这个set pcommand=pcreateline起到了什么作用????传递变量??这两个类都没有读写变量的属性啊
'问题3:Implements 是什么意思,呜呜,买不到msdn.大家多多帮忙了
set pcommand=pcreateline是请求CcreateLine类的一个实例pCreateLine返回CCommand接口给pcommand
先感谢bdhh(Silent) ,但是还请问:implements 只包含成员过程的声明部分
那个CCommand类中的Public Sub RButtonDown(pPos As Position)是不是声明啊?还有这个CCommand_LButtonDown是不是必须要这么写啊格式是: 引用的类_被引用的函数名(这是习惯还是一个固定的格式???)"set pcommand=pcreateline是请求CcreateLine类的一个实例pCreateLine返回CCommand接口给pcommand"是什么意思??在这个例子中返回了什么???msdn我已经找到,只要这三个问题回答完了就结贴.多谢多谢
对只是声明 ,接口类里不用实现 在实现类(使用implements 的类)里实现
//还有这个CCommand_LButtonDown是不是必须要这么写啊格式是: 引用的类_被引用的函数名(这是习惯还是一个固定的格式???)
这个是固定的格式 在VB代码上面又个下拉框可以选择相应的函数,另外事件不能多态//"set pcommand=pcreateline是请求CcreateLine类的一个实例pCreateLine返回CCommand接口给pcommand"是什么意思??在这个例子中返回了什么???
这是多态的标准写法,因为 类CCommand 也可以被别的类实现 譬如另一个类 Ccreateline2 也使用Implements CCommand 来创建接口,这样使用set pcommand=pcreateline 来选择到底由哪个类来实现