vb的picture控件的卸载
用vb的picture控件可以加载picture控件,例如 Set Picture1.Container = Picture3 这样就把Picture1加载到了Picture3上,那么怎么从Picture3卸载掉Picture1呢? 请各位朋友帮忙!谢谢!!
做了一个试验,将Picture1还原到原来的容器就可以了 VB code: Option Explicit Private Sub Command1_Click() Set Picture1.Container = Picture3 End Sub Private Sub Command2_Click() Set Picture1.Container = Form1 End Sub Private Sub Form_Load() Picture1.Picture = LoadPicture("E:\截图\1.JPG") End Sub VB code: Private Sub Command1_Click() Set Picture1.Container = Picture3 End Sub Private Sub Command2_Click() Picture1.Left = -1 * Picture1.Width End Sub 上面的代码并没真正移走,只是看不到了, Set Picture1.Container = Form1 是移走了,但Picture1没卸载掉.只是不再以Picture3 作容器了.引用 做了一个试验,将Picture1还原到原来的容器就可以了 VB codeOptionExplicitPrivateSub Command1_Click()Set Picture1.Container= Picture3End SubPrivateSub Command2_Click()Set Picture1.Container= Form1End SubPrivateSub Form_Load() Picture1.Picture=LoadPicture("E:\截图\1.JPG")End Sub 学习 {{-
相关问答:
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用? 你好,用instance不是就可以了 ......
Printer.ScaleMode = 6 6表示毫米 Printer.PaperSize = vbPRPSA4 '初始坐标 x = 1 y = 4 '最大的线筐 Printer.DrawStyle = 0 Printer.Line (x, y)-(x + 132.5, y) ......
大家好,问个vb打印问题 printer.print "dsff" ..... .... Printer.EndDoc 打印成功后我将执行 sqlstr = "update vc_yh set pr=' 已打印 ', ......
请教一下:我用vb写了一个调用Illustrator的测试程序,代码很简单:Private Sub Command1_Click() Dim app As New Illustrator.Application Dim doc As Illustrator.Document Dim thislayer As Illustrator.Layer ......