C代码语言转VB代码的问题：
谁能帮我把这段代码转成Vb的代码，不胜感激，谢谢！
void CTempDlg::OnOK()
{
UpdateData(1);
int nlen=m_edit1.GetLength();
char *username=m_edit1.GetBuffer(nlen);//定义一个新字符串username,长度为nlen，并将m_edit1中的字符串一个个放入到username数组中
char strA[]="9012345678abcdeABCDEFGHIJKLMNfghijklmnUVWXYZxyzuvwopqrstOPQRST";
int szint[18]={0x11,0x34,0xC9,0x23,0x75,0x18,0xD7,0xE2,0x12,0x35,0x29,0x2B,0xEC,0xB6,0x23,0x19};
int ljq1=0,ljq2=0x25;//累加器
int k=0,l=0,q=0;
char *serile=new char[nlen];//定义一个新字符串数组serile,长度为nlen
for (int i=0;i<strlen(username);ljq1=ljq1+5,i++)
{
for (int j=0;j<strlen(strA);j++)
{
if (username[i]==strA[j])
{
// k=0,l=0/*,q=szint[i+2]*/;
l=szint[i];
if (i>=16)
{
l=i % 0x10;//求余
l=szint[l];
}
k=ljq2;
k=k*3;
l=l^k;
l=l^ljq1;
l=l+j;
l=l % 0x3e;//余数
serile[i]=strA[l];
l=l+0x24d9;
ljq2=l^ljq2;
break;
相关文档：
C++中的Static有两个作用。
1、 静态局部变量
静态局部变量在函数内定义 它的生存期为整个源程序，但是其作用域在该函数内，只能在定义该变量的函数内使用该变量。 允许对构造类静态局部量赋初值，若未赋以初值，则由系统自动赋以0值。
void fun1()
{
static int i = 0;
......
char c[] = "hello world" 分配局部数组
char* c = "hello world" 分配全局数组 全局区域的值是不能进行修改的
1 常量指针！如 int b, c; int * const a = &b;
表示a是一个常量指针它指向变量b的内存。但是因为是常量指针所以不能再用a指向其他变量，如 a = &c; 错误！可以修改� ......
Microsoft VBScript 运行时错误 '800a0046' 没有权限: 'CreateObject'
显示错误：没有权限: 'CreateObject'
记得将组件加入 Users 组权限（如果将 C 盘去掉 Users 组权限的话）。
开始。。。运行。。。regsvr32 jscript.dll (命令功能： 修复Java动态链接库)
开始。。。运行。。。regsvr32 vbscript.dll(� ......
本文来自qingye2008所发的此帖的讨论，感谢陈辉、马云剑、qingye的耐心指点和分享。
1、引言
话说qingye同学得到了一个用于加解密的Dll（该动态库在这里下载），通过Dll Export Viewer看到dll有2个导出函数分别是Dll_EncIn和Dll_EncOut，qingye同学想在VB中使用这两个函数。因为搞不到接口说明，只好通过查看汇编代码来猜 ......
有静态和动态两种，静态的需要lib而动态的只需要一个dll就可以了（但是要知道函数的定义一般是头文
件）动态相对复杂一点！但是掌握了也不是很难
//第一步 定义函数指针就是你要调用的函数，参数必须一致，不然就内存泄露
typedef HANDLE ......
