مشکل در دریافت محتوای فایل

سلام.
بنده با vb6 کار کرده بودم که تصمیم گرفتم با vb 2010 کار کنم...
اما توی دریافت محتوای فایل مشکل پیدا کردم که دیدم مثل vb6 نیست!
میشه لطفا کسی اشکال کد منو در vb 2010 بگه ممنون.

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        OpenFileDialog1.ShowDialog() 

        'OpenFileDialog1.OpenFile()

        RichTextBox1.LoadFile("d:\1.rtf")

    End Sub

End Class

سلام

اینجوری درسته

      If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

            RichTextBox1.LoadFile(OpenFileDialog1.FileName)

        End If

موفق باشید

سلام.
کد شما هم آخر یه کار می کنن فرقی نداره و توی دریافت فایل های اجرایی اینبار مشکل پیدا کردم اگه میشه کمک کنید عکس:
http://up.ashiyane.org/images/npk5g41wlhp4vbqyg7t5.png
توی ویژال بسیک 6 به راحتی اینکار انجام میشه اما توی ویژال بسیک 2010 نه!