VB6(DLL)

○イメージをデータ形式で設定する例

Dim ImageFile As String
Dim fileNo As Integer                      'ファイル番号
Dim imageLength As Long
Dim imageData() As Byte

'イメージファイルをByte配列に読み込みます。
fileNo = FreeFile                           'ファイル番号取得
Open ImageFile For Binary As #fileNo      'イメージファイルオープン
imageLength = FileLen(ImageFile)
ReDim imageData(imageLength) As Byte
Get #fileNo, , imageData
Close #fileNo

'イメージデータを描画します。
ret = jvSetFieldImageData(pid, "IMAGE_2", imageLength, imageData(0))