自定义了一个导出Excel窗口，但老默认为*.xls 导致出现“超过最大的行数65,536”的错误提示，代码如下：
.........
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
MessageBox.Show("你要保存为:" & dlg.FileName,"提示") '提示用户选择的文件
Else
MessageBox.Show("你没有输入导出文件名,如需导出请再次进入","提示")
Forms("导出学生信息Excel").close()
Return
End If
就是把 dlg.Filter= "Excel文件|*.xls" 改为：dlg.Filter= "Excel文件|*.xlsx" 也一样提示错误 为何？谢谢！
加好友 
发短信
Post By：2020/9/27 22:10:00 [只看该作者]
