vb.net属性写法 vbnet function

请教c#/vb.net高手{ get; set; }属性的写法问题。

这种写法在.net 2.0后才出现的，目的是为了减轻程序员的工作量，编译器会自动为你补充完整，如：

美兰网站制作公司哪家好，找成都创新互联公司！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设公司等网站项目制作，到程序开发，运营维护。成都创新互联公司于2013年开始到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选成都创新互联公司。

public string name{get;set;}

编译器自动生成（可能会更负责更完善）：

private string name;

public string Name

{

get { return name; }

set { name= value; }

}

这种写法在一般时候很好，但是有一种情况你不得不放弃这种写法，那就是你要在里面进行校验的时候，比如set中有运算或者校验之类的，get中有转换等等，这种情况下，你就必须老老实实的写个完整的才可以。

vb.net修改textbox的数据绑定属性 代码怎么写？ 写成如图的属性

我简单写一个,供你参考,字体的名字可以在控件的font属性里找到.

Private Sub Form_Load()

Combo1.AddItem "1"

Combo1.AddItem "2"

Combo1.AddItem "3"

Combo1.AddItem "4"

Combo1.ListIndex = 0

End Sub

Private Sub Combo1_Click()

If Combo1.Text = "1" Then

RichTextBox1.SelFontName = "Stylus BT"

RichTextBox1.SelFontSize = 10

End If

If Combo1.Text = "2" Then

RichTextBox1.SelFontName = "CommercialScript BT"

RichTextBox1.SelFontSize = 14

End If

If Combo1.Text = "3" Then

RichTextBox1.SelFontName = "Segoe"

RichTextBox1.SelFontSize = 18

End If

If Combo1.Text = "4" Then

RichTextBox1.SelFontName = "Nina"

RichTextBox1.SelFontSize = 24

End If

End Sub

注意2点, 首先combobox的事件选用 click,而非双击默认到的change事件中,因为change是通过改变项的内容引发. 其次你需要在 RichTextBox1 的属性里找到 HideSelection 属性,改成 false,不然你会误以为拖动combobox之后richtextbox1中的文字没有被选中.其实还是保持选中状态的,这里改成false比较直观.

设置和重设vb.net的属性

当用户可以设置或者得到属性的值的时候，这些属性就在改变。有此属性可以在设计的时候改变。用户可以在属性窗口设置这些属性的值，而不需要写任何代码，而有些代码在设计的时候是不能改变的，所以必须在运行的程序中写入一些设置属性的值的代码。

那些可以在运行的时候设置和读取的属性被称作"read-write"属性。而那些只能在运行的时候读取的代码称为"read-only"属性。

1.设置属性值

当需要改变一个对象的外观或者行为时，就可以改变对象的属性值。例如可以通过改变一个textbox控件的Text属性值，来改变Textbox里面的内容。

设置一个属性的值，可以用以下的语法：

object.property=expression

如下一些实例：

TextBox1.Top=200 '让Top属性值为200

TextBox1.Visible=True '显示TextBox

TextBox1.Text="hello" '在TextBox中显示"hello"

2.得到属性的值

当代码要对一个对象进行一些操作时，用户可能需要得到一个对象的状态，例如，在对一个TextBox控件进行下一步操作时，可能需要得知TextBox的text属性的值，等等。

通常情况下，用户可以通过下面这样的语法得到一个对象的属性值：

variable=object.property

用户可以把一个对象的属性值作为一个复杂表达式的一部分，而不需要先把属性值赋给一个变量再进行计算，下面这个例子就是改变一个radio按钮的属性的代码：

Private Sub cmdAdd_Click()

'[statements]

RadioButton1.Top=RadioButton1.top+20

'[statements]

End Sub

注意：如果用户需要多次使用一个属性值的话，那么先把属性值赋给一个变量，将会使效率更快一点。