VB用户控件在windows 8中不能调整大小

Question

我正在更新一个vb6应用程序以在windows 8中运行，其中一个问题是用户控制窗口不调整大小(通过窗口边缘拖动手柄)。在其他操作系统下也可以正常工作。

同样的问题也困扰着主项目窗口。

窗口的元素在这个函数中被控制，但是窗口本身不响应调整大小。

Private Sub UserControl_Resize()
If g_ShuttingDown Then Exit Sub
' Test for zero size
If ScaleWidth = 0 Or ScaleHeight = 0 Then Exit Sub
' Min size
'If ScaleWidth < iMIN_FORM_WIDTH Then UserControl.Width = iMIN_FORM_WIDTH
'If ScaleWidth < iMIN_FORM_HEIGHT Then UserControl.Height = iMIN_FORM_HEIGHT
' Form dimensions
Dim x, y, w, H As Long
x = ScaleLeft
y = ScaleTop
w = ScaleWidth
H = ScaleHeight
picTitleBar.Move 0, 0, w - 30, 240
imgTitleBar.Move 0, 0, picTitleBar.Width, 240
lblCaption.Move 45, 15
imgClose.Move picTitleBar.Width - imgClose.Width - 60, 60
chkVerbose.Move 15, picTitleBar.Top + picTitleBar.Height
cmdClear.Move chkVerbose.Left + chkVerbose.Width, chkVerbose.Top
chkPause.Move cmdClear.Left + cmdClear.Width, chkVerbose.Top
Messages.Move 15, chkVerbose.Top + chkVerbose.Height, w - 30, H - (chkVerbose.Top + chkVerbose.Height)

结束子

有什么想法我可能会让这些窗口正确响应调整大小事件吗?

Answer 1

也许你需要下载新的固定dllvb在 win8 或需要访问权限的vb6.exe允许所有操作

，也许你应该禁用win 8主题的vb工作良好。

我在win8中有更多的问题，但是当我在win7或win8中禁用主题时，我的许多问题都解决了。