我有一个bitmap的object,有两个按钮,我想在按第一个按钮时读一下bitmap,在按第二个按钮时再读一次,该怎么做?Sub Btn1_Click()
    PictureBox.Image = New Bitmap(FileName)
    PictureBox.Refresh()
End SubSub Btn2_Click()
    PictureBox.Image = New Bitmap(FileName)
    PictureBox.Refresh()
End Sub可以这样做吗?这样的话就会有两次的new操作,会不会有影响?
如果我想在General模块中,定义一个bitmap object,应该怎样初始化?
   Public BitMapSource As New Bitmap("")
这样做可以吗?bitmap的路径为空了, 会不会有问题。

解决方案 »

  1.   

    Set Picture = LoadPicture("PARTY.BMP")
    Set Picture1.Picture = LoadPicture("PARTY.BMP")
    用LoadPicture吧,不用new了
      

  2.   

    LoadPicture, 是不是需要外部的dll?在程序中没有认到
      

  3.   

    为什么不认LoadPicture函数 ?  set 这个关键字也认不到
      

  4.   

    LoadPicture是 VB内置函数,什么也不需要就可以用。
    我也赞成用 LoadPicture。
    而且你的用法也没问题,稍微改下会更好,用picture属性
    Sub Btn1_Click()
        if not (PictureBox.picture is nothing ) then set PictureBox.picture=nothing
        PictureBox.picture = New Bitmap(FileName)
        PictureBox.Refresh()
    End SubSub Btn2_Click()
        if not (PictureBox.picture is nothing ) then set PictureBox.picture=nothing
        PictureBox.picture = New Bitmap(FileName)
        PictureBox.Refresh()
    End Sub