《VB.NET控件详解》由会员分享，可在线阅读，更多相关《VB.NET控件详解（23页珍藏版）》请在金锄头文库上搜索。
1、richtextbox,RichTextBox控件可以用来输入和编辑文本，但它提供了比文本框更高级的格式特征。例如，可以将RichTextBox控件中的任何文本设为粗体、斜体或带下划线，改变文本颜色，创建上标或下标，调整段落的左右缩进量，产生悬挂效果等。,richtextbox,1）设置字体 Richtextbox1.selectionfont=new font(richtextTextBox1.Font.FontFamily,10) Richtextbox1.font=new font(richtextbox1.font.fontfamily,10) Richtextbox1.selecti
2、oncolor=color.red 2.查找替换查找方法 Richtextbox1.find(要查文本) 若想让文本上有焦点需加上 若未找到返回-1 Richtextbox1.select() 替换：richtextbox1.selecttext=替换后文本,3.保存和打开文件 1）保存文件使用richtextbox的savefile方法 格式 Richtextbox1.savefile(文件名(绝对路径)，文本格式) 2）打开文件（loadfile方法） Richtextbox1.loadfile（文件名（绝对路径），文本格式） 文本格式主要有 Richtextboxstreamtype.p
3、laintext 纯文本 Richtextboxstreamtype.richtext rtf格式文本,5.7 对话框,对话框用于获取信息和与用户进行交互。V 中常用的对话框有以下几种： 打开文件对话框 保存文件对话框 字体对话框 颜色对话框 打印对话框,5.7.1 保存文件对话框,保存文件对话框（SaveFileDialog）提供文件保存的功能，它与Windows使用的标准SaveFile对话框相同。打开文件对话框的常用方法有： ShowDialog：在运行时显示该对话框，并返回用户最后单击的按钮。,Title属性：保存对话框标题，默认为值为另存为 InitialDirectory ：用来指
4、定在对话框中显示的默认目录，否则显示当前目录（初次在该窗体时为debug文件夹，之后就是最后一次使用时的目录） Filter：过滤器,限制用户选取的文件类型，不同的类型之间使用“|”隔开。 格式：SaveFileDialog1.Filter = “Rich Text file|*.rtf|txt文本|*.txt|所有文本|*.*“,5.7.1保存文件对话框,FileName ：设置或返回的文件名，包含savefiledialog中所选路径。 RichTextBox1.savefile(SaveFileDialog1.FileName) If SaveFileDialog1.ShowDialog
5、=Windows.Forms.DialogResult.OK ThenIf Trim(SaveFileDialog1.FileName) “ ThenRichTextBox1.savefile(SaveFileDialog1.FileName,Richtextboxstreamtype.plaintext) End IfEnd If,5.7.1 打开文件对话框,5.7.2 打开文件对话框,打开文件对话框的常用方法有： ShowDialog：在运行时显示该对话框。 打开文件对话框本身并不能读入和打开文件，需要另外编写代码实现。,5.7.3 字体对话框,5.7.3 字体对话框,例5-10 通过字体
6、对话框设置文本框中的字体。程序运行初始界面如图a所示。点击“字体设置”按钮后打开字体对话框，如图b所示。修改字体后的效果如图c所示。,图a,图b,图c,5.7.3 字体对话框,代码如下： Private Sub Button1_Click(ByVal sender As System.Object, ByVal e_ As System.EventArgs) Handles Button1.ClickFontDialog1.Font = TextBox1.Font 把文本框当前的字体赋值给字体对话框FontDialog1.ShowColor = True 显示“颜色”选择FontDialog1
7、.ShowApply = True 显示“应用”按钮If FontDialog1.ShowDialog = _ Windows.Forms.DialogResultOK ThenTextBox1.Font = FontDialog1.Font 设置文本框字体End If End Sub,5.7.4 颜色对话框,5.7.4 颜色对话框,例5-11 在例题5-10的基础上，增加用颜色对话框设置颜色的功能。程序运行界面如图a所示，打开的颜色对话框如图b所示。,图a,图b,5.7.4 颜色对话框,代码如下： Private Sub Button2_Click(ByVal sender As Syste
8、m.Object, ByVal e_ As System.EventArgs) Handles Button2.ClickColorDialog1.Color = TextBox1.ForeColorIf ColorDialog1.ShowDialog = _ Windows.Forms.DialogResultOK ThenTextBox1.ForeColor = ColorDialog1.Color 设置文本框的文本颜色为颜色对话框中选择的颜色End If,5.4 滚动条,滚动条（ScrollBar）分为垂直滚动条（VScrollBar）和水平滚动条（HScrollBar）两种。滚动条用于
9、移动特定的对象，特别当一个对象在特定区域无法全部显示时，用户可以借助滚动条移动对象从而对对象进行全面的查看。,5.4 滚动条,5.4 滚动条,例5-5 显示垂直滚动条和水平滚动条的当前值。程序运行结果如图所示。,5.4 滚动条,代码如下： Private Sub HScrollBar1_Scroll(ByVal sender As System.Object, _ ByVal e As System.Windows.Forms.ScrollEventArgs) Handles _ HScrollBar1.ScrollTextBox1.Text = HScrollBar1.ValueEnd Su
10、bPrivate Sub VScrollBar1_Scroll(ByVal sender As System.Object, _ ByVal e As System.Windows.Forms.ScrollEventArgs) Handles _ VScrollBar1.ScrollTextBox2.Text = VScrollBar1.ValueEnd Sub,5.5 微调框,微调框分为数字微调框和集合微调框,5.5 微调框,例5-6 使用微调框调节课程和分数。程序运行界面如图所示。 此例中，无需编写事件代码，只要对控件的属性值进行设置。在窗体上添加两个标签Label1、Label2，一个数字微调框NumericUpDown1，一个集合微调框DomainUpDown1。数字微调框使用默认属性值，Maximum值为100，Minimum值为1，Increment值为1。向集合微调框中添加Items属性值时，通过属性窗口完成。,5.6进度条,例：红绿灯,
