关于vbnet实战的信息

如何学习VB.NET？

　Namespace

创新互联专注于企业网络营销推广、网站重做改版、上思网站定制设计、自适应品牌网站建设、成都h5网站建设、商城网站定制开发、集团公司官网建设、成都外贸网站建设、高端网站制作、响应式网页设计等建站业务，价格优惠性价比高，为上思等各大城市提供网站开发制作服务。

包含类似或相关功能的类的集合

Class

用来定义一个对象，包含对象的属性（包括变量）、方法（包括过程sub和函数）

Sub

子过程，可以把要使用的数据以参数形式传入，但不返回值

Function

函数，同样可以传参数，但要求有返回值

Property

属性过程，设置或返回对象的属性值

Return

结束当前sub或function，若是函数则返回一个函数值

Dim

声明或定义一个变量

New

创建一个新的实例对象

Nothing

表示一个变量没有值，与其他语言或数据库中的null等价

当前类的实例对象的引用

Console

.NET

用于访问和操作命令窗口的类，主要用于命令行应用程序

Module

模块，定义一个不是类的代码块，但它同样可以包含变量和方法

运算符

算术运算符：/（除），\（整除）,Mod（取模）

串联运算符：，+亦可

逻辑/按位运算符：Not、And、Or、Xor、AndAlso、OrElse

赋值运算符：= ，^= ，*= ，/= ，\= ，+= ，-= ，=，=，=

比较运算符：，= ，，= ，= ，，Is ，IsNot ，Like

移位运算符：，

其他运算符：AddressOf 运算符，GetType 运算符，函数表达式，If 运算符，TypeOf 运算符，Await 运算符

DirectCast 运算符

TryCast 运算符

New 运算符

*运算优先级：算术连接比较逻辑运算（用括号可改变优先级）

详细：

如果表达式中出现几种运算，将按照预先确定的称为“运算符优先级”的顺序计算和解析各个部分。

算术运算符和串联运算符

求幂 (^)

一元标识和非（+、–）

乘法和浮点除法（*、/）

整数除法 (\)

取模 (Mod)

加法和减法（+、–），字符串连接 (+)

字符串连接 ()

算术移位（、）

比较运算符

所有比较运算符（=、、、=、、=、Is、IsNot、Like、TypeOf...Is）

逻辑运算符和位运算符

非 (Not)

与 (And、AndAlso)

或 (Or、OrElse)

异或 (Xor)

怎样用VB.NET进行网络编程？

都可以,可以用winsock,也可以自己重写SOCKET套接字.建议你如果工期紧,可以先用WINSOCK.当然最好是自己学用SOCKET套接字.这对未来开发网络通讯是很有帮助的.因为用WINSOCK有个毛病就是杀毒软件总会阻止

如何用vb.net进行网站开发

打开VS , 选择VisualBasic -- Web -- ASP.NET Web 应用程序

如下图:

用vb.net实现网络通信

用 vb.net socket通信

Dim th As Threading.Thread

2 Dim tcpl As System.Net.Sockets.TcpListener

4 Private Sub Form1_Load()Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

5 th = New System.Threading.Thread(New System.Threading.ThreadStart(AddressOf MyListen))

6 th.Start()

7 End Sub

9 Public Sub SendMessage()Sub SendMessage(ByVal IP As String, ByVal SendMsg As String)

10 Try

11 If IP "" Then

12 Dim tcpc As New System.Net.Sockets.TcpClient(IP, 5656)

13 Dim tcpStream As Net.Sockets.NetworkStream = tcpc.GetStream

14 Dim reqStream As New IO.StreamWriter(tcpStream)

15 reqStream.Write(SendMsg)

16 reqStream.Flush()

17 tcpStream.Close()

18 tcpc.Close()

19 End If

20 Catch ex As Exception

21 MsgBox(ex.Message.ToString)

22 End Try

23 End Sub

24 Private Sub MyListen()Sub MyListen()

25 Try

26 Dim ipAddress As System.Net.IPAddress = System.Net.Dns.Resolve(System.Net.Dns.GetHostName).AddressList(0)

27 tcpl = New System.Net.Sockets.TcpListener(ipAddress, 5656)

28 tcpl.Start()

29 While True

30 Dim s As System.Net.Sockets.Socket = tcpl.AcceptSocket()

31 Dim MyBuffer(1024) As Byte

32 Dim i As Integer

33 i = s.Receive(MyBuffer)

34 If i 0 Then

35 Dim lstrRec As String

36 Dim j As Integer

37 For j = 0 To i - 1

38 TextBox1.Text += Chr(MyBuffer(j)) ","

39 Next

40 End If

41 End While

42 Catch ex As Exception

43 MsgBox(ex.Message.ToString)

44 End Try

45 End Sub

47 Private Sub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

48 SendMessage("192.168.0.61", TextBox2.Text)

49 End Sub

VB.NET的问题

ASP要用JavaScript或者VBScript编写，和VB或者VB.NET没多少关系

把你程序中的Dim去掉