• Sábado 21 de Diciembre de 2024, 11:08

Autor Tema:  Como Quedaria Esto En Net  (Leído 2347 veces)

Taursoft

  • Miembro activo
  • **
  • Mensajes: 27
    • Ver Perfil
Como Quedaria Esto En Net
« en: Martes 27 de Enero de 2004, 19:43 »
0
POR FAVOR ALGUIEN SABRIA DECIRME COMO QUEDARIA ESTO EN VISUAL BASIC .NET

ESTO ES EN VISUAL BASIC 6.0

Public Property Get GetMediaID() As String
GetMediaID = m_MediaId
End Property

Y NO SE COMO VA N VISUAL BASIC .NET

ALGUIEN ME LO DICE POR FAVOR

GRACIAS

ROBER.29

  • Miembro MUY activo
  • ***
  • Mensajes: 421
    • Ver Perfil
    • http://www.contrapixel.com
Re: Como Quedaria Esto En Net
« Respuesta #1 en: Miércoles 28 de Enero de 2004, 09:27 »
0
Hola,

Eso quedaría de la siguiente forma:

Código: Text
  1.  
  2.  
  3. Private m_MediaId As String
  4.  
  5. Public Property GetMediaID() As String
  6.         Get
  7.              return m_MediaId
  8.         End Get
  9.         Set(ByVal Value As String)
  10.              m_MediaId = Value
  11.         End Set
  12.     End Property
  13.  
  14.  
  15.  

Saludos.
Roberto García
Moderador de Visual Basic.
Gerente
[contra]PixeL S.L.
Valladolid

Taursoft

  • Miembro activo
  • **
  • Mensajes: 27
    • Ver Perfil
Re: Como Quedaria Esto En Net
« Respuesta #2 en: Miércoles 28 de Enero de 2004, 15:32 »
0
y este con un condicional
Código: Text
  1.  
  2. Public Property Get GetAlbumGenre() As String
  3.     GetAlbumGenre = m_Category
  4.     If (m_Genre <> "") Then GetAlbumGenre = m_Genre
  5. End Property
  6.  
  7.  
iria asi
Código: Text
  1.  
  2. Public Property GetAlbumGenre() As String
  3.        Get
  4.             Return m_Category
  5.         End Get
  6.        Set
  7.             GetAlbumGenre = Value
  8.             If (m_Genre <> "") Then GetAlbumGenre = m_Genre
  9.         End Set
  10.     End Property
  11.  
  12.  
gracias saludos

Taursoft

  • Miembro activo
  • **
  • Mensajes: 27
    • Ver Perfil
Re: Como Quedaria Esto En Net
« Respuesta #3 en: Miércoles 28 de Enero de 2004, 15:42 »
0
y este
Código: Text
  1.  
  2. Public Property Let UseFirstMatch(FirstMatch As Boolean)
  3.     m_UseFirstMatch = FirstMatch
  4. End Property
  5.  
  6.  

IRIA ASI?

Código: Text
  1.  
  2. Public Property UseFirstMatch(ByVal FirstMatch As Boolean)
  3.         Get
  4.             Return m_UseFirstMatch
  5.         End Get
  6.         Set(ByVal FirstMatch As Boolean)
  7.             m_UseFirstMatch = FirstMatch
  8.         End Set
  9.     End Property
  10.  
  11.  


GRACIAS POR ACLARARME ESTAS DUDILLAS
SALUDOS