我想问清楚什么是“对像”“属性””事件“”方法“！

Question

我是一个初学者，请多多帮忙。能举个例子吗，使我更容易明白，，谢谢~

Answer 1

来自MSDN
对象模型 ：
通过创建类模块并赋以属性和方法，就可以定义了类，接着就可以由该类创建任意数量的对象。如何记录所创建的这些对象呢？记录对象最简单的办法，莫过于为创建的每个对象都声明一个对象变量。当然，这样对能够创建对象的数量就有了限制。可以在某个数组或者集合中保持多个对象引用，就象在本章前面的“创建对象数组”和“创建对象集合”中所讨论的那样。刚开始时，可能要定位窗体或标准模块中的对象变量、对象数组以及对象集合，就跟处理普通变量一样。但是，随着添加更多的类，可能会发现正使用的这些对象之间有明确的关系。对象模型表达了包含关系
对象模型给出了基于对象程序的结构。通过定义程序中所使用的对象之间的关系，对象模型能够以一种使编程变得更容易的方式来组织对象。一般来说，对象模型表达了这样一个事实：即某些对象是“更大的”，或者说比其它对象更重要一些—可以认为这些对象是包含其它对象的对象，或者是由其它对象所组成的对象。例如，在编程时，可能创建一个 SmallBusiness 对象来作为程序的核心。可能想让这个 SmallBusiness 对象包含与其关联的其它类型的对象，比如 Employee 对象和 Customer 对象。可能同时也希望它包含一个 Product 对象。在图 9.11 中显示了该程序的对象模型。属性：
属性页的工作方式
属性页看起来很象窗体，而且设计属性页也类似于设计窗体。但是，属性页的工作方式却与窗体的工作方式并不相同。例如，当“属性页”对话框创建属性页的一个实例时，PropertyPage 对象所得到的第一个事件是 Initialize 事件—这跟窗体的情况是一样的。但是，与窗体不同的是，PropertyPage 对象并不获得 Load 事件。PropertyPage 对象的关键事件是 SelectionChanged 事件。本主题要检查 PropertyPage 对象所必须做的三件事： 在 SelectionChanged 事件中，获得要编辑的属性值。
不论用户何时编辑属性值，都要设置 PropertyPage 对象的 Changed 属性。
在 ApplyChanges 事件中，将已编辑的属性值复制回已选定的控件。 

Answer 2

对像
一台洗衣机属性外表颜色:白色
高：100cm
宽：50cm
事件
衣服洗玩了，发出警报方法
搅拌
脱水(参数：转速800)
烘干（参数:温度1000C）

Answer 3

CWashingMachineprivate const mclColor as long=White  '常量
private const mclHeight as long=1000private m_lTemp as long               '全局变量public event Complete()               '声明洗衣完成的事件
public event Warning(msg as string)   '声明发生问题事件(msg为问题描述)public Property Get Color() as Long  '只读属性
    Color=mclColor
End Propertypublic property get Height() as long '只读属性
    Height=mclHeight
End propertypublic property get Temp() as long    '可修改属性
    Temp=m_lTemp
End Property
public property let Temp(byval lTmp as long)
    m_lTemp=lTmp
End PropertyPublic Sub Start() '方法，外部操作
    Dim nCount as long,sBuf as string
    For ncount=1 To 3
        If DoOperation(nCount,sBuf)=false Then raiseevent Warning(sBuf) '发生问题，引发事件，你来操作
    next
    RaiseEvent Complete() '洗衣完成，引发事件，有外部（你）来控制
End Sub Private Function DoOperation(byval lStep as long ,byref sMsg as string ) as boolean '洗衣机内部操作
    Select case lStep
        case 0 '步骤1，加水
        Case 1 '洗涤
case 2 '脱水
        Case 3 '烘干
    End select
    sMsg=Err.description
    DoOperation=(ERr.number=0)
End Function给你写了个洗衣机的类，参考一下吧

Answer 4

谢谢各位的帮助，，，，万分感谢，
特别是~~~nik_Amis(Azrael)谢~~~~