VB 的 DX Load 图 问题

nogood

VB 的 DX Load 图 问题

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 的图象问题.... [em7]