VB2005/2008/2010(DLL)

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

Dim ImageFile As String
Dim imageLength As Long
Dim imageData() As Byte
Dim readSize As Long

'イメージファイルをByte配列に読み込みます。
Dim fs As New FileStream(ImageFile, FileMode.Open, FileAccess.Read)
imageLength = CInt(fs.Length) ' ファイルのサイズ
ReDim imageData(imageLength - 1) ' データ格納用配列
readSize = fs.Read(imageData, 0, imageLength)
fs.Close()

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