从品牌网站建设到网络营销策划,从策略到执行的一站式服务
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
天祝藏族自治ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景,ssl证书未来市场广阔!成为创新互联建站的ssl证书销售渠道,可以享受市场价格4-6折优惠!如果有意向欢迎电话联系或者加微信:13518219792(备注:SSL证书合作)期待与您的合作!
If TextBox1.Text.IndexOf("你好") = 0 Then
TextBox1.Text = ""
End If
End Sub
VB.NET中的Default关键字是用来声明类的默认属性的 默认属性可以直接使用“对象名(参数)”的形式来调用 而不用写出属性名
举个例子:
'先声明1个类
Public Class myclass
Dim a1 As Integer=1
Dim a2 As Integer=2
Default Public Property geta(ByVal x As Integer) As Integer
Get
If x=1 Then Return a1 Else Return a2
Set(ByVal value As Integer)
If x=1 Then a1=value Else a2=value
End Property
End Class
'这里的geta就是默认属性,后边在主函数里调用它
Public Class test
Shared Sub Main()
Dim obj As myclass=New myclass()
Console.WriteLine("{0} {1}",obj(1),obj(2))
End Sub
End Class
最后输出结果为:1 2
也就是说可以直接使用obj(1)这样的格式 而不用使用obj.geta(1)这样的格式了
注意 默认属性必须至少带有1个参数
是关键字。比如:SUB代表一个函数的开始,END SUB代表函数结束,函数主体语句就必须写在这两个关键字之间。CLASS类关键字,PRIVATE私有关键字,PUBLIC公用关键字,IF.....END IF是判断关键字,等等。建议找本基础书看一看。
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图