189 8069 5689
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是判断关键字，等等。建议找本基础书看一看。