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 学习 {{-
相关问答:
Printer.ScaleMode = 6 6表示毫米 Printer.PaperSize = vbPRPSA4 '初始坐标 x = 1 y = 4 '最大的线筐 Printer.DrawStyle = 0 Printer.Line (x, y)-(x + 132.5, y) ......
我知道在VB中调用系统的计算器 可以用shell 可是要是要求高点 调用后 直接计算 并把计算结果显示在文本框里 比如 在点击按钮1 调用计算器 把指定的二进制转换为16进制 并显示在 text1 自已做一个计算器~ ......
C# code: Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) Private Type GUID Data1 As Long ......