vb.net对象的实例的简单介绍

“未将对象引用设置到对象的实例”错误?。╒B.NET)使用 RichTextBox 控件
RichTextBox 控件可用于输入和编辑文本,它同时提供了比常规的 TextBox 控件更高级的格式特性 。
RichTextBox 控件提供了一些属性 , 通过这些属性,可对该控件中任何部分的文本使用不同的格式 。用这些属性,可以将文本变为粗体或斜体 , 改变文本的颜色,创建上标或下标 。可以调整段落的左右缩进值,还可以使用悬挂式缩进 。
用途
作为“无底”的文本框,可用于编写阅读特别大的文本文件的应用程序 。
在任何应用程序中实现功能完备的文本编辑器 。
特性
以 RTF 格式或 ASCII 文本格式打开或保存文件 。可以使用该控件的方法(LoadFile 和 SaveFile) , 直接读写文件 。也可以用该控件的属性,比如 SelRTF 和 TextRTF,联合 Visual Basic 的文件输入输出语句读写文件 。
将 .rtf 文件的内容装入 RichTextBox 控件 , 只需将该文件(比如从 Windows 95 “资源管理器”中)的内容直接拖入该控件,或者将其它应用程序(比如 Microsoft Word)中使用文件的突出显示部分直接拖入该控件 。
设置 FileName 属性,将 .rtf 或 .txt 文件的内容装入该控件 。
用 SelPrint 方法打印 RichTextBox 控件中的全部或部分文本 。
将 RichTextBox 控件绑定到 Data 控件,可以处理 Microsoft Access 数据库的 Memo 字段,或者其它数据库中大型的文本字段(比如 SQL 服务器中的 TEXT 数据类型) 。
在运行时 , 用 OLEObject 集合的 Add 方法,将嵌入对象 , 比如位图、图标、应用程序图标,加到该控件中 。在设计时或运行时,可以拖放任何嵌入对象到控件中,包括文档,比如 Microsoft Excel 的电子表格和 Microsoft Word 文档等 。
在设计时设置滚动条
按照缺省规定,RichTextBox 没有滚动条 。在运行时,如果在该控件中装入了较大的文件,最终用户就不能看到文件的全部内容了 。为使用户能够方便地进行滚动,可将其 ScrollBars 属性设置为 1(水平的)、2(竖直的)或 3(两个都有) 。这必须在设计时完成,因为 ScrollBars 属性在运行时是只读的 。
用 LoadFile 和 SaveFile 方法打开和保存文件
用 LoadFile 和 SaveFile 方法可以方便地为 RichTextBox 控件打开或保存 RTF 文件 。要打开文件,可用 CommonDialog 控件提供路径名,如下所示:
Private Sub OpenFile()
'RichTextBox 控件的名称是“rtfData” 。
'CommonDialog 名为“dlgOpenFile” 。
'为文件名声明 String 变量 。
'显示 “打开文件”对话框,
'并将变量设置为文件名 。
Dim strOpen As String
dlgOpenFile.ShowOpen
strOpen = dlgOpenFile.FileName
'用 LoadFile 方法打开该文件 。
rtfData.LoadFile strOpen
End Sub
用 SaveFile 方法,保存文件也同样简便:
Private Sub SaveFile()
Dim strNewFile As String
dlgOpenFile.ShowSave
strNewFile = dlgOpenFile.FileName
rtfData.SaveFile strNewFile
End Sub
注意 如果文件中包含了该控件不能支持的 RTF 编码,仅相关的文本在 RichTextBox 控件中将不会出现 。
用 SelFontName、SelFontSize 和 SelFontColor 设置字体属性
要改变 RichTextBox 控件中的字体特性,可以使用 SelFontName、SelFontSize 和 SelFontColor 属性 。
通常使用 ComboBox 控件显示这些属性的选项 。随后可用 ComboBox 控件的 Click 事件改变属性 。下面的代码首先在 Form 对象的 Load 事件中,充填名为“cmbFonts”的 ComboBox 控件 。然后用 Click 事件改变 RichTextBox 控件的 SelFontName 属性 。
Private Sub Form_Load()

推荐阅读