VB 的 DX Load 图 问题

Question

VB 的 DX 问题Load 外部 图象 加载过程是这样
Set BackGround_A = DD.CreateSurfaceFromFile("1.bmp", BackGroundDesc)1问：如何 Load 其它控件的图 picture 
2问：从一个二进制文件读进来的图文件如何用，非要在输出到文件上吗?Private Sub Command1_Click()
     Dim lngLogoSize As Long
     Dim varLogo() As Byte
     Dim strTempPath, strTempFileName As String
     Dim lResult As Long
     Dim FileHandle As Long
     strTempFileName = App.Path & "/G1.BMP"
     
        FileHandle = 2 'FreeFile
        
     Open App.Path & "/test.bmp" For Binary Access Write As #3
     
        Open strTempFileName For Binary As #FileHandle
               lngLogoSize = FileLen(strTempFileName)
          ReDim varLogo(lngLogoSize - 1)
          Get #2, , varLogo() '//* 数 组 名 加 ()可 以 代 表 数 组
        Close #2
            Put #3, 1, varLogo()
     Close #3
     Beep
End Sub就是这个 varLogo() 数组不能直接用吗?都是 DX 的图象问题....

Answer 1

2问：从一个二进制文件读进来的图文件如何用，非要在输出到文件上吗?
你首先要知道图片的格式，它的结构是什么。你的代码里面那样读文件是不行的。
http://www.csdn.net/develop/Read_Article.asp?Id=20442
你看一下吧，可能会对你有启发。

Answer 2

yunfeng007(一水寒)  先谢谢你的回答!!

Answer 3

Set BackGround_A = DD.CreateSurfaceFromFile("1.bmp", BackGroundDesc)
1问：如何 Load 其它控件的图 picture 第一问,有没有人会？？？