dim sockf=CreateObject("MSWinsock.Winsock","sockp_")
成都创新互联公司专注为客户提供全方位的互联网综合服务，包含不限于成都做网站、网站设计、山东网络推广、微信小程序定制开发、山东网络营销、山东企业策划、山东品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等，从售前售中售后，我们都将竭诚为您服务，您的肯定，是我们最大的嘉奖；成都创新互联公司为所有大学生创业者提供山东建站搭建服务，24小时服务热线：18982081108，官方网址：www.cdcxhl.com
Sub sockp_DataArrival(ByVal bytesTotal)
sockf.GetData( da,VbString)
End Sub
您好，
我感觉VB6.0 和VB.net有不小的差距，VB.net是纯面向对象的开发语言，为了适应.net Framework的安全性，vb.net进行了不小的调整。但是关键字修饰符之类的基本没有什么变化，所以您只需要习惯.net下的强类型，应该是不难转型。
举个简单的例子吧，vb.net下是没有“变体类型”这一数据类型的，整型就是整型，字符串就是字符串，像
a = 50 + 60
Text1.Text = a
这样的代码是不行的，VB6.0支持变体类型，会自动进行类型转换，而.net下为了保证安全性，会要求程序员自己进行必要的转换。
至于API，.net框架下对API的依赖性像VB6中那么高，一些API完成的工作可以由一些类库来完成。API的调用也不是一样的，因为有些API涉及到了“不安全代码”，而且API是用另一种非.net 语言编写的，所以调用时有些特别的要求。
vb.net工作在.NET Framework下，与VB6的解释执行不同，VB.NET是编译执行的，.net下所有的应用程序都被编译成一种“中间语言（MSIL）”的形式，运行时由一种称为即时编译器（JIT）的程序进行二次编译。可以说.net既是开发环境又是运行环境，它提供了通用类型系统（CTS）和“公共语言运行时”（Common Language Runtime，CLR），前者为开发时提供了类型支持，.net下语言中的基本数据类型都来自于这个类型系统；后者为.net应用程序提供了运行环境，包括JIT、GC（内存垃圾收集器）等等，同时负责代码的运行时安全。
最后，我感觉学一门语言并不难，难的是理解一些系统和程序设计中低层的东西，不过，我比较建议您学习VB.NET，因为它的纯面向对象的特性比较符合目前的软件开发方式。
希望这些信息对您有帮助。
选择Text属性，右边出现一个向下箭头，里面可以回车换行
如果用代码控制，那么：
Button1.Text = “123” vbCrLf "345"
'--------------------
百度VB2010(VB.NET)吧建设发展中,需要你的支持和帮助!!!
快加入我们吧!发表你的疑问,经验,程序,分享..
让我们共同进步!
REM 假设存在Image类型变量img
Dim bmp As Bitmap = CType(img, Bitmap) '先将Image类型强制转换为Bitmap类型
bmp.Save("C:\1.png", System.Drawing.Imaging.ImageFormat.Png) '以PNG格式存储到C:\1.png
调用 脚本解析引擎，
textbox2.text=Eval(textbox1.text).ToString()
Function Eval(ByVal Expressions As String) As Double
Dim Mssc = CreateObject("MSScriptControl.ScriptControl")
Mssc.Language = "vbscript"
Return CDbl( Mssc.Eval(Expressions))
End Function
不喜欢上面提示的警告的话
textbox2.text=EvalString(textbox1.text)
Function EvalString(ByVal Expressions As String) As String
dim oType = System.Type.GetTypeFromProgID("MSScriptControl.ScriptControl")
Dim o = System.Activator.CreateInstance(oType)
oType.InvokeMember("Language", System.Reflection.BindingFlags.SetProperty , Nothing, o,New Object(){ "vbscript"})
Return oType.InvokeMember("Eval", System.Reflection.BindingFlags.InvokeMethod, Nothing, o, New Object(){Expressions}).ToString()
End Function
Eval 在VB中使用，刚找到的_vb吧_百度贴吧
上面是我做的签到程序，里面有一段是用来获得关注贴吧的代码。主要用到的是对手机版关注贴吧页面HTML的正则处理和XMLReader读取。