Hola, soy nuevo por aquí, muchas gracias por compartir tanto vuestros conocimientos, estoy empezando en la programación y me estáis siendo de muchísima ayuda. Bueno, vamos al lio.
Estoy haciendo un programa y quiero poner una condicional sobre el número de serie del disco duro.
Lo leo con el siguiente código y me lo muestra bien en el textbox:
Dim disco As New System.Management.ManagementObject("Win32_PhysicalMedia='\\.\PHYSICALDRIVE0'")
LBSERIAL1.Text = disco.Properties("SerialNumber").Value.ToString
Lo que necesito es ponerle una condicional para que si el número del disco duro no es, no ejecute el programa, no se lo que hago mal, pero el MsgBox, siempre me muestra que el disco duro no es el correcto:
If disco.Properties("SerialNumber") Is "5WR1CEB8" Then
MsgBox("numero serie correcto")
Else
MsgBox("numero NO correcto")
End if
Si me podéis ayudar....
Muchas gracias.