我的计算机安装VB6(SP5),发现picture的Pset和Point不好使,程序如下:  Set P.Picture = LoadPicture("tmp1.bmp")
  P.ScaleMode = 3  'Pixel
  P.AutoSize = True
  P.AutoRedraw = True
  pl = 271
  P.PSet (5, 5), pl
  pl = 0
  pl = P.Point(5, 5)
  Debug.Print pl  P是PictureBox,pl是long类型。最后打印出来的pl值不是271,却是16。pl的初值换成其它什么数,最后打印的仍是不一样。令人费解的是,以前并非这样,是在重新安装了系统后才变成如此的。计算机是SONY的笔记本电脑,原装操作系统是英文WIN98,我装的是WINDOWS ME。

解决方案 »

  1.   

    Dim a As Long
    您看一下我的代码,很久不用VB了,我也说不清道理Picture1.AutoRedraw = Truea = RGB(255, 0, 0)
    Picture1.PSet (1, 1), RGB(255, 0, 0)
    Picture1.Picture = Picture1.Image
    a = Picture1.Point(1, 1)
    Picture1.AutoRedraw = False
      

  2.   

    其实,我那段程序在其它机上运行没什么问题。以前在我的笔记本电脑上这么用时也没错的,就是重装了系统后就不好使了。弄不懂问题出在哪里?
    谢谢handsomge的热情参予!我完全清楚PSet和Point的含义与用法的。问题不在于程序,程序没错!问题在与‘环境’,又找不出是何种‘环境变化’促使其失效的!