Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Temas - Braayhaan

#46
Bueno NickZ es un Programa que hice en Vb.Net como en 5 Minutos ;D y como me gusto mucho el resultado bueno pues quiero compartirlo con ustedes, espero les guste  :xD

-------UPDATE-------
Le puse un boton de Guardar, al dar click en guardar el texto escrito se guarda en un Archivo de Texto que se crea en el escritorio.

Al dar click a los iconos naranjas se Copian al textbox1



Descargar

CODIGO

Código (vb) [Seleccionar]
Public Class Form1

   Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
       TextBox1.Paste("(·|·)")
   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If TextBox1.Text = "" Then
           MsgBox("No se puede Generar si el cuadro esta Vacio")
           Return
       End If
       MsgBox(TextBox1.Text)
   End Sub

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       If TextBox1.Text = "" Then
           MsgBox("El cuadro esta Vacio")
           Return
       End If
       TextBox1.SelectAll()
       TextBox1.Copy()
       MsgBox("El Texto se Copio al Clipboard")
   End Sub

   Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
       TextBox1.Paste("~~")
   End Sub

   Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click
       TextBox1.Paste("/*\")
   End Sub

   Private Sub Label4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label4.Click
       TextBox1.Paste("(-_-)")
   End Sub

   Private Sub Label5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label5.Click
       TextBox1.Paste("O.o")
   End Sub

   Private Sub Label6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label6.Click
       TextBox1.Paste("^_^")
   End Sub

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       If TextBox1.Text = "" Then
           MsgBox("No hay nada que Borrar")
           Return
       End If
       TextBox1.Clear()
   End Sub

   Private Sub Label7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label7.Click
       Timer1.Start()
   End Sub

   Private Sub Label8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label8.Click
       WindowState = 1
   End Sub


   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Static i As Double = 1.0
       i -= 0.08
       Me.Opacity = i
       'si el formulario es ya invisible
       If Me.Opacity = 0 Then
           'detener el temporizador
           CType(sender, Timer).Stop()
           'cerrar el formulario
           Me.Close()
       End If
   End Sub
End Class

#47
.NET (C#, VB.NET, ASP) / Pequeña Gran Duda
20 Agosto 2009, 04:23 AM
Bueno pues eso del titulo tengo una Duda o mas Bien es algo que no se como hacerlo.

Tengo una Aplicacion Creada en VB2008 y Quiero que la aplicacion al darle a un Boton esa se Minimize en los iconos donde sale la hora del sistema creo que se llama windows tray?

Bueno eso Necesito esto urgente porfavor...

Gracias.
#48
.NET (C#, VB.NET, ASP) / Spammer V1.2
18 Agosto 2009, 06:13 AM
------------------------------------Este ya esta Descontinuado------------------------------------

Esta es la nueva version Actualizada...!!!

http://foro.elhacker.net/net/sigo_actualizando_mis_programas_ahora_el_spammer_v20_renovado_servidor_smtp-t265988.0.html

______________________________________________________________________________________

Buenas a Todos los Users de ElHacker.net, Bueno yo soy nuevo aqui en el foro asi que espero me traten bien xD.

Bueno aqui les Dejo un Pequeño Spammer que Cree yo en El VB.NET

"No me hago Responsable del mal Uso de este Programa"

____________________________________________________________________



------------------------------------ACTUALIZADO------------------------------------

La version 1.2 esta Descontinuada ya, ahora hice la Version Blaze, que Tiene soporte para enviar Adjuntos, y Por fin!!! le puse lo de los Threads, y ya no se tilda y manda correos por montones mas Rapido.

Cambios:
Nueva Interface
SIN PROGRESSBARS
No Carga nada
No se Tilda
Soporta Adjuntos
Soporta cualquier Correo electronico.

Bueno espero les Guste esta Nueva Version les dejo unas Pics y el Link para Descargar.



Descargar

------------------------------------ACTUALIZADO------------------------------------