VB中怎样分配一大块内存

我在VB中需要调用VC的DLL，其中有一个结构体中含有一个Byte的指针来指向一大块的内存，我现在要在
VB中分配出一大块的内存，然后把内存的首地址传过去，我该怎样操作啊？

我应用
Private Declare Function GlobalAlloc Lib "kernel32" (ByVal wFlags As Long, ByVal dwBytes As Long) As Long

来分配内存可是总是提示内存溢出，我需要2048 * 1536 * 3这么大的一块内存。

请教一下怎么来操作啊，没有接触过VB，网上查了半天也没有资料。

---

dim a(2048& * 1536& * 3&) as byte
dim i as long
i = varptr(a(0))

'i就是这个首地址

---

内存地址 ＝ GlobalAlloc (0,2048& * 1536& * 3&)