Usa el sender, es el que contiene el control al que se ha llamado:

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim pcb As New Button : pcb.Tag = "Elektro H." : AddHandler pcb.Click, AddressOf pcb_click : Me.Controls.Add(pcb)
    End Sub
 
    Private Sub pcb_click(sender As System.Object, e As System.EventArgs)
        MsgBox(sender.tag)
    End Sub

---

@Patxiku69
No necesitas a San Google para estas cosas, necesitas fijarte en los posts con chincheta en el foro. y sobretodo usar el buscador del foro, porque no hace mucho pregunté un tema parecido y está en la primera página del foro vaya...

Y bueno, aunque llego tarde a lo de asociar eventos, aquí tienes un código que te habría venido muy bien:

[APORTE] Snippets !! (Posteen aquí sus snippets)

Add controls with events in real-time

 Dim chk_() As CheckBox
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Dim Array_Size As Integer = 5 'change this for the number of controls that will appear
        ReDim chk_(Array_Size)
 
        For chk_num = 0 To Array_Size
            chk_(chk_num) = New CheckBox
            chk_(chk_num).Text = "Checkbox " + chk_num.ToString
            chk_(chk_num).Top = 20 * chk_num
            Me.Controls.Add(chk_(chk_num))
 
            ' Add a event handler to a subroutine
             AddHandler chk_(chk_num).CheckedChanged, AddressOf CheckBoxSub
        Next
    End Sub
 
    Public Sub CheckBoxSub(ByVal sender As Object, ByVal e As System.EventArgs)
         Dim CheckboxN As CheckBox = CType(sender, CheckBox)
         If CheckboxN.Checked = True Then MsgBox("Checkbox is checked") Else MsgBox("Checkbox is unchecked")
    Ens Sub

Handle the same event for various controls

   Private Sub Button_Is_Clicked(sender As Object, e As EventArgs) Handles _
        Button1.Click, _
        Button2.Click, _
        Button3.Click
 
        Dim Clicked_Button As Button = CType(sender, Button)
 
        If Clicked_Button.Name = "Button1" Then
        ' Things for Button1
        ElseIf Clicked_Button.Name = "Button2" Then
        ' Things for Button2
        ElseIf Clicked_Button.Name = "Button3" Then
        ' Things for Button3
        End If
    Ens Sub

Saludos!

Es fácil saber el tiempo aproximado de vida de cualquier producto y no hay que ser nada inteligente... símplemente fíjate en la garantía de vida de tu disco duro (que segúramente será 2 años), yo no grantizaría 5 años si vendiera discos porque sé que mi compaía saldría perdiendo dinero .

EDITO:
Ahora, el tiempo límite exacto es impredecible... yo no he manejado ni por aosmo tanto material como Simorg y aprendiz-oscuro y compañía, pero te puedo decir que un disco duro se te puede morir de un infarto (Se apaga y se acabó), o se puede morir léntamente dando pequeños fallos que van a más fallos y de mayor duración, con la segunda opción tienes posibilidades para salvaguardarlo todo, pero como se muera de un infarto... te cagas en todo.

Ah, y lo de recuperar los datos... yo creo que cuando sepas la pasta que vale hacer eso... si algún día se te estropea un disco se te van a quitar las ganas de recuperarlo xD, más vale que tengas discos de reserva y al MÍNIMO fallo (muerte lenta) cambies de disco duro, te saldrá más barato y es más seguro, te lo digo por experiencia, he pasado por todo lo que acabo de comentar.

Saludos.

Primer error: Olvídate del comando SET, el comando se llama Editv64.
Segundo error: No le estás otorgando ningún nombre a la variable del comando para almacenar la contraseña.

Editv64 -m -p "Introduce el password>>" passw
echo %passw%

Saludos!

No quiero 4, quiero más de 4  

Porque tengo 1 HDD de 2 TB + otro de 1 TB para almacenamiento, y el disco duro principal de 1 TB, y no me cabe todo lo que tengo (Varios años ya ocupando espacio...) xD,
con un disco de 4 TB al menos me ahorraré el calentamiento de temperatura por tener 3 discos conectados en lugar de uno o dos.


Los discos actuales de 4 TB valen 160 € +/-, los de 3 TB 130 € +/-,
Si te costaron 100 € en total, por 30 € más te pillabas uno de 2-3 TB.

Los de 500 GB valen lo que has dicho, entre 50-60 y el más caro que he visto 80 €, parece que no está muy equilibrado el precio para los discos de 500 GB si por el doble de dinero te puedes comprar la quadruple capacidad de almacenamiento... a mi me parece una estafa, pero una estafa legal.

Saludos!

Bueno Aprendiz-Oscuro, no pensaba que el tema de las frecuencias fuese un tema tán polémico como para encontrarlo en el buscador del foro, aunque llevas razón.

Saludos!

Que bien,
Gracias Simorg.

Aquí tuve que editar tus dos comentarios: http://foro.elhacker.net/scripting/ayuda_como_ocultar_con_asterisco_caracteres-t378522.0.html;msg1809805#msg1809805


Considera este como el último aviso, ya no habrán más.

PD: Gracias por compartir, pero porfavor, sigue las normas.

Saludos!

En la página que te he indicado tienes ejemplos de uso para el protocolo FTP...



saludos.

Gracias por contestar a todas las preguntas Aprendiz-Oscuro,

EDITO: Vale, acabo de ver tu edición, ahora si que lo tengo claro, gracias de nuevo aprendiz oscuro!

(mirate la edición que hice mientras escribias tu post)

Estas son las especificaciones de mi motherboard en la página oficial de ASUS:

- Support AMD Socket AM2+/AM2 CPU
- AMD Live™Ready!
- NVIDIA nForce 570 SLI Technology
- Advanced Thermal Design: Heat-pipe Thermal solution
- Dual channel DDR2 800
- ASUS Crystal Sound:
ASUS Array Mic
Noise Filter

No la quiero cagar, así que pregunto...
- Dual channel DDR2 800

Imagino que con eso se refiere a las tarjetas, es decir, máximo DDR2, pero y el 800? es la frecuencia máxima soportada?

---

Pues no, me refería a los slots, como podría haberme referido a las tarjetas, viene a ser lo mismo el módulo, que donde se inserta el módulo...
Que susceptible te he pillado hoy xD

¿Saben si en España o en alguna tienda online venden ya discos de 5-6 TB, y por menos de 200 €?

He buscado en PC Green y en APP Informática pero lo máximo que he visto son 4 TB (Sí, necesito los 5 TB xD).

Y si todavía no existen para el consumidor "ordinario"... ¿cuanto tiempo le echan para que salgan al mercado a precio razonable?

Saludos.