UCHAR ucHorzData[1280 * 2];
UINT nHorzSize = 1280;
for(UINT i = 0; i < 512; i++)
{
memcpy(ucHorzData, m_CapInfo.Buffer + i * nHorzSize, nHorzSize);
memcpy(m_CapInfo.Buffer + i * nHorzSize, m_CapInfo.Buffer + (512 - 1 - i) * nHorzSize, nHorzSize);
memcpy(m_CapInfo.Buffer + (512 - 1 - i) * nHorzSize, ucHorzData, nHorzSize);
}我转成VB的以下代码,总提示类型不匹配。 Dim ucHorzData(2560) As Byte
Dim nHorzSize As Integer
nHorzSize = 1280
Dim i As Integer
For i = 0 To i < 512
CopyMemory ucHorzData, m_CapInfo.Buffer + i * nHorzSize, nHorzSize
CopyMemory m_CapInfo.Buffer + i * nHorzSize, m_CapInfo.Buffer + (512 - 1 - i) * nHorzSize, nHorzSize
CopyMemory m_CapInfo.Buffer + (512 - 1 - i) * nHorzSize, ucHorzData, nHorzSize
Next
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货