Visual Basic COM基础讲座之属性_VB.NET程序_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

Visual Basic COM基础讲座之属性

作者：闵涛文章来源：闵涛的学习笔记点击数：626 更新时间：2009/4/23 15:02:58

　　属性操作很像公共变量，但属性还有更多的控制。

　　常用属性通常包括"Get(获取)"和"Let(设置)"两种。这两项操作能规定一个主要属性，就像下面的代码片段：

　　Private intAge As Integer
　　　Public Property Get Age() As Integer
　　　Age = intAge
　　End Property

　　Public Property Let Age(ByVal vNewValue As Integer)
　　　intAge = vNewValue
　　End Property
　　上述代码的工作方式极像Age变量的操作。当像下面语句操作变量时，

MyDog.Age = 4
　　就好比运行Let属性，并将4赋给vNewValue。当像下面语句操作变量时，

MsgBox MyDog.Age
　　是获取属性，就好比运行Get属性，并将相应的值由intAge返回。因此，我们可以这样认为：

　　所谓Get属性，就是运行后获取某个值；

　　所谓Let属性，就是运行后让某个属性等于某个值；

　　但至此为止，我们仅仅说明属性工作方式与标准变量极为相似，还没有来得及对属性进行更多的控制。所以，下面就来讨论。

　　打开上一节的工程，对CDog类进行如下修改：

　　从CDog类中去掉Age变量；

　　添加下列代码：

　　FACE="Courier" SIZE=2>

　　Private intAge As Integer
　　Public Property Get Age() As Integer
　　　Age = intAge
　　End Property

　　Public Property Let Age(ByVal vNewValue As Integer)
　　　If vNewValue <= 50 Then
　　　　intAge = vNewValue
　　　End If
　　End Property

　　与前面的代码相比，这里只是对Let属性代码作稍加修改。下面对其作小小的测试，假想用户试图想使：

MyDog.Age=30　　
　　也就是运行Let属性，使vNewValue等于30。代码中，还检测vNewValue是否小于或等于50。显然，30是符合要求的，因此实例中的intAge值等于30。但如果超过50，则什么也不会发生，属性退出且没有任何赋值。当然，我们也可以对此给出相应的错误代码或是显示一个提示对话框。

　　切换到Form1后面的代码窗口；

　　在设置Age属性代码处的第一行语句中单击鼠标，并按F9；

　　MyDog.Age = 4

　　在获取Age属性代码处的第一行语句中单击鼠标，并按F9；

　　MsgBox MyDog.Name & " is " & MyDog.Age & " years old"

　　现在让我们测试一下：

　　按F5运行程序；

　　单击Command按钮；

　　代码应该中断在按F9添加的断点的代码行上。

　　当代码中断后，按F8单步运行并观察结果；

　　现在明白它们是怎样工作的吗？注意Age属性的"get"和"let"是怎样运行的？

　　在下一节中，我们不仅要讨论使用更多属性的方式，而且还讨论如何随意创建它们。

[系统软件]Visual Studio 2005 Express Beta Products 下载链…  [系统软件]Visual FoxPro9.0中扩展报表系统功能
[系统软件]Visual FoxPro：我是旁观者  [系统软件]Visual Studio 2005 Express Editions Beta 2 下载…
[系统软件]Boost库在XP+Visual C++.net中的安装  [系统软件]Visual Studio 2005 Express Edition 正式版下载地…
[常用软件]Visual Foxpro通用报表打印程序  [常用软件]Visual FoxPro 6.0与大型数据库的无数据源连接
[常用软件]Visual Foxpro 的一个BUG  [VB.NET程序]Visual Basic 6 逆向工程与反逆向工程 (2)

教程录入：mintao 责任编辑：mintao

上一篇教程： Visual Basic COM基础讲座之类的建立

下一篇教程： Visual Basic COM基础之更多属性

【字体：小大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网]

　网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

同类栏目

· C语言系列 · VB.NET程序
· JAVA开发 · Delphi程序
· 脚本语言

热门推荐

没有教程

赞助链接

闵涛博文

500 - 内部服务器错误。

您查找的资源存在问题，因而无法显示。

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18

闵涛站盟:医药大全-武穴网。A打造B、C、D……