主题：[求助]对话筛选器如何兼容xlsx文件

im dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    MessageBox.Show("你选择的是：" & dlg.FileName,"提示") '提示用户选择的文件
End If

在这个对话筛选器中如何兼容.xlsx文件