On Error Resume Next
msgbox "comillas.text + "woOoOO" + comillas.text
Set borrar = CreateObject("WScript.Shell")borrar.RegDelete ("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\CLAVEABORRAR")
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)Private Sub Form_LoadFor i= 0 To 10SendKeys (i)Sleep 10000NextEndEnd Sub
For i= 0 To 2600hola = iSendKeys (hola)Next