本帖最后由 bcrun 于 2010-07-07 12:13:35 编辑

解决方案 »

  1.   

    原因:理解错误。
    Picture1.Cls的作用是清除Picture1上用画图函数画的图形如画线、画圆、写字等,而不是清除用loadpicture等设置的背景图形。
      

  2.   

    清除画图区
    在任何时候若想清除绘图区进行重画,应使用 Cls 方法。指定的绘图区以背景色 (BackColor) 重画:[object.]Cls应该是没问题
      

  3.   

    参考VB6的 PICTUREBOX可载图 可画线, 圆等基础几何形
    .cls方法是去几何形。
    loadpicture()是去图。
    两种作法还可重叠呢
    请下这个示范,玩玩它, 看看源码。就会明白。
    http://www.geocities.com/ystsangnbs/Greenstone.zip参考资料
    http://www.geocities.com/ystsangnbs/Greenstone.zip
      

  4.   

    抱歉,是从其他地方copy过来的,连接不好用
      

  5.   

    cls是清除图形的,不能用来清除图像
      

  6.   

    MSDN:
    Cls 方法
    清除运行时 Form 或 PictureBox 所生成的图形和文本。
    语法
    object.Cls
    object 所在处代表一个对象表达式,其值为“应用于”列表中的一个对象。如果省略 object,则带有焦点的 Form 就被认为是 object。
    说明
    Cls 将清除图形和打印语句在运行时所产生的文本和图形,而设计时在 Form 中使用 Picture 属性设置的背景位图和放置的控件不受 Cls 影响。如果激活 Cls 之前 AutoRedraw 属性设置为 False, 调用时该属性设置为 True,则放置在 Form 或 PictureBox 中的图形和文本也不受影响。 这就是说,通过对正在处理的对象的 AutoRedraw 属性进行操作,可以保持 Form 或 PictureBox 中的图形和文本。调用 Cls 之后,object 的 CurrentX 和 CurrentY 属性复位为 0。
      

  7.   

    Set Picture1.Picture = Nothing