VB.NET对象的广泛应用

代码重用简化了开发过程 而可视化继承之类的功能又使得代码重用更加方便 然而 代码重用并不局限于此 借助作为VB NET基础的CLR（Common Language Runtime 公共语言运行时环境） 我们可以在VB NET中继承其他VS NET语言编写的类 例如我们可以编写一个C#类 然后在VB NET类中继承该C#类

成都创新互联长期为上千客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为仁寿企业提供专业的成都网站制作、成都做网站、外贸营销网站建设，仁寿网站改版等技术服务。拥有10余年丰富建站经验和众多成功案例,为您定制开发。

VB NET的面向对象功能已经向各个方向扩展 甚至深入到了语言本身——在VB NET中 一切都是对象 它意味着和以前的VB版本相比 我们从VB NET本身获得的支持和功能要多得多 求助于Windows API的时候将更少 例如 在以前的VB版本中 我们用LoadPicture方法装入一个图形 用Line方法（或者其他速度更快的API函数）画线 而在VB NET中 我们用System Drawing对象创建和处理图形 下面这段代码用System Drawing对象在窗体上显示一个图形

picshowpicture Image = _ system Drawing Image FromFile（ _ c test bmp ）

注意 VB NET的 一切都是对象 可能会使代码变得冗长 考虑下面这个语句 它在一个图形对象上面画一条黄绿色的线

objgraphics DrawLine（system Drawing _ Pens Chartreuse ）

语句虽然变长 但它获得的好处是 更加灵活 更加容易使用 以前 要实现一些较为复杂的功能往往要深入弯弯研究文档 通常还要求助于API 现在 所有相关的功能集都封装到了对象之中 用对象封装功能还有额外的优点——对象以一种极为优美的形式把相关功能组织了起来 所以浏览各个对象 看看它们到底做些什么 事实上也是一件有趣的事情

Visual Basic NET的面向对象特色带来了许多切实的好处 大多数情况让猛下埋滑闷 和以前的VB版本相比 VB NET面向对象的本性以及它对继承的支持使得创建某些类型的应用更加快速和方便 然而 虽然我们可以使用继承以及其他 NET的新功能 比如自由线程 但这些功能并不是一定得使用不可 正如所有其它语言的功能 我们必须使用的功能是那些对给定情形来说最具有意义的功能

lishixinzhi/Article/program/net/201311/11301

vb点虐 创建没有窗体的应用

软件bug。vb点虐 创建是会有窗体蔽羡进行应用的，没有应用就是软件bug原因庆旅，需要用户将软件关闭，点击系统修复下载，再打誉并凳开软件即可。

vb点虐 字符串的操作应用

字符串的操作应用

[vb]

Module Module

Sub Main()

定义 个字符串变量

Dim str str str As String

给str str 付初值

str = Hello : str = World

Console WriteLine( 方法Concat )

连接一个或多个字符串

Console WriteLine( str ={ } str ={ } String Concat(str str )={ } str str String Concat(str str ))

判断字符串中是否具有相同的值返回类型为高乱逗布尔型

Console WriteLine( 方法Equals )

Console WriteLine( str ={ } str ={ } String Equals(str )={ } str str str Equals(str ))

在字符串中指定索引位置插入指定的字符串

Console WriteLine( 方法Insert )

str = : str = aaa

Console WriteLine( str ={ } str ={ } str Insert( str )={ } str str str Insert( str ))

左右对齐字符串中的字符

Console WriteLine( 方法PadLeft/PadRight )

str = World : str = 世界

Console WriteLine( str ={ } str )

Console WriteLine( str PadLeft( * )={ } str PadRight( * )={ } str PadLeft( * ) str PadRight( * ))

Console WriteLine( str ={ } str )

Console WriteLine( str PadLeft( * )={ } str PadRight( * )={ } str PadLeft( * ) str PadRight( * ))

