Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: migyn12 en 17 Mayo 2015, 20:24 pm



Título: Transformar codigo 6.0 a VB
Publicado por: migyn12 en 17 Mayo 2015, 20:24 pm
Este es el codigo
Código
  1. If label1.caption <> StrCap then
  2. If label1.aligment = 0 then
  3. label1.caption = Left(StrCap, Len(lblCaption.caption)+1)



ayuda porfavor


Título: Re: Transformar codigo 6.0 a VB
Publicado por: Eleкtro en 17 Mayo 2015, 21:04 pm
Una manera de hacerlo sería así:
Código
  1. If Not (Label1.Text.Equals(strCap, StringComparison.OrdinalIgnoreCase)) AndAlso (Label1.TextAlign = ContentAlignment.TopLeft) Then
  2.  
  3.    Label1.Text = strCap.Substring(0, lblCaption.Text.Length + 1)
  4.  
  5. End If

Ten en cuenta que de todas formas y si lo prefieres siempre puedes seguir utilizando la sintaxis y los nombres de los métodos de VB6 (Len, Left, etc) desde el namespace Microsoft.VisualBasic, pero en puro código .Net ...claro está, aunque esos miembros solo están ahí por compatibilidad y comodidad para usuarios en tus mismas circunstancias, ya que NO es recomendable seguir estancado en las prácticas de uso de VB6.

Saludos.