VB.NET Share

请问一下下面这段代码，运行的时候单击button1的时候显示第一个数位100，第二数为300，但是单击button2的时候显示两个都是0，怎么回事情呢？明明设置了share啊
Public Class Form1

Class testClass
Public Shared testShare As Integer
Public testNoShare As Integer
End Class

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim testClass1 As testClass = New testClass
testClass1.testShare = 100
testClass1.testNoShare = 300
MsgBox("testClass1的共享数为" & testClass1.testShare)
MsgBox("testClass1的非共享数为" & testClass1.testNoShare)
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim testClass2 As testClass = New testClass
MsgBox("testClass2的共享为:" & testClass2.testShare)
MsgBox("testClass2的非共享为:" & testClass2.testNoShare)
End Sub

Dim testClass2 As testClass = New testClass
New定义一个类变量,类中变量保持初始值0

dimfilen$,pathn$filen=test001pathn=f:\mkdirpathnfilenshellnetsharefilen=pathnfilen这些我都试过了访问不了同享文件夹在我电脑里已创建出来但别的电脑就是访问不了。我手动创建的是可以访问的乃至这样创建的同享文件夹，我右键它同享把勾点掉在点上，就能够访问了，why？