Visual Basic - consulta importante

hola buenas tardes a todos , necesito saber como obtener el numero de serie del disco duro de mi pc para que el programa valide y solo trabaje en ese pc, de antemno muchas gracias a todos

A la pregunta de cómo obtener el número de serie ya la respondí hace un par de días en foro de Visual Basic Avanzado:

Marca la referencia "Microsoft Scripting Runtime" y pones este código

Dim FSO As New FileSystemObject
Dim drv As Drive
Set drv = FSO.Drives("c:")
MsgBox drv.SerialNumber

Una vez que tengas el número, lo comparas en el Form de inicio del proyecto y si no coincide, lo cierras:

Private Sub Form_Load()
Dim FSO As New FileSystemObject
Dim drv As Drive
Set drv = FSO.Drives("c:")
If drv.SerialNumber <> [MiNumero] then End
End Sub

QUIEN TE CREES QUE ERES???

Soy quien responde a las preguntas.

Y el comentario malicioso, no viene a cuento. Si sabes algo mejor, nos lo pones y así aprendemos todos.

Es fácil criticar y no dar soluciones.

te apoyo natalia

"Soy quien responde a las preguntas. " Eres la "RESPONDEDORA" oficial acaso? los demas no RESPONDEN?

Baja a la tierra y deja la SOBERBIA quieres!!!!

Esa no es manera de dirigirse a una Dama, grandísimo infeliz.
Seguramente tú aportas demasiado a este foro, como para ponerte a criticar y escribir babosada y media.
Ni modo, es lo malo de estos foros en los que no es necesario registrarse: que cualquier tipejo puede escribir lo que su miserable cerebro y "calidad" humana le dictan.

Hola espero todos esten bien necesito gran ayuda, estoy haciendo una consulta en visual basic access, pero quiero que el resultado me lo arroje en una tabla, como le puedo hacer ???