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语言必知必会
指针：
1.指针声明后要赋值！否则是空指针，可不知道指向了哪里
例如：
void swap(int *a,int *b){
int *tmp;
*tmp=*a;
*a=*b;
*b=*tmp;
}
本来是想利用上面的swap函数实现两个数的互换，但是*tep=*a;这句话是有误的 ......
本文触及到Socket TCP/IP编程方面的知识，其实这是很简单的内容，大家看不明的地方大可以先往下读，以后再看一遍，可能会觉得很简单。
很多人写网站用惯了IIS和Tomcat这些高级的后台来做网站后台服务，然而，在这些后台还没有问世之前，人们是怎么编写网站的呢？他们底层共同遵守的准则和标准又是什么呢？
这就是ht ......
如果用户熟悉Linux下的sed、awk、grep或vi，那么对正则表达式这一概念肯定不会陌生。由于它可以极大地简化处理字符串时的复杂度，因此现在已经在许多Linux实用工具中得到了应用。千万不要以为正则表达式只是Perl、Python、Bash等脚本语言的专利，作为C语言程序员，用户同样可以在自己的程序中运用正则表达式。
标准的C和C ......
VBScript 运行常见错误
如果 VBScript 脚本执行系统无法实施的操作，则会产生 VBScript 运行时错误。只有在运行脚本、为变量表达式赋值或分配内存时，才会产生 VBScript 运行时错误。 以下是65个运行时错误：
错误编号 描述
十进制 十六进制 说明
5 800A0005 无效过程调用或参数
6 800A00 ......
代码：
Option Explicit
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetW ......
