重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
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是判断关键字,等等。建议找本基础书看一看。