求教vb.net中的openfiledialog控件。

追问：如果要设置打开对话框的一些属性呢，怎么搞呀

答案：额，怎么说呢，我举个例子吧，你自己做做


先画一个TextBox，设置成多行显示，边缘尽量靠近窗体边缘（要容得下多排文本就行），也可以设置ScrollBar属性（值为Vertical）来添加滚动条，还要一个Button按钮控件

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Text As String = "", Line As String = ""
        '声明一个名为Text的String类型变量用于储存TextBox.Text的值，
        'Line变量用于储存被打开文件中的每一行文本
 
        OpenFileDialog1.Filter = "Text File (*.txt)|*txt"
        '设置打开的文件类型为 .txt
 
        OpenFileDialog1.ShowDialog()
        '显示打开对话框
        If OpenFileDialog1.FileName <> "" Then      '如果文件路径不为空则执行Then后面的语句
            Try                                     '使用Try...Catch语句捕获和处理执行代码过程中的错误
                FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)          '打开文件
                Do Until EOF(1)                                                '使用Do Until语句和EOF函数来确定是否读到了文件内容的最后，如果读到最后则跳出循环
                    Line = LineInput(1)                                        '使用LineInput函数为Line变量赋值
                    Text = Text & Line & vbCrLf                                '将Line变量的值持续赋给Text变量，并且每赋一次值就换行
                Loop                                                           '继续循环，知道文件内容被读取完最后一行才跳出循环  
                TextBox1.Text = Text                                           '将Txet的值赋给TextBox1.Text，使文件内容显示在文本框中
            Catch ex As Exception
                MsgBox(ex.Message)                                             '如果操作文件出现错误则弹出错误信息
            Finally
                FileClose()                                                    '文件操作结束后关闭文件
            End Try
        End If
    End Sub

上一个：vb中关于inputbox函数的问题？？？？
下一个：VB编写DLL文件怎么说没有接口?