新手做控件ActiveX，再提一问怎么使控件全屏。

[tiantian1980]

Form全屏可以这样（除任务栏外）
Me.WindowState = 0
Me.WindowState = 2
Me.Visible = True
现在做成ActiveX控件后要全屏怎么弄？请高手帮忙解答。

[cbm6666]

'先将下面这代码贴到你的DLL工程里面的.cls内 '例如是VBDLL.dll 类名是Class1
Public Sub SetFullwindow(Tform As Object)
Tform.WindowState = 2
End Sub

'编译此DLL

'在你要调用的代码中先引用 VBDLL.DLL再加上下面代码
Dim VBD As New Class1
Private Sub Command1_Click()
Call VBD.SetFullwindow(Me)
End Sub

参考一下这个帖吧

【CBM666 的 DLL 制作流程】
http://download.csdn.net/source/360283

[fj182]

看来楼主对控件的认识不够。
不管是运行时还是设计时，控件不会独立存在，它必须有一个容器。如果你想让它全屏，首先你得让它的容器全屏，然后再调整控件的大小及位置。

如控件MyCtl的容器为Form1,那么可以这样做

' Form1 最大化
Form1.WindowState = 2

private sub Form1_Resize()
on error resume next
if Form1.WindowState <> 1 then
MyCtl.Move 0,0,ScaleWidth,ScaleHeight
end if
end sub