Foxtable(狐表)用户栏目专家坐堂 → [求助]合并execl表进入项目后,程序自动缩小,字体大小没变,界面变的很奇


  共有280人关注过本帖平板打印复制链接

主题:[求助]合并execl表进入项目后,程序自动缩小,字体大小没变,界面变的很奇

帅哥哟,离线,有人找我吗?
igewcw
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:96 积分:1142 威望:0 精华:0 注册:2015/2/4 18:24:00
[求助]合并execl表进入项目后,程序自动缩小,字体大小没变,界面变的很奇  发帖心情 Post By:2024/4/8 19:19:00 [只看该作者]

每次使用代码合并EXCEL数据时,程序界面就发生如下图变化,如何解决?

正常界面如下
图片点击可在新窗口打开查看

使用如下代码合并
Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter = "Excel文件|*.xls;*.xlsx" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim mg As New Merger
    mg.SourcePath = dlg.FileName
    mg.Format = "excel" '指定格式
    mg.SourceTableName = "已销售明细$" '指定要合并的表的名称,源表
    mg.DataTableName = "销售提成统计表_Table2" '指定接收合并数据的数据表的名称
    mg.Merge()'开始合并
End If


界面变化后,程序界面缩小了,文字就会显得很大,按钮图标变得很难看。
图片点击可在新窗口打开查看
[此贴子已经被作者于2024/4/8 19:23:33编辑过]

 回到顶部