Search results for 'app:weblogs' matching tag 'General'

Enumerando el uso de las enumeraciones

peplluis — Thu, 22 Oct 2009 05:00:00 GMT

' A menudo dejamos de utilizar las enumeraciones por falta de comprensión.
'
' Recibo algunas preguntas en tanto a cómo utilizarlas, el presente ejemplo intenta
' clarificar su uso, así como dar algunas perspectivas nuevas, dando a conocer
' algunas características poco conocidas.

' Por definición, una enumeración corresponde a una integral asociada a un contenido como constante

' En la Sub New, destacar...
'   .destacar como en 'Nombres' obtenemos el tipo de la enumeración 'Electrodomésticos'
'   .el uso de [enum].GetNames en forma de array para añadir todos los ítems sin necesidad de iteraciones
'   .Para hacer mas legible el código utilizando una expresión declarativa de la misma
'   .Identificar su correspondencia

' Si mañana tengo una escapada hablaremos del atributo para uso como flag : <FlagsAttribute>
'

Class EnumeracionSimple
    Inherits Form

    Enum Electrodomesticos
        Horno
        Nevera
        Encimera
        Campana
        Batidora
        Plancha
        Secadora
        Balanza
    End Enum

    Sub New()
        AñadirComboConEnumeracion() 'Un combo con los ítems de la enumeración
        CodigoMasLeible(7)
        Identificando(2)

End Sub

    'Un combo con los ítems de la enumeración
    Sub AñadirComboConEnumeracion()
        'Al crear la clase
        Dim MiCombo As New ComboBox               'Crear ComboBox
        Dim Nombres = GetType(Electrodomesticos) 'Obtener el tipo de la enum
        'Un combobox con toda la enumeración
        MiCombo.Items.AddRange([Enum].GetNames(Nombres).ToArray)    'Añadir todos sus nombres
        MiCombo.Dock = DockStyle.Fill                              'Dock
        Me.Controls.Add(MiCombo)                                    'Añadir el Combo al Form
    End Sub

    'Clarificando cada caso en la selección
    Sub CodigoMasLeible(ByVal Seleccion As Integer)
        Select Case Seleccion
            Case Electrodomesticos.Balanza
                MsgBox("Hola desde Balanza")
            Case Electrodomesticos.Batidora
                MsgBox("Hola desde Batidora")
            Case Electrodomesticos.Encimera
                MsgBox("Hola desde Encimera")
        End Select
    End Sub

    'Identificando la selección
    Sub Identificando(ByVal Electodomestico As Integer)
        MessageBox.Show("Su nombre es : " + CType(Electodomestico, Electrodomesticos).ToString)
    End Sub
End Class

[Webcast] 21st October - "Inside WSUS v3 SP2: New features & handy tips"

Anonymous — Tue, 20 Oct 2009 05:00:00 GMT

Well I’ve never attended EminentWare webcast but this one looks quite cool: “Join EminentWare along with Microsoft MVP and WSUS Expert, Lawrence Garvin, for an educational webcast on WSUS v3 Service Pack 2. We'll review the new fixes and features...(read more)

[News] Google to offer free Wi-Fi on Virgin America flights

Anonymous — Tue, 20 Oct 2009 05:00:00 GMT

I read in this article that Google has teamed up with Virgin America to offer free in-flight Wi-fi on all flights between 10th November - 15th January. Fingers crossed this trial goes well and pretty soon we get to see free wi-fi on ALL flights (would...(read more)

[ConfigMgr] SP2 RTMs?

Anonymous — Tue, 20 Oct 2009 05:00:00 GMT

I’m hearing rumours (nothing official from Microsoft yet so please don’t take it as a given), that SP2 went RTM yesterday and should be available for download on the 22nd. Stay tuned for the official announcement and download link which I’ll pass on as...(read more)

[Events] MMMUG November 2009 Event - 6th November

Anonymous — Fri, 16 Oct 2009 05:00:00 GMT

Hot on the heels of announcing our event on the 6th November the MMMUG have announced their next evening that evening as Nathan explains below: “Once again it has been a while since the last mail about MMMUG, but on the plus side I do have what I think...(read more)

[WMUG] Last Night’s Event - 15th Oct 09

Anonymous — Fri, 16 Oct 2009 05:00:00 GMT

Many thanks to those of you that attended our event last night. It was a great turnout and I hope you all managed to take something away with you. It was good to see some new (and old) faces. Many thanks to Microsoft for allowing us to use Cardinal Place...(read more)

[MS KBs] Description of System Center Operations Manager 2007 R2 Cross Platform Agent Update

Anonymous — Fri, 16 Oct 2009 05:00:00 GMT

INTRODUCTION This update enables System Center Operations Manager 2007 R2 to support the foll... This update enables System Center Operations Manager 2007 R2 to support the following platforms: SUSE Linux Enterprise Server 11 (32-bit and 64-bit) Solaris...(read more)

[ConfigMgr] New FAQShop Article 15th Oct 09

Anonymous — Thu, 15 Oct 2009 05:00:00 GMT

How do I ensure only the relevant Device Drivers gets installed when building a machine from Stand-Alone Media? [15/10/09] Contributed By: Cliff Hobbs [MVP ConfigMgr] The answer is you need to create an Apply Driver Package Task Sequence step containing...(read more)

[ConfigMgr] New FAQShop Article 14th Oct 09

Anonymous — Wed, 14 Oct 2009 05:00:00 GMT

How do I delete an MDT Deployment Point? [14/10/09] Contributed By: Cliff Hobbs [MVP ConfigMgr] Creating a Deployment Point is easy but if you ever need to delete a Deployment Point it's not so obvious......(read more)

[SCVMM] Solution: You may be unable to create Virtual Machines after re-installing SCVMM using a retained database

Anonymous — Wed, 14 Oct 2009 05:00:00 GMT

Great tip here from Steve Bucci on the SCVMM Team blog : Here’s a good tip in case you ever want to reinstall System Center Virtual Machine Manager (SCVMM). If you use the "Retain Data" option you will likely be unable to create...(read more)