vb字符串在内存中的分布？
据说vb6中,字 符串以以UNICODE方式存储，所以
Private Type UDT
lngM1 As Long
lngM2 As Long
strM3 As String * 18
strM4 As String * 8
lngM5 As Long
End Type
Private Sub Command4_Click()
Dim tmp As UDT
With tmp
.lngM1 = 1
.lngM2 = 2
' .strM3 = "一二三四五六七八九十一二三四五六七八"
.strM3 = "一二三四五六七八九"
' .strM3 = "ABCD"
.strM4 = "测试ABC"
.lngM5 = 5
End With
Dim bytBuf() As Byte
ReDim bytBuf(Len(tmp) - 1)
CopyMemory bytBuf(0), tmp, Len(tmp)
Winsock1.SendData bytBuf
End Sub
vc6中定义相对应的结构体：
typedef struct{
long lM1;
long lM2;
char szM3[18];
char szM4[8];
long lM5;
}UDT;
//。。。。。。（省略部分代码）
char recvBuf[128];
UDT t;
while(true)
{
memset(&t,0,sizeof(t));
memset(recvBuf,0,sizeof(recvBuf));
//接收数据
int recvlen=recvfrom(svr,recvBuf,128,0,(sockaddr*)&addrClient,&len);
::CopyMemory(&t,recvBuf,128);
}
//。。。。。。。
通过socket传到vc里进行调试如下：
二、当 vb中调整代码为（.strM3 ）
显然，不是UNICODE的表示方法
另人郁闷？？？？？？
----------------------------------------------------------
添加 tmp.strM3 = StrConv(tmp.strM3, vbUnicode)：
相关文档：
'*************************************************************************
''----------------------------------------------------------------------
'**系统名称：子类化重绘仿QQ2009渐变按钮
'**模块描述：
'**模 块 名：Form1
'**创 建 人：gvu
'**作者网站：http://hi.baidu.com/googlevipuser
'**E-Mai ......
添加
两个TEXT(multiline=true)
一个按钮
Private Function isChinese(ByVal asciiv) As Boolean
a = AscW(asciiv)
If Len(Hex$(a)) > 2 Then
isChinese = True
Else
isChinese = False
End If
End Function
Private Sub Command1_Click()
text2.text="" '先清空text2
For i = 1 To Len(Text1.Text)
DoEve ......
一、NT服务程序
所谓NT服务，实际上就是一个可以在系统启动时自动在一定身份下启动的伴随系统长时间存在的进程。象FTP server、HTTP server、脱机打印等都是采用NT服务的形式提供的。这实际上类似Unix的root daemon进程。NT服务归纳起来，NT服务又以下几个特征：
1、可� ......
VB.NET 禁止一个程序运行多次代码:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then
MsgB ......
在VB 中调用动态连接库
2001-11-08· · ··yesky
1 2 3 4 5 6 7 8 下一页
作为一种简单易用的Windows开发环境，Visual Basic从一推出就受到了广大编程人员的欢迎。它使 程序员不必再直接面对纷繁复杂的Windows消息，而可以将精力主要集中在程序功能的实现上，大大提高了� ......
