تكوين خاصية من نوع قائمة في Vb.net 2008

مرحباً أخي الكريم,

عليك استخدام مايدعى بالـ( Enumerations أي المرقمات ) على سبيل المثال :

 

[color= #000000; font-weight: bold;]Public Enum Nationality

Syrian

Egyptian

France

Turkey

[color= #990000;]End Enum

 

[color= #000000; font-weight: bold;]Private _Nationality [color= #b1b100;]As Nationality [color= #339933;]= Nationality[color= #339933;].Syrian

 

[color= #000000; font-weight: bold;]Public Property PersonNationality [color= #b1b100;]As Nationality

Get

[color= #b1b100;]Return _Nationality

[color= #990000;]End Get

Set [color= #009900;](Byval Ve [color= #b1b100;]As Nationality[color= #009900;])

_Nationality [color= #339933;]= Ve

[color= #990000;]End Set

[color= #990000;]End Property

بالتوفيق

Bashar Rabat كتب:

مرحباً أخي الكريم,

عليك استخدام مايدعى بالـ( Enumerations أي المرقمات ) على سبيل المثال :

انسخ الكود

1. Public Enum Nationality Syrian Egyptian France Turkey End Enum Private _Nationality As Nati
   onality = Nationality.Syrian Public Property PersonNationality As Nationality Get Return _Nat
   ionality End Get Set (Byval Ve As Nationality) _Nationality = Ve End Set End Property
2.  
   
   

بالتوفيق

احط الكود ده فين ؟

السلام عليكــم ورحمـة الله وبركاتــه ،،

إذا كان المطلوب أن تظهر أسماء الأدوات التى تم وضعها على الفورم فيمكن عمل ذلك عن طريق خاصية من النوع Control ,, الكود التالى يوضح ذلك

Public Class UserControl1

	Dim _ctrl As Control

	Public Property MyTestProperty() As Control
		Get
			Return _ctrl
		End Get
		Set(ByVal value As Control)
			_ctrl = value
		End Set
	End Property

End Class