El fallo lo tienes aquí:

AddHandler document.Body.Click, New HtmlElementEventHandler(AddressOf WebBrowser1_Clicked)

Te vuelvo a citar lo que dije comentarios atrás:


En resumen, pasa el puntero de tu mouse sobre "Body", y lee lo que pone, lee, lee y comprende, y luego lo modificas...

Como te han dicho, ese es el problema.

Al formatear el número se convierte a decimal, y los ceros a la derecha de la coma se eliminan,
Es decir, cuando escribes "2.000", se formatea a "2,000", y eso se representa como un "2" al ser Entero, y eso es lo que sumas, el "2".

¿Verdad que si escribes en los textboxes "2.001" si que te funciona corréctamente?

En fin debes manejar los tipos de números "Double" al sumar ese tipo de números:

TextBox3.Text = FormatNumber(Convert.ToDouble(TextBox1.Text) + Convert.ToDouble(TextBox2.Text), TriState.False) 

PD: Primero debes detectar si el string contiene puntos o comas para manejar el resto de números como "Long" (aka Int64)

Saludos.


EDITO:

No es perfecto, si intentas sumar "2.00" se reconoce como "200", pero bueno, solo es para mostrarte, eso ya lo mejoras tú...

Public Class Form1
 
    Dim num1 As Object
    Dim num2 As Object
 
    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
        If sender.Text.Contains(".") Then _
             num1 = Convert.ToDouble(sender.Text) _
        Else num1 = Convert.ToInt64(sender.Text)
    End Sub
 
    Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
        If sender.Text.Contains(".") Then _
             num2 = Convert.ToDouble(sender.Text) _
        Else num2 = Convert.ToInt64(sender.Text)
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox3.Text = FormatNumber(num1 + num2, TriState.False)
    End Sub
 
End Class
 

No KiLiaN, no voy a tocar los ventiladores más de lo necesario, no soy técnico y la puedo cagar.

...pero tenían ESCASO polvo y lo limpié hace unos días, yo supongo que hace tanto ruido por la calor que hace (por la entrada al verano), el ruido no viene de ahora, sinó de hace unas semanas, y en invierno no hacia casi nada de ruido el PC, por eso supongo que si quiero menos ruido debo hacer algo con los ventiladores (comprar o reemplazar)...pero no sé exáctamente el que, jeje.

Eres de los que se toman las cosas con calma, he? xD

Bienvenido!

Hola,
bueno pues mi PC hace muchísimo ruido y me gustaría saber que necesito comprar para disminuir el ruido de manera considerable.

...Es que no sé si debo centrarme en los ventiladores (añadir más ventiladores o reemplazar los que hay), o en el disipador (reemplazar el disipador).

Además debo decir que el ruido del ventilador no sé percibir exáctamente si se trata del ventilador de la GPU o del CPU... :-/ (Normalmento no gasto la GPU así que pienso que será el de la CPU)

Y en la bios tengo el modo "silencioso" activado, pero silencioso mis cullons... xD

Aquí tienen la info de las temperaturas y otros datos de mi PC por si sirve de algo o ven algo que no esté bien:







Un saludo.

Sí.

Aunque yo declararía el objeto del sender afuera de los Subs, o haria un TryCast dentro de ese Sub que muestras para que pudieras "manejar" y ver fácilmente en el IntelliSense todos los métodos/propiedades del objeto Sender, para que no vayas preguntando mucho sobre eso en el futuro xD.

Dim document As HtmlDocument = TryCast(sender, HtmlDocument)

EDITO:

    Private Sub Document_Clic(ByVal sender As Object, ByVal e As HtmlElementEventArgs)
 
        Dim document As HtmlDocument = TryCast(sender, HtmlDocument)
 
        Select Case document.ActiveElement.TagName.ToLower
            Case "button" : MsgBox("apretaste un button")
            Case "input" : MsgBox("apretaste un input")
            Case Else
        End Select
 
    End Sub

---

Para ser sincero yo creo que NovLucker ya pasa de leer tus post (No me extraña, es que cansa siempre ver lo mismo!) xD

Sobre lo del baneo...se banean a los Trolls, y nosotros (los "implicados") hemos dicho lo que pensamos siempre con respeto, y además es por tu bien, IKillNukes, no gustan la gente que lo pide todo hecho siempre.

¿Por fecha de creación, o por fecha de modificación?

Un ejemplo:

@Echo OFF
 
(for /D %%# in ("*") Do (
	Set "DateTime=%%~t#"
	Call Set "Y=%%DateTime:~6,4%%"
	Call Set "M=%%DateTime:~3,2%%"
	Call Set "D=%%DateTime:~0,2%%"
	Call Echo %%Y%%%%M%%%%D%% %%~f#
))>"%TEMP%\dirs.tmp"
 
For /F "tokens=1,*" %%A  in ('Type "%TEMP%\dirs.tmp" ^| SORT') Do (
	Echo %%B
	REM xcopy "%%B" ...
)
 
Pause&Exit

Saludos!

Le puedes hacer algunas PEQUEÑAS mejoras al code que has mostrado, prueba a usarlo de esta manera:


Saludos!

Con dos cojones IKillNukes, dí que sí...

...


Yo soy amigo de todo el mundo, no voy a odiar a alguien porque pida cosas, ni me vas a caer mal, pero tampoco voy a dejar que se abuse de la bondad de los demás como lo estás haciendo, cada día vas un paso mas lejos pidiendo todo hecho sin escrúpulos, las cosas son como son, incluso tu lo reconoces, no buscas aprender.

El colmo de todo esto según ha comentado SyntaxError es que estuvieras dispuesto a presentar esta aplicación en un concurso (EHN-DEV) (vale, con el consentimiento de los que te hemos hecho todo el código), pero es que es increible, porque si te preguntasen cualquier cosa de tu própia aplicación en el concurso no ibas a saber que decir, porque no sabes lo que hace cada cosa de los códigos.

...con eso último das la impresión de que lo único que buscas es que te lo hagan todo y decir que es tuyo para ganar algo, como te dijo NovLucker en una ocasión, y eso no creo que a nadie le guste, ya lo estás viendo,
pues yo lo siento pero no estoy dispuesto a aportar ese code que necesitas.

Aún así, lee bien IKillNukes, porque te lo he dicho dos veces, aquí tienes lo que necesitas para hacer ese code:


Es muy sencillo de hacer, si se te complica lo único que tienes que hacer es INTENTARLO, y preguntar porque no va y lo que te falta, hacer una pregunta decente macho, y con gusto estoy seguro de que te ayudare(mos) cuando demuestres que intentas codear algo por ti mismo sin usar copy/paste.

No pidas codes hechos, pide ayuda para hacerlos, y te irá mucho mejor. ¿Tán dificil es hacer eso IKillNukes?

Saludos!

Hola XresH


No soy experto en Redes, pero has probado a eliminar la Cookie de esa página después de cada inicio de sesión?

Saludos!