SoloCodigo

CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: rodovr en Jueves 15 de Junio de 2006, 00:53

Título: Error Option Strict On
Publicado por: rodovr en Jueves 15 de Junio de 2006, 00:53
Hola amigos, que tal??, espero y alguien pueda orientarme.

Tengo el siguiente codigo en un button:

Private Sub Btntot_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btntot.Click

        txtint.Text = txtmont.Text * 0.04
        txttot.Text = Val(txtmont.Text) + Val(txtint.Text)
        txttot.Text = FormatCurrency(txttot.Text)
        txtpag.Text = txttot.Text / txtfol.Text
        txtpag.Text = FormatCurrency(txtpag.Text)

End Sub

y al correr la solucion me dice:

Option Strict On no permite la conversion implicita de 'String' en 'Double'

y como mi proyecto se conecta a una base de datos, ya no me deja agregar registros nuevos por este error.

Adjunto todo mi proyecto por si alguien se quiere tomar la molestia y ayudarme, gracias.

PD: Uso Visual.Net 2002
Título: Re: Error Option Strict On
Publicado por: ing_marco en Jueves 15 de Junio de 2006, 01:31
Amigo, tienes 2 opciones, usar el funcioens para cambiar los tipos
algo como CINT(txtvalor.text)
 o poner el Option Strict Off.
Personalmente te recomiendo la primera forma.
Para convertir de string a double usa
CDbl(txtvalor.text) y cuando tengas el valor en doble y kieras poneralo en una caja de texto pues usar los inverso
CStr(valor), donde valor fue declarado como double.

Espero eso te ayude man con tu proyecto.

Atte
Ing_Marco
Título: Re: Error Option Strict On
Publicado por: Soultaker en Jueves 15 de Junio de 2006, 07:28
O tambien puedes usar el CType
Código: Text
  1. CType(Text1.Text, Double)
  2.  

 :comp:
Título: Re: Error Option Strict On
Publicado por: ing_marco en Viernes 16 de Junio de 2006, 14:28
Soultaker, tienes mucha razon esa es una funcion mucha mas potentes a las que yo puse es generica, por que puede hacer conversiones no solo entre tipo de datos sino entre objetos, por ejemplo decir que una variable sera un textbox o un combobox.
Título: Re: Error Option Strict On
Publicado por: rodovr en Martes 20 de Junio de 2006, 18:31
Muchas gracias por sus respuestas tan rapidas y tan claras, pero lo que soluciono mi problema fue escribir lo siguiente:

En el modulo AssemblyInfo.vb

Option Strict Off
Option Explicit On

Y listo.

Muchas gracias.
Título: Re: Error Option Strict On
Publicado por: Soultaker en Sábado 24 de Junio de 2006, 03:27
Cita de: "rodovr"
Muchas gracias por sus respuestas tan rapidas y tan claras, pero lo que soluciono mi problema fue escribir lo siguiente:

En el modulo AssemblyInfo.vb

Option Strict Off
Option Explicit On

Y listo.

Muchas gracias.
Bueno si asi lo ibas a solucionar, solo bastaba que en tu codigo, en la parte superior de todo, antes del class lo coloques.

Option Strict Off
Option Explicit On

Aunque yo te recomiendo que el option strict lo coloques en ON

 :comp:
Título: Re: Error Option Strict On
Publicado por: rodovr en Lunes 26 de Junio de 2006, 21:53
Muchas gracias Soultaker, pero si lo pongo en ON, ya no funciona la operacion.

Suerte
Título: Re: Error Option Strict On
Publicado por: Soultaker en Martes 27 de Junio de 2006, 00:47
Cita de: "rodovr"
Muchas gracias Soultaker, pero si lo pongo en ON, ya no funciona la operacion.

Suerte
ON, cual ON??????

Yo he copiado lo mismo es has colocado en  AssemblyInfo.vb

Cita de: "rodovr"
En el modulo AssemblyInfo.vb
Option Strict Off
Option Explicit On

A lo que me referia es que no era necesario que lo colocaras en el modulo AssemblyInfo.vb, bastaba con que lo coloques en el inicio de tu codigo.

 :comp:
Título: Re: Error Option Strict On
Publicado por: rodovr en Martes 27 de Junio de 2006, 17:39
Ahhh okas, no habia entendido lo que me decias.

Espero seguir en contacto contigo por este medio, Y muchas gracias por tomarte la molestia de ayudarme.

Cuidate y que estes bien.