易截截图软件、单文件、免安装、纯绿色、仅160KB

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


学习
{{-


相关问答：

vb如何调用Illustrator（此前Illustrator未启动）？

请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

VB 保存Excel文件问题

保存出的Excel数据文件，想在程序中就转化成数值类型
能够在打开Excel文件后，
能够直接利用数据画图，而不需要再次转化数据类型
程序中的数据是存放在二维数组里的，然后再保存在Excel中
请教大侠们，� ......

VB------->C#

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
......

关于VB中的MDI子窗体不能以模式窗体显示

Private Sub cmdModify_Click()
    Dim iRet As Integer
    If dltUser.Text = "" Then
        MsgBox "请选择要修改的用户！", vbOKOnly ......

用VB创建了一个空Access表，不能添加记录

用ADO创建了一个空Access表，并添加了多个字段名。
但现在问题是，不能向空表中添加记录。
每次添加都会出现“BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录”

......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号