Otwieranie plików tylko o danym rozszerzeniu

0

Czy da radę jakoś przebudować ten kod, tak by okno otwierania pliku widziało lub otwierało tylko pliki z roszerzeniem *.bin ?

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim OFD As New OpenFileDialog
        Dim fullFile() As Byte
        If OFD.ShowDialog = Windows.Forms.DialogResult.OK Then
            fullFile = File.ReadAllBytes(OFD.FileName)
            TextBox1.AppendText(fullFile(&H1E).ToString("X2") & " ")
            TextBox1.AppendText(fullFile(&H1F).ToString("X2"))
        End If

dodanie znacznika <code class="vbnet"> - @furious programming

1

Przed if ustaw sobie właściwość Filter

OFD.Filter = "Pliki Bin (*.bin)|*.bin"
OFD.FilterIndex = 0

ewentualnie jak chcesz mieć możliwość także wyboru dowolnego typu pliku a domyślnie maskę bin to:

OFD.Filter = "Pliki Bin (*.bin)|*.bin|Wszyskie pliki (*.*)|*.*"
OFD.FilterIndex = 0
0

Dziękuję bardzo za odpowiedź. Wszystko działa.

1 użytkowników online, w tym zalogowanych: 0, gości: 1