深入浅出VB NET提示对话框.pdf

深入浅出VB.NET 提示对话框 减小字体 增大字体 一．输入对话框： 制作输入对话框相对信息提示框来相对简单，在Visual Basic .Net ，输入对话框是通过 InputBox 函数来完成的。以下是InputBox 函数在Visual Basic .Net 中的语法： Public Function InputBox (ByVal Prompt As String ,Optional ByVal Title As String = , _ Optional ByVal DefaultResponse As String = ,Optional ByVal XPos As Integer = -1 , _ Optional ByVal YPos As Integer = -1) As String 参数说明： Prompt ： 必选项。以消息形式显示在对话框中的String 表达式。Prompt 的最大长度大约为1024 个字符，具体取决于所用字符的宽度。如果 Prompt 中包含多个行，则可在各行之间用回车 符(Chr(13))、换行符(Chr(10))或回车换行符的组合(Chr(13)Chr(10))分隔 各行。 Title ： 可选项。显示在对话框标题栏中的 String 表达式。如果省略Title 则将应用程序名放在 标题栏中。 DefaultResponse ： 可选项。显示在文本框中的String 表达式，在没有提供其他输入时作为默认响应。如果 省略DefaultResponse，则显示的文本框为空。 XPos ： 可选项。数值表达式，以缇为单位指定对话框的左边与屏幕左边的距离。如省略XPos ， 对话框将水平居中。 YPos ： 可选项。数值表达式，以缇为单位指定对话框的上边与屏幕上边的距离。如果省略ypos ， 则对话框位于在屏幕垂直方向距下边缘大约三分之一处。 以下就是在Visual Basic .Net 中使用InputBox 函数制作如图01所示对话框的具体代码： Dim message , title , defaultValue As String Dim myValue As Object message = 请输入数值，数值在1-3之间！ 设定对话框提示信息 title = 输入提示框！ 设置对话框标题 defaultValue = 1 设定对话框中缺省的数值 myValue = InputBox ( message , title , defaultValue , 100 , 100 ) 设定对话框在左上角坐标位于桌面（100，100）区域显示 图01 ：通过InputBox 函数制作的提示对话框 二.信息对话框简介： 由于信息对话框使用的频率较高，并且结构相对复杂，所以本文的重点就是介绍在 Visual Basic .Net 各种类型信息对话框的制作方法。Visual Basic .NetVisual Basic .Net 制作信息对话框的方法主要有二种，这二种方法所使用的东西虽然完全不一样，但结果却异 曲同工。第一种主要使用的是MsgBox 函数，以前版本的 Visual Basic 也是使用MsgBox 函 数来制作信息对话框；另外一种使用的是.Net FrameWork SDK 中提供的类库。 一个结构完整的信息对话框大致是由五个部分组成的，具体如图02所示： 图02 ：一个完整的信息对话框组成结构图 三．MsgBox 函数的参数结构和调用： MsgBox 函数中的参数主要由三个部分组成，第一部分：信息对话框的显示内容，即 图01 中第二部分内容，这个部分是必须要有的，显示内容可以是单行或多行，在设定 多行时，行与行之间通过回车符（Chr(13) ）、换行符（Chr( 10 ) ）或回车换行符的组合 （Chr( 13 ) Chr( 10 ) ） 分隔；第二部分：定义信息对话框的组成结构，即图02 中的第一、第三和第 四部分，Visual Basic .Net 提供了一个枚举MsgBoxStyle 来分别设定这三个部分。表01、表 02和表03分别是这三部分内容