一个Form赋值给object类型变量,然后给这个form里面的Textbox赋值出错
aha99 2007-08-07 07:30:08 新规一个工程,在默认建立的Form1上追加一个button1和一个Textbox1,然后追加一个module1,module1里面追加下面代码
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs ) Handles Button1.Click
Call a()
End Sub
End Class
Module Module1
Public sub a()
dim obj as Object
obj = Form1
obj.Textbox1.Text = "Test"
'上面这行编译不出错,运行的时候出错,提示在Form1内找不到Textbox1这个变量。VB6中运行能通过,而且一个从VB6用工具升级到.net的的程序中又几乎一样的写法,就能运行通过。请高手指点一下,这种问题是什么原因引起来的,谢谢。
End Sub
End Module