Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
CitarCódigo [Seleccionar]DateAndTime.DateAdd(4
por:Código [Seleccionar]DateAndTime.DateAdd(DateInterval.Day
Cita de: buite en 15 Noviembre 2017, 10:48 AMEs un enfermo. Yo siento compasión.
CitarCitarCódigo [Seleccionar]Dim date As DateTimeCódigo [Seleccionar]Dim [date] As DateTimeCitarCódigo [Seleccionar]DateAndTime.get_NowCódigo [Seleccionar]DateAndTime.NowCitarCódigo [Seleccionar]DateAndTime.get_TodayCódigo [Seleccionar]DateAndTime.TodayCitarCódigo [Seleccionar]DateAndTime.get_TimeStringCódigo [Seleccionar]DateAndTime.TimeStringCitarCódigo [Seleccionar]DateAndTime.DateAdd(4Código [Seleccionar]DateAndTime.DateAdd(DateInterval.DayCitarCódigo [Seleccionar]As TimerCódigo [Seleccionar]As System.Windows.Forms.TimerCitarCódigo [Seleccionar]New TimerCódigo [Seleccionar]New System.Windows.Forms.TimerCitarCódigo [Seleccionar]Private Overridable PropertyCódigo [Seleccionar]Private Property
CitarCitarCódigo [Seleccionar]Public Custom EventCódigo [Seleccionar]Public EventCitarCódigo [Seleccionar]New Thread(New ThreadStart(AddressOf Me.LeerSocket)).StartCódigo [Seleccionar]Dim t As New Thread(New ThreadStart(AddressOf Me.LeerSocket))
t.Start
Dim size As New Size(&H100, &H124)Me.CheckedListBox1.Size = New Size(&H100, &H124)CitarCódigo [Seleccionar]
size = New Size(280, &H98)
Me.CheckedListBox2.Size = size
Me.CheckedListBox2.Size = New Size(280, &H98)Public Module Module1
Public Sub Main()
Dim filepath As String = "...\SISTEMA NO OBFUSCADO\LOTERIA\Form1.vb"
Dim sb As New StringBuilder()
Dim size As String = String.Empty
Dim control As String = String.Empty
Dim lines As IEnumerable(Of String) = File.ReadLines(filepath, Encoding.Default)
For Each line As String In lines
If line.TrimStart().ToLower().StartsWith("size = new size") Then
size = line.Substring(line.IndexOf("=") + 1).TrimStart() ' "New Size(width, height)"
Continue For
End If
If line.TrimStart().ToLower().Contains(".size =") Then
If Not String.IsNullOrEmpty(size) Then
control = line.Substring(0, line.LastIndexOf("=") + 1).TrimStart() ' "Me.ControlName.Size ="
Debug.WriteLine(control & size)
sb.AppendLine(control & size) ' "Me.ControlName.Size = New Size(width, height)"
size = String.Empty
control = String.Empty
Continue For
End If
End If
sb.AppendLine(line)
Next line
File.WriteAllText(".\Form1_SizeFixed.vb", sb.ToString())
End Sub
End ModuleDim point As New Point(&H10, &H80)Me.CheckedListBox1.Location = New Point(&H10, &H80)CitarCódigo [Seleccionar]
point = New Point(280, &H98)
Me.CheckedListBox2.Location = point
Me.CheckedListBox2.Location = New Point(280, &H98)Public Module Module1
Public Sub Main()
Dim filepath As String = "..\SISTEMA NO OBFUSCADO\LOTERIA\Form1.vb"
Dim sb As New StringBuilder()
Dim point As String = String.Empty
Dim control As String = String.Empty
Dim lines As IEnumerable(Of String) = File.ReadLines(filepath, Encoding.Default)
For Each line As String In lines
If line.TrimStart().ToLower().StartsWith("point = new point") Then
point = line.Substring(line.IndexOf("=") + 1).TrimStart() ' "New Point(x, y)"
Continue For
End If
If line.TrimStart().ToLower().Contains(".location =") Then
If Not String.IsNullOrEmpty(point) Then
control = line.Substring(0, line.LastIndexOf("=") + 1).TrimStart() ' "Me.ControlName.Location ="
Debug.WriteLine(control & point)
sb.AppendLine(control & point) ' "Me.ControlName.Location = New Point(x, y)"
point = String.Empty
control = String.Empty
Continue For
End If
End If
sb.AppendLine(line)
Next line
File.WriteAllText(".\Form1_PointFixed.vb", sb.ToString())
End Sub
End ModuleDim manager As New ResourceManager(GetType(Form1))Me.Icon = DirectCast(manager.GetObject("$this.Icon"), Icon)Cita de: pax01 en 14 Noviembre 2017, 14:28 PMCódigo [Seleccionar]void AgregarImpuesto(double impuesto){
Operaciones
}
¿Eso es un método de instancia? (Es decir sin el static ?)
Cita de: pax01 en 14 Noviembre 2017, 14:28 PM
* Realizar un método de clase llamado "MostrarAuto", que recibirá un
objeto de tipo "Auto" por parámetro y que mostrará todos los
atributos de dicho objeto.Código [Seleccionar]
public void MostrarAuto(Auto auto){
Codigo
}
Es esto un método de clase ?
Cita de: pax01 en 14 Noviembre 2017, 14:28 PMQue diferencias hay entre un metodo de clase y de instancia ?
public class Class1 {
public Class1() { }
public static void StaticMethod() {
Console.WriteLine("I'm a static method.");
}
public void NonStaticMethod() {
Console.WriteLine("I'm not a static method.");
}
}Class1.StaticMethod();Class1 obj = new Class1();
obj.NonStaticMethod();Cita de: pax01 en 14 Noviembre 2017, 14:28 PMTiene que ver con el static y con el modificar de acceso a tal metodo (public, priv, ext, int, prot)?)
Cita de: pax01 en 14 Noviembre 2017, 14:28 PM
* Sobrecargar su constructor para poder instanciar objetos pasándole como parámetros:
i. La marca y el color (primera sobrecarga)
ii. La marca, color y el precio (segunda sobrecarga).
iii. Y tres sobrecargas más, de las cuales dos deben tener como parámetro la fecha.
Este punto no se ni por donde arrancarlo. Instanciar objetos sería "crear objetos" por lo que tengo entendido, pasandoselo como parámetros al constructor pero lo que no me queda claro es la parte de Sobrecargar su constructor, como modifico la sobrecarga a medida que corre el programa. Si me pueden dar una explicacion/tip/codigo para entender el funcionamiento de la sobrecarga del constructor sería excelente.
public sealed class Producto {
public string Nombre { get; set; }
public string Marca { get; set; }
public Color Color { get; set; }
public double Precio { get; set; }
public DateTime Fecha { get; set; }
public Producto() :
this(string.Empty, string.Empty, Color.Empty, new double(), new DateTime()) {}
public Producto(string nombre) :
this(nombre, string.Empty, Color.Empty, new double(), new DateTime()) {}
public Producto(string nombre, string marca) :
this(nombre, marca, Color.Empty, new double(), new DateTime()) {}
public Producto(string nombre, string marca, Color color) :
this(nombre, marca, color, new double(), new DateTime()) {}
public Producto(string nombre, string marca, Color color, double precio) :
this(nombre, marca, color, precio, new DateTime()) {}
public Producto(string nombre, string marca, Color color, double precio, DateTime fecha) {
this.Nombre = nombre;
this.Marca = marca;
this.Color = color;
this.Precio = precio;
this.Fecha = fecha;
}
}
Cita de: zalazar16 en 13 Noviembre 2017, 22:23 PM
ahora no tengo los Me000x y la infinidad de parecidos, solo DateTime y Size
Cita de: **Aincrad** en 13 Noviembre 2017, 17:05 PMCódigo (vbnet) [Seleccionar]CreateObject("SAPI.SpFileStream")
. El hombre solo buscaba nuevas experiencias...
Cita de: zalazar16 en 12 Noviembre 2017, 15:13 PMCito algo del Amigo Elektroque fue la persona que me ayudó:
"En el código fuente que has compartido, el tamaño y posición de los controles se estaba especificando mediante una variable llamada "point", y otra "size", esta última entraba en conflicto con la propiedad Form.Size. Las referencias de los controles, así como la asociación de eventos de los controles, estaban definidos mediante propiedades, lo cual es muy típico de ver en conversores de código C# a VB.NET."