仅打开带有* .bin的文件

时间:2015-01-17 18:56:37

标签: vb.net

可以在openfile对话框中添加带* .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

如果文件有另一个扩展名msg,则框:文件错误

2 个答案:

答案 0 :(得分:1)

您需要使用Filter属性:MSDN

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim OFD As New OpenFileDialog
    OFD.Filter = "BIN Files (*.bin)|*.bin"
    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
End Sub

在过滤器字符串中使用管道|字符将其分隔为块:第一个是用户在下拉列表中看到的内容,第二个是在文件上运行的实际过滤器。您也可以使用多个过滤器。以下是过滤字符串的另一个示例:Text files (*.txt)|*.txt|All files (*.*)|*.*

答案 1 :(得分:0)

您需要使用javax.swing.JFileChooser

使用此:

FileNameExtensionFilter filter = new FileNameExtensionFilter("Binary Files", "bin");
JFileChooser fileChooser = new JFileChooser();
fileChooser.setFileFilter(filter);