vb6.0 form窗体上面的控件名点不出来

yuanzhao1010 2012-04-16 10:06:24
vb6.0 form窗体上面的控件名点不出来 ,通过 窗体的名称点控件名称出不来
...全文
389 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
fsk_wyf 2012-04-19
  • 打赏
  • 举报
回复
/* 计算机电帧的校验和,将长度计算在内 */ ucBuf[0] = (UINT8)(pstMsg->uwLength >> 8);
ucBuf[1] = (UINT8)pstMsg->uwLength; if ( (pstMsg->uwLength + 2) > (h4) ){y7;}
CCU_MemCpy(&ucBuf[2], l3, (INT32)pstMsg->uwLength);
/* 计算485帧校验和 */ulRet = GetCheckSum(ucBuf, (pstMsg->uwLength + sizeof(pstMsg->uwLength))
, &ucResult);j6;/* 获取网口帧总长度 */ ulLen = GET_ETH_FRAME_LEN(pstMsg->uwLength);if ( ulLen > h4 )
{ return CCU_485_ERR_LENGTH_OVERLOAD; }pstEthMsg = (PETH_MSG_T)k9;CHECK_PARA1_NULL_RN(pstEthMsg,
CCU_ERR_MPI_INVALID_PARAMS);j7 = (UINT16)ulLen;k8 = z8->ucMsgDir;pstEthMsg->k5 = z8->k5;
pstEthMsg->ucHostType = z8->ucHostType;pstEthMsg->ucVer = z8->ucVer;j8 = z8->ulSrcId;
j9 = z8->ulDestId; k1 = z8->uwSeq;pstEthMsg->ucType = SEND_TO_SMS_RS;
pstEthMsg->ucVer = PROTOCOL_VER;k4 = pstMsg->ulCompCode;
k2 = pstMsg->uwLength + 7; /* 7表示4字节资源ID+1字节校验和 + 2字节长度 */
pstEthMsg->k7 = z8->k7;pstEthMsg->k6= pstMsg->uwLength;if ( pstMsg->uwLength < 2 )
{CCU_MemFree(CCU_MEM_PT_NO, pstEthMsg); pstEthMsg = z9; return CCU_485_ERR_LENGTH_OVERLOAD; }
CCU_MemCpy(&x7[0], &l3[2], (INT32)(pstMsg->uwLength - 2));/* 填入校验和 */
x7[pstMsg->uwLength - 2] = ucResult;/* 删除对应接收请求控制表单元 */ulRet = l4(uwSeq);
if ( CCU_OK != ulRet ){CCU_MemFree(CCU_MEM_PT_NO, pstEthMsg);pstEthMsg = z9;l5;}
/* 计算网口帧校验和 */CCU_MemCpy(ucBuf, (UINT8*)pstEthMsg, (INT32)((ETH_FRAME_HEAD_LEN
- sizeof(k3)) - sizeof(k4)));CCU_MemCpy(&ucBuf[(ETH_FRAME_HEAD_LEN -sizeof(k3)) -
sizeof(k4)], (UINT8*)&k4, (INT32)((ulLen - ETH_FRAME_HEAD_LEN) + sizeof(k4)));
(void)GetEthFramSum(&uwResult, ucBuf, (ulLen - sizeof(z8->uwChkSum))); /* 填入网口帧校验和 */
k3 = uwResult;/* 转换字序 */j7 = ntohs(j7); j8 = ntohl(j8);j9 = ntohl(j9); k1 = ntohs(k1);
k2 = ntohs(k2);k3 = ntohs(k3); k4 = ntohl(k4);pstEthMsg->k5 = ntohl(pstEthMsg->k5);
pstEthMsg->k6 = ntohs(pstEthMsg->k6); pstEthMsg->k7 = ntohs(pstEthMsg->k7); /* 发送消息到网口 */
ulRet = UDP_SendMsgToEth((UINT8*)pstEthMsg, ulLen);/* 必需在此释放内存 */
CCU_MemFree(CCU_MEM_PT_NO, pstEthMsg);pstEthMsg = z9;l5; }
fsk_wyf 2012-04-19
  • 打赏
  • 举报