找出指定字符串或字符转在此字符串中的第一个 最后一戚卖个匹配项的索引位置

Console WriteLine( 方法IndexOf/LastIndexOf )

str = Visual Basic NET ASP NET C# NET

Console WriteLine( str ={ } str )

Console WriteLine( str IndexOf( NET )={ } str LastIndexOf( NET )={ } str IndexOf( NET ) str LastIndexOf( NET ))

将字符串中的字符复制到字符串数组

Console WriteLine( 方法ToCharArray )

str = str ToCharArray(str IndexOf( NET ) )

Console WriteLine( str ={ } str )

Console WriteLine( str ToCharArray(str IndexOf( NET ) )={ } str )

在指定字符串数组的每个元素之间串联指定的分隔符 产生陪斗单个串联的字符串

Console WriteLine( 方法Join )

Dim myArray( ) As String

myArray( ) = I : myArray( ) = am : myArray( ) = a : myArray( ) = student

For i As Integer = To

Console Write( myArrat({ })={ } i myArray(i))

Next

Console WriteLine()

Console WriteLine( String Join( * myArray)={ } String Join( * myArray))

此字符串中删除指定个数字符

Console WriteLine( 方法Remove )

str =

Console WriteLine( str ={ } str Remove( )={ } str str Remove( ))

将此字符串指定字符串字符的所有匹配项代替为其他指定字符串

Console WriteLine( 方法Replace )

str =

str = abc

Console WriteLine( str ={ } str ={ } str ={ } str Replace(str str )={ } str str str str Replace(str str ))

从此字符串检索字符串

Console WriteLine( 方法SubString )

Console WriteLine( str ={ } str Substring( )={ } str str Substring( ))

Console ReadLine()

End Sub

lishixinzhi/Article/program/net/201311/13956

如何应用VB.NET MonthCalendar控件

;   Visual Studio NET提供的MonthCalendar控件允许你选择日期和一组日期 这个控件允许用户方便地选择日期 它类似于让你选择一个特定日期的DataTimePicker控件 不过MonthCalendar控件还可以帮助你选择一个时间

使用MonthCalendar 控件

下面的例子说明如何使用MonthCalendar控弯州神件

在常用控件（Common Controls）下的工具箱（Toolbox）中找到MonthCalendar控件并将它添加到窗口表单（Window Form）中 设置以下迹判属性

·Name mcDateSelection

·TodayDate 空

·MaxSelectionCount

·Selection Range Start 空

·Selection Range End 空

在Form Load事件中添加以下代码

mcDateSelection TodayDate = Now

然后建立列表A中的事件 在这个例子中 我设置MaxSelectionCount属性为 这意味着你只能在MonthCalendar控件中选择一个 而不是一组日期 在MonthView控件中选择一个日期 屏幕即类似于图A

图A

列表A Private Sub mcDateSelection_DateSelected(ByVal sender As Object ByVal e As System Windows Forms DateRangeEventArgs) Handles mcDateSelection DateSelected        MessageBox Show( Calendar Today s Date: mcDateSelection TodayDate vbCrLf _                Calendar Selected Start Date: mcDateSelection SelectionStart() vbCrLf _                Calendar Selected End Date: mcDateSelection SelectionEnd())    End Sub     既然你只能选择一个月中的某个特定的日期 而不是一组日期 那么 Selected Start Date和Selected End Date的值相同

现在 将MaxSelectionCount属性设为 然后重新运行代码 这次 你就可以选择一组日期（在这个例子中最多为 天） 而且 一旦你选择一组日期后 你将看到如图B所示的结果

图B

控件埋亏的其它用法

你可以利用MonthCalendar控件的许多其它属性和方法 使其满足你的需要 MSDN提供使用MonthCalendar控件的更多细节

lishixinzhi/Article/program/net/201311/11787

名称栏目：vb点虐 应用 vbnet ini
分享链接：http://kswjz.com/article/ddpside.html