首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

在Access中使Excel窗口最大后包含在Access窗口内的延伸有关问题

2012-01-16 
在Access中使Excel窗口最大后包含在Access窗口内的延伸问题!我想达到的结果是最大化 Excel 窗口后包含在 A

在Access中使Excel窗口最大后包含在Access窗口内的延伸问题!


  我想达到的结果是最大化 Excel 窗口后包含在 Access 中,但设置后 Excel 窗口只包含左上角的大部分,右侧的滚动条和下边的标签、滚动条等都看不到,什么原因呢?
  我想办法截图

[解决办法]
能看到啊,是不是你的显示器的分辨率的问题哦?
例子

VB code
Option ExplicitPrivate Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As LongPrivate Sub Command1_Click()    Dim lngAccessHwnd As Long    Dim lngExcelHwnd As Long    Dim lngP As Long    lngExcelHwnd = FindWindow(vbNullString, "Microsoft Excel - 推舟速度脉冲频率换算表.xls")    lngAccessHwnd = FindWindow(vbNullString, "Microsoft Access")    lngP = SetParent(lngExcelHwnd, lngAccessHwnd)End Sub 

热点排行