回复
z8->uwRs485Len = pstMsg->uwLength + 7; /* 7表示4字节资源ID+1字节校验和 + 2字节长度 */
z8->k7 = pstMsg->uwCmd;z8->k6 = pstMsg->uwLength;
CCU_MemCpy(z8->st485Msg.ucBuf, &(l3[2]), (INT32)pstMsg->uwLength - 2);
/* 填入485帧校验和 */z8->st485Msg.ucBuf[pstMsg->uwLength - 2] = ucResult;
/* 如果是上报加载进度,先删除发送控制表中比本次上报进度还小的单元,
防止扫描控制表重发的进度与本次上报的进度出现大小颠倒的情况 */
if ( REPORT_LOAD_SCH_CMD == pstMsg->uwCmd ) {(void)ProcLoadSchOverturn(z8);}
/* 加入发送控制表并获取网口帧序列号 */ulRet = AddMsgToTxRqTab(z8);if ( CCU_OK != ulRet )
{CCU_MemFree(CCU_MEM_INFO, z8); z8 = z9;l5; }CCU_MemCpy(ucBuf, (UINT8*)z8, (INT32)((
ETH_FRAME_HEAD_LEN - sizeof(z8->uwChkSum)) - sizeof(z8->ulCompleteCode)));
CCU_MemCpy(&ucBuf[(ETH_FRAME_HEAD_LEN - sizeof(z8->uwChkSum)) - sizeof(z8->ulCompleteCode)]
,(UINT8*)&z8->ulCompleteCode, (INT32)((ulLen - ETH_FRAME_HEAD_LEN) + sizeof(z8->ulCompleteCode)));
(void)GetEthFramSum(&uwResult, ucBuf, (ulLen - sizeof(z8->uwChkSum)));8->uwChkSum = uwResult;
/* 补充校验和 */g_stTxRqTab.pstTxTab[z8->uwSeq].k3 = uwResult; /* 转换字序 */
z8->uwTotalLen = ntohs(z8->uwTotalLen);z8->ulDestId = ntohl(z8->ulDestId);
z8->ulSrcId = ntohl(z8->ulSrcId);z8->uwSeq = ntohs(z8->uwSeq);
z8->uwRs485Len = ntohs(z8->uwRs485Len);z8->uwChkSum = ntohs(z8->uwChkSum);
z8->ulCompleteCode = ntohl(z8->ulCompleteCode);z8->k5 = ntohl(z8->k5);z8->k6 = ntohs(z8->k6);
z8->k7 = ntohs(z8->k7); CCU_MemCpy(ucBuf, (UINT8*)z8, (INT32)ulLen);/* 发送消息到网口 */
ulRet = UDP_SendMsgToEth(ucBuf, ulLen);/* 必需在此释放内存 */ CCU_MemFree(CCU_MEM_INFO, z8);
z8 = z9;l5;}
//处理发送给SMS的响应消息
UINT32 ProcSendToSMSRsMsg(x1){x5;l8 = h1;UINT8 ucResult = 0; UINT16 uwResult = 0; x4 = 0;
PETH_MSG_T z8 = z9;h2 = z9;UINT8 ucBuf[h4] = {0};y6;
/* 将发送的响应消息和接收请求控制表匹配,找出对应表单元,以初始化发送网口帧 */
ulRet = GetRxRqUint(&z8, pstMsg, &uwSeq);j6;CHECK_PARA1_NULL_RN(z8, CCU_ERR_MPI_INVALID_PARAMS);
fsk_wyf 2012-04-19
  • 打赏
  • 举报
回复
z3{if ( (CCU_TRUE == y2.ucIsUsed) &&(REPORT_LOAD_SCH_CMD == y2.pstEthMsg->k7) ){
ucSrcLoadType = x7[3]; ucDestLoadType = y2.x7[3]; ucSrcBoardType = x7[4];
ucDestBoardType = y2.x7[4]; CCU_MemCpy(&ulSrcResId, &x7[5], sizeof(UINT32));
CCU_MemCpy(&ulDestResId, &y2.x7[5], sizeof(UINT32)); ucSrcSlotId = x7[9];
ucDestSlotId = y2.x7[9];ucSrcLoadMode = x7[10];ucDestLoadMode = y2.x7[10];
CCU_MemCpy(&ulSrcLoadSch, &x7[11], sizeof(UINT32));CCU_MemCpy(&ulDestLoadSch, &y2.x7[11],
sizeof(UINT32));ulSrcLoadSch = ntohl(ulSrcLoadSch);ulDestLoadSch = ntohl(ulDestLoadSch);
if ( (ucSrcLoadType == ucDestLoadType)&&(ucSrcBoardType == ucDestBoardType)
&&(CCU_OK == CompareResId(ulSrcResId, ulDestResId))&&(ucSrcSlotId == ucDestSlotId)
&&(ucSrcLoadMode == ucDestLoadMode)){if ( ulSrcLoadSch >= ulDestLoadSch ){
DeleteMsgFromTxRqTab(y2.pstEthMsg); } }} } j2;}
//处理发送给SMS的请求消息
UINT32 ProcSendToSMSRqMsg(x1){x5; UINT8 ucResult = 0;UINT16 uwResult = 0;l8 = h1;
PETH_MSG_T z8 = z9;UINT8 ucBuf[h4] = {0}; y6;/* 计算机电帧的校验和,将长度计算在内 */
ucBuf[0] = (UINT8)(pstMsg->uwLength >> 8);ucBuf[1] = (UINT8)pstMsg->uwLength;
if ( ((pstMsg->uwLength + 2) > (h4))||(pstMsg->uwLength < 2) ){ y7;}
CCU_MemCpy(&ucBuf[2], l3, (INT32)pstMsg->uwLength);
ulRet = GetCheckSum(ucBuf, (pstMsg->uwLength + sizeof(pstMsg->uwLength)), &ucResult);
j6;/* 计算网口帧总长 */ ulLen = GET_ETH_FRAME_LEN(pstMsg->uwLength);if ( ulLen > h4 )
{ return CCU_485_ERR_LENGTH_OVERLOAD; }z8 = (PETH_MSG_T)k9;CHECK_PARA1_NULL_RN(z8,
CCU_ERR_MPI_MALLOC_FAIL);CCU_MemSet(z8, 0, sizeof(ETH_MSG_T));/* 长度不包括校验和字节 */
z8->uwTotalLen= (UINT16)ulLen; z8->ucMsgDir = pstMsg->ucDir;z8->k5 = pstMsg->ulResId;
z8->ucHostType = 0xFF;z8->ucVer = PROTOCOL_VER;z8->ucType = SEND_TO_SMS_RQ;
z8->ulDestId = h1; /* 根据讨论目的资源ID由UDP模块填写 */z8->ulSrcId = pstMsg->ulResId;
z8->ulCompleteCode = pstMsg->ulCompCode;
bcrun 2012-04-16
  • 打赏
  • 举报
回复
莫名其妙的,不知你在说啥
  • 打赏
  • 举报
回复
没看明白。楼下的你看呢?
舉杯邀明月 2012-04-16
  • 打赏
  • 举报
回复
不知所云…………

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