_hector_

Pues lo que distingo en este momento es que la cantidad que quieres restar, esta entre comillas simples; en realidad todo es una sola cadena. Deberia quedarte asi: Dim da1 As New SqlDataAdapter("UPDATE Producto SET Cantidad = Cantidad -" &...

Si tienes un acceso directo en el escritorio, es posible que tenga una tecla de método abreviado asignada, en este caso NUMERO 6, para verificar esto, revisa las propiedades del acceso directo (click derecho sobre el acceso directo->propiedades),...

Para calcular el área puedes usar una función, usando tus datos quedaría así function areaPoligono(n as integer, L as double) as double dim area as double area=(1/2*n)^2 *L / tan(180/n) areaPoligono=area end function Luego llamarías a la función en...