|
4721
|
Informática / Software / Re: VMWARE no me detecta las interfaces de red
|
en: 3 Octubre 2015, 17:43 pm
|
Buenas. Por partes, ¿estamos hablando de VMWare Player, o VMWare Workstation?, por que VMWare a secas es el nombre de la compañia. De siempre yo he especificado conexión NAT en el Player y el WorkStation sin problemas, ¿lo has probado?. De todas formas, asegúrate que los siguientes servicios de VMWare están activados en el S.O. anfitrión: - nombre: VMWare NAT Service
id: VMWare NAT Service - nombre: VMWare DHCP Service
id: VMnetDHCP - nombre: VMware Authorization Service
id: VMAuthdService
Aparte, en el S.O. anfitrión también, accede al panel de control para comprobar que las conexiones de los adaptadores de VMWare están activadas, y, en caso de que quieras usar conexión Bridged en el VMWare Player/Workstation, entonces prueba a hacer click derecho en el adaptador de VMWare para activar el protocolo VMWare Bridged Network, tal vez por eso no te la detecta el S.O. invitado. Saludos.
|
|
|
4722
|
Programación / .NET (C#, VB.NET, ASP) / Re: Opacidad para la ventana pero no para los controles (WPF)
|
en: 3 Octubre 2015, 17:28 pm
|
Te aseguro que lo he buscado y justo ese código que muestras yo lo he probado y no funciona como yo quiero. Si no no preguntaríaAl establecer WindowStyle="none" el borde y la barra no aparecen. (se me olvidó comentarlo  ) Claro, eso es el estilo de ventana (con borde, sin borde, diálogo fijo, etc), no modifiques eso. ¿eso era lo único que dices que no te funciona como quieres?. ¿o te refieres a que usando ese ejemplo no te modifica la opacidad del fondo de la ventana sin alterar la opacidad de los controles?. De ser así, luego le hecho un vistazo. saludos
|
|
|
4726
|
Programación / .NET (C#, VB.NET, ASP) / Re: Formar pares de numeros
|
en: 1 Octubre 2015, 14:35 pm
|
De nada, pero déjame hacerte un consejo, ¿sabes lo que estaría muy bien que hagas?, un módulo donde definir todas esas funciones para tus propósitos, que seguro son muchas funciones ya en todo este tiempo... y así, aparte de reducir código, no llenarías tanto código para volverlo un código spaghetti. Hazme caso, no se si aceptarás mi sugerencia, en caso de que lo hagas no se si al principio pensarás que no te vale la pena (por que creo que te cuesta bastante escribir xD), pero a la larga si, sobre todo para la depuración de posibles fallos, joder, que ahora mismo lo tienes todo mezclao por todos laos. Incluso podrías crear extensiones de método para ganar mayor simplificación de código. Te lo digo simplemente como una sugerencia para mejorar tus hábitos de programación, puedes tomarla o ignorarla. Un ejemplo inicial: Dim pairs As IEnumerable(Of KeyValuePair(Of Integer, IEnumerable(Of String))) = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}.GetPairs() For Each pair As KeyValuePair(Of Integer, IEnumerable(Of String)) In pairs ListBox1.Items.Add(String.Format("Key: {0,-4} Values: {1}", pair.Key, String.Join(", ", pair.Value))) Next pair
+ Imports System Imports System.Collections.Generic Imports System.Linq Imports System.Runtime.CompilerServices Public Module IEnumerableExtensions ''' ---------------------------------------------------------------------------------------------------- ''' <summary> ''' Descripción de lo que hace esta función. ''' </summary> ''' ---------------------------------------------------------------------------------------------------- ''' <param name="sender"> ''' La colección de origen. ''' </param> ''' ---------------------------------------------------------------------------------------------------- ''' <returns> ''' Descripción delo que devuelve esta función. ''' </returns> ''' ---------------------------------------------------------------------------------------------------- ''' <exception cref="ArgumentException"> ''' El valor máximo de la colección debe ser un valor inferior a 10.;col ''' </exception> ''' ---------------------------------------------------------------------------------------------------- <Extension> <DebuggerHidden> <DebuggerStepThrough> Public Function GetPairs(ByVal sender As IEnumerable(Of Integer)) As IEnumerable(Of KeyValuePair(Of Integer, IEnumerable(Of String))) If (sender.Max >= 10) Then Throw New ArgumentException(paramName:="col", message:="El valor máximo de la colección debe ser un valor inferior a 10.") Else Return From value As Integer In sender Select New KeyValuePair(Of Integer, IEnumerable(Of String))( key:=value, value:=From index As Integer In Enumerable.Range(1, 9) Where (index <> value) Select (value & index)) End If End Function End Module
Saludos
|
|
|
4727
|
Programación / .NET (C#, VB.NET, ASP) / Re: Formar pares de numeros
|
en: 1 Octubre 2015, 13:41 pm
|
Bien, si según dices no hay número mayor de 9 en el array inicial, entonces todo perfecto con el último código que te puse, ¿no?  ...Solo que si el array inicial contiene un 0, entonces deberás devolver uno de strings para formatear los ceros, y de paso podemos evitar castings innecesarios: Lo que hago es, por cada valor de la colección de origen (ej: {1,5,3,6,7,2,9,4,0}) recorro el rango del 1 al 9 ({1,2,3,4,5,6,7,8,9}), y los voy uniendo en un string con el valor inciial (ej: 1&2="12", 1&3="13", así hasta el 9), excluyendo el valor que sea igual, es decir, si número de rango=1 y número de origen=1, entonces no juntar 1&1 para obtener el string "11". El poder de LINQ xD. Public Shared Function Test(ByVal col As IEnumerable(Of Integer)) As IEnumerable(Of KeyValuePair(Of Integer, IEnumerable(Of String))) If (col.Max >= 10) Then Throw New ArgumentException(paramName:="col", message:="Maximum value samaller than 10 is required.") Else Return From value As Integer In col Select New KeyValuePair(Of Integer, IEnumerable(Of String))( key:=value, value:=From index As Integer In Enumerable.Range(1, 9) Where (index <> value) Select (value & index)) End If End Function
+ Dim values As IEnumerable(Of Integer) = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9} For Each pair As KeyValuePair(Of Integer, IEnumerable(Of String)) In Test(values) Console.WriteLine(String.Format("Key: {0,-4} Values: {1}", pair.Key, String.Join(", ", pair.Value))) Next pair
Resultado de ejecución: Key: 0 Values: 01, 02, 03, 04, 05, 06, 07, 08, 09 Key: 1 Values: 12, 13, 14, 15, 16, 17, 18, 19 Key: 2 Values: 21, 23, 24, 25, 26, 27, 28, 29 Key: 3 Values: 31, 32, 34, 35, 36, 37, 38, 39 Key: 4 Values: 41, 42, 43, 45, 46, 47, 48, 49 Key: 5 Values: 51, 52, 53, 54, 56, 57, 58, 59 Key: 6 Values: 61, 62, 63, 64, 65, 67, 68, 69 Key: 7 Values: 71, 72, 73, 74, 75, 76, 78, 79 Key: 8 Values: 81, 82, 83, 84, 85, 86, 87, 89 Key: 9 Values: 91, 92, 93, 94, 95, 96, 97, 98 Recordemos tus expectativas: Key: 0 Values: 01, 02, 03, 04, 05, 06, 07, 08, 09 Key: 1 Values: 12, 13, 14, 15, 16, 17, 18, 19 Key: 2 Values: 21, 23, 24, 25, 26, 27, 28, 29 Key: 3 Values: 31, 32, 34, 35, 36, 37, 38, 39 Key: 4 Values: 41, 42, 43, 45, 46, 47, 48, 49 Key: 5 Values: 51, 52, 53, 54, 56, 57, 58, 59 Key: 6 Values: 61, 62, 63, 64, 65, 67, 68, 69 Key: 7 Values: 71, 72, 73, 74, 75, 76, 78, 79 Key: 8 Values: 81, 82, 83, 84, 85, 86, 87, 89 Key: 9 Values: 91, 92, 93, 94, 95, 96, 97, 98 Saludos
|
|
|
4728
|
Programación / .NET (C#, VB.NET, ASP) / Re: Formar pares de numeros
|
en: 1 Octubre 2015, 12:32 pm
|
Más bien parecen permutaciones, pero sigue sin estar claro y sabes que la ausencia de información esencial me cabrea, da los detalles necesarios, no me hagas tener que escribir o explicar 20 códigos distintos por no saber los detalles suficientes del algoritmo, ¿que pasa si el numero es 10, o 152, o 25095, o 123456789?, ¿qué se debe hacer entonces?. No explicaré el código hasta que me puedas confirmar si es correcto así, pero si no entiendes algo de este código, pregunta: Dim valuesInt As IEnumerable(Of Integer) = {1, 3, 4, 6, 2, 5, 8, 7, 9, 10} Dim pairs As IEnumerable(Of KeyValuePair(Of Integer, IEnumerable(Of Integer))) = From value As Integer In valuesInt Select New KeyValuePair(Of Integer, IEnumerable(Of Integer))( key:=value, value:=From index As Integer In Enumerable.Range(1, 9) Where index <> Integer.Parse(CStr(value).Last) Select CInt(value & index)) For Each pair As KeyValuePair(Of Integer, IEnumerable(Of Integer)) In pairs Console.WriteLine(String.Format("Key: {0,-4} Values: {1}", pair.Key, String.Join(", ", pair.Value))) Next pair
Resultado de ejecución: Key: 1 Values: 12, 13, 14, 15, 16, 17, 18, 19 Key: 3 Values: 31, 32, 34, 35, 36, 37, 38, 39 Key: 4 Values: 41, 42, 43, 45, 46, 47, 48, 49 Key: 6 Values: 61, 62, 63, 64, 65, 67, 68, 69 Key: 2 Values: 21, 23, 24, 25, 26, 27, 28, 29 Key: 5 Values: 51, 52, 53, 54, 56, 57, 58, 59 Key: 8 Values: 81, 82, 83, 84, 85, 86, 87, 89 Key: 7 Values: 71, 72, 73, 74, 75, 76, 78, 79 Key: 9 Values: 91, 92, 93, 94, 95, 96, 97, 98 Key: 10 Values: 101, 102, 103, 104, 105, 106, 107, 108, 109 Saludos!
|
|
|
4729
|
Programación / .NET (C#, VB.NET, ASP) / Re: Formar pares de numeros
|
en: 1 Octubre 2015, 11:19 am
|
Hola Luis No se entiende muy bien lo que necesitas, pero si no me equivoco lo que quieres hacer es añadir ceros a la izquierda a los números menores de 10, para que estos formen una logintud de 2 caracteres, par. Dim valuesInt As IEnumerable(Of Integer) = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10} Dim valuesStr As IEnumerable(Of String) = From value As Integer In valuesInt Select CStr(value).PadLeft(totalWidth:=2, paddingChar:="0"c) Console.WriteLine(String.Join(", ", valuesStr))
Resultado de ejecución: 01, 02, 03, 04, 05, 06, 07, 08, 09, 10 Saludos
|
|
|
|
|
|
|