With button1 .Text = "ok" .Visible = True .top = 200End With2.获得对象类型(或者说属于哪个类)
If Typeof(myForm) Is Form Then 'Typeof 后面只能接is,看来只能用在if语句中End IfTypename(myForm) As String '可以用在任何位置3.CallByname 函数执行对象的方法,或者设置或返回对象的属性。智能设备不支持此函数.
Public Function CallByname( _ ByVal ObjectRef As System.Object,_ ByVal Procname As String,_ ByVal UseCallType As CallType,_ ByVal Args() As Object _) As Object第一个参数ObjectRef表示要 *** 作的对象.第二个参数Procname表示要 *** 作的方法、属性或者过程名称的字符表示.第三个参数UseCallType是一个常数选项,CallType枚举 类型的枚举成员,当 *** 作是一个方法时,值是vbMethod;当被 *** 作的是设置属性时,值是vbLet;得到属性时,值是vbGet;设置对象属性的值时,值是vbSet.第四个参数Args是可选的ParamArray,参数数组,包含要传递给所调用的属性和方法的参数。
imports Microsoft.VisualBasic.CallType'在下面的示例中,第一行使用 CallByname 设置文本框的 Text 属性,第二行检索 Text 属性的值,第三行调用 Move 方法以移动文本框。Sub TestCallByname1() 'Set a property. CallByname(TextBox1,"Text",CallType.Set,"New Text") 'RetrIEve the value of a property. MsgBox(CallByname(TextBox1,CallType.Get)) 'Call a method. CallByname(TextBox1,"HIDe",CallType.Method)'下一个示例使用 CallByname 函数调用集合对象的 Add 和 Item 方法。Public Sub TestCallByname2() Dim col As New Collection() 'Store the string "Item One" in a collection by 'calling the Add method. CallByname(col,"Add",CallType.Method,"Item One") 'RetrIEve the first entry from the collection using the 'Item property and display it using MsgBox(). MsgBox(CallByname(col,"Item",CallType.Get,1))End SubEnd Sub总结
以上是内存溢出为你收集整理的学习vb.net全部内容,希望文章能够帮你解决学习vb.net所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)