vb.net類屬性怎么寫,vb和net的關系

如何聲明控件屬性 vb.net

Public Class ControlValue

成都創新互聯公司主營葉城網站建設的網絡公司,主營網站建設方案,成都APP應用開發,葉城h5小程序設計搭建,葉城網站營銷推廣歡迎葉城等地區企業咨詢

Inherits Control

''' summary

''' 獲取或設置控件的值。

''' /summary

System.ComponentModel.Browsable(True)

System.ComponentModel.Category("布局")

System.ComponentModel.Description("獲取或設置控件的值。")

Public Property Value As String

End Class

VB.NET中標準的實體類怎么寫的,請教VB高手指導

'代碼來源:代碼街codejie.net

'由于在vb.net里變量名不區分大小寫(StuName和stuname是一樣的),所以個別變量名需要修改

'在vb.net中,模塊級變量的命名原則是以m_開頭

Public Class Student

Private m_stuNo As String '學生號字段

Private m_stuName As String '學生姓名字段

Private m_stuAge As Integer '學生年齡字段

Private m_stuAddress As String '學生住址字段

'無參構造方法

Public Sub New()

End Sub

'有參構造方法

Public Sub New(ByVal stuNo As String, ByVal stuName As String, ByVal stuAge As Integer, ByVal stuAddress As String)

m_stuNo = stuNo

m_stuName = stuName

m_stuAge = stuAge

m_stuAddress = stuAddress

End Sub

'學生號屬性

Public Property StuNo() As String

Get

Return m_stuNo

End Get

Set(ByVal value As String)

m_stuNo = value

End Set

End Property

'學生姓名屬性

Public Property StuName() As String

Get

Return m_stuName

End Get

Set(ByVal value As String)

m_stuName = value

End Set

End Property

'學生年齡屬性

Public Property StuAge() As Integer

Get

Return m_stuAge

End Get

Set(ByVal value As Integer)

m_stuAge = value

End Set

End Property

'學生住址屬性

Public Property StuAddress() As String

Get

Return m_stuAddress

End Get

Set(ByVal value As String)

m_stuAddress = value

End Set

End Property

End Class

vb.net 自定義類屬性的問題?

注意下你給ButtonTop的Image屬性賦值的地方,你的屬性SET里是針對【上】這個類的改變,你如果這樣寫是觸發不了屬性改變的:

ButtonTop.背景?=?Image.FromFile("C:/1.png")

正確的處理辦法應該是new一個【上】類的對象,初始化時進行賦值就可以了

Me.ButtonTop?=?New?Class1()?With?{.背景?=?Image.FromFile("C:/1.png")}

關于vb.net中屬性的定義

Property用于標識一個類成員為屬性而不是方法.屬性可以被獲取,屬性在被獲以的時候利用get句柄返回其值.屬性可以被賦值,這個過程是由set句柄完成的.這兩個句柄可以不同時存在.如果只有get而沒有set,那屬性就是只讀的.如果只有set而沒有get,那屬性就是只寫的.

就是定義了兩個屬性:s_name和s_sex

Overridable 表示這個屬性可以被重載。

設置和重設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

注意:如果用戶需要多次使用一個屬性值的話,那么先把屬性值賦給一個變量,將會使效率更快一點。

vb.net寫了一個類,給這個類的屬性賦值是總是提示該屬性不是類的成員,求解

在vb.net窗口程序里測試你的代碼沒有問題,所以應該是其他問題.

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Protected Sub s_Msg()

Dim cust As New custinfo()

cust.CpName = "公司"

MsgBox(cust.CpName)

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

s_Msg()

End Sub

End Class

分享標題:vb.net類屬性怎么寫,vb和net的關系
本文路徑:http://m.kartarina.com/article30/dseiepo.html

成都網站建設公司_創新互聯,為您提供網站設計公司服務器托管動態網站自適應網站微信小程序外貿建站

廣告

聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯

成都網站建設公司
主站蜘蛛池模板: 国产精品无码一区二区三区毛片| 国产精品无码国模私拍视频 | 亚洲精品无码成人| 变态SM天堂无码专区| 日韩人妻无码中文字幕视频| 中文字幕无码高清晰| 人妻av无码专区| 少妇无码一区二区三区| 日韩人妻系列无码专区| 亚欧免费无码aⅴ在线观看| 黄色成人网站免费无码av | 麻豆人妻少妇精品无码专区| 亚洲精品无码鲁网中文电影| av区无码字幕中文色| 国产免费黄色无码视频| 亚洲AV永久无码精品一福利| 潮喷无码正在播放| 久久久久久亚洲精品无码| 久久久久亚洲Av片无码v| 日韩精品无码Av一区二区| 97久久精品无码一区二区天美| 国产精品无码不卡一区二区三区| 亚洲精品无码成人| 99久久国产热无码精品免费| 暴力强奷在线播放无码| 少妇无码太爽了不卡视频在线看| 日韩人妻无码中文字幕视频 | 无码精品久久久天天影视 | 无码AV中文字幕久久专区| 国产啪亚洲国产精品无码| 无码人妻aⅴ一区二区三区有奶水| 日韩精品无码一区二区三区免费 | 亚洲va成无码人在线观看| 国产午夜片无码区在线播放| 亚洲?v无码国产在丝袜线观看| 无码国产精成人午夜视频不卡 | 一本一道中文字幕无码东京热| 人妻精品久久无码区洗澡| 亚洲精品无码专区| av大片在线无码免费| 精品人妻无码区二区三区|