Mensajes

No entiendo...

La version del programa es 2008

Visual Studio 2008_?

Si es un archivo de vb 6.0, y no puedes ver el form, debe ser porque no tienes el proyecto guardado.

[Karcrack]

PD: Me ha quedado tipo anuncion no? jaja

Si 

Karcrack tu eres avanzado en VB.

¿Por qué es diferente?

Código (vb) [Seleccionar] Expandir

dim num as single
dim num2 as single
num=val(text1.text) ' Devuelve el numero con decimales
num2=val(label1.caption) ' Devuelve la parte entera

En el caso anterior se puede hacer que devuelva el número en sí?

Código (vb) [Seleccionar] Expandir

dim num as single
dim num2 as single
num=val(text1.text) ' Devuelve el numero con decimales
num2=label1.caption ' Devuelve el numero con decimales

Que raro...

MSDN:

The Caption property is a string expression that can contain up to 2,048 characters.

De nada.
La función  val, devuelve el valor numérico de un string. Me imaginaría que la propiedad .caption en los labels no serán un string.
Ya investigaré mas del tema.

Mmmm creo que entiendo...

mira

Código (vb) [Seleccionar] Expandir

dim num as single
num=label1.caption

Fijate si te funciona así

Mira esto funciona correctamente...

Código (vb) [Seleccionar] Expandir

Dim num1 As Single
Dim num2 As Single
Dim res As Single

Private Sub Command1_Click()
num1 = Val(Text1.Text)
num2 = Val(Text2.Text)
If num2 <> 0 Then
    res = num1 / num2
Else
    MsgBox "Division por cero"
End If
Text3.Text = res
End Sub

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub

La variable Nb que tipo es?

https://foro.elhacker.net/programacion_vb/pulsando_teclas_con_visual_basic-t257211.0.html

Exacto...
Mmm... BlackZeroX... no utilizo muy seguido vb... pero existen los castings?

¿Qué pasa si le pones double a ambas?