Eliminar Caracter " En Una Cadena En Visual Basic

Agnostyc · #1 30-07-2008, 09:51

hola...

tengo el siguiente problema..
por ejemplo tengo esta cadena en una variable llamada cadena

MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2" DN 40

lo que quiero es eliminar el caracater "
y quede asi la cadena

MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2 DN 40

pero los ejemplos que e pillado no me sirven porque el caracter " lo detecta como final de linea o algo asi,e buscado varios ejemplos pero en todos me pasa lo mismo...

alguna idea para solucionar esto?

Migra666 · #2 30-07-2008, 10:36

como Cadena es de tipo string esa doble comilla la reconoce como si fuera el fin de la asignacion que le estas dando Cadena por eso no puedes asignar toda esa linea de texto. no soy experto en visual pero lo unico que se me ocurre es que le asignes en tiempo de ejecucion esa linea de texto a una caja de texto. sorry por la poca ayuda.

fernaxhack · #3 30-07-2008, 17:30

en un codigo visual basic con un boton en un form seria este:

Private Sub Command1_Click()
Dim cadena As String
Dim c As Integer
cadena = "MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2"" DN 40"
c = Len(cadena)
For cont = 1 To c
aux = Mid(cadena, cont, 1)
If aux = """" Then
cadena = "MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2 DN 40"
Exit For
End If
Next cont
MsgBox cadena
End Sub

primero asigne a la variable cadena la frase que tu quieres y si te das cuenta lo ise con dos comillas "" ya que es la forma en que visual basic considera las comillas en una cadena...

luego en el IF me dice que si encuentra el caracter " entonces me elimina las comillas de la cadena

pruebalo y si te resulta presiona el boton "se agradece"

FaLc0n · #4 31-07-2008, 06:06

Originalmente publicado por fernaxhack

en un codigo visual basic con un boton en un form seria este:

Private Sub Command1_Click()
Dim cadena As String
Dim c As Integer
cadena = "MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2"" DN 40"
c = Len(cadena)
For cont = 1 To c
aux = Mid(cadena, cont, 1)
If aux = """" Then
cadena = "MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2 DN 40"
Exit For
End If
Next cont
MsgBox cadena
End Sub

primero asigne a la variable cadena la frase que tu quieres y si te das cuenta lo ise con dos comillas "" ya que es la forma en que visual basic considera las comillas en una cadena...

luego en el IF me dice que si encuentra el caracter " entonces me elimina las comillas de la cadena

pruebalo y si te resulta presiona el boton "se agradece"

quedo piola la lógica..
y por lo que véo, sirve..
me da paja probarlo, pero que buena la idea..
ojala le funcione a loquito..
saludos

fernaxhack · #5 31-07-2008, 20:58

pero el lokillo ni responde... afirmando si le resulto....

uno ayuda solo con el interes de un agradecimiento

LOL!

Ribosoma · #6 02-08-2008, 12:36

a.replace(chr(34),"")

VB .Net

oken · #7 04-08-2008, 17:18

responde por aweonao

NTBK · #8 08-08-2008, 12:26

Originalmente publicado por Ribosoma

a.replace(chr(34),"")

VB .Net

Me sumo.... ademas en VB6 tbn existe el replace.... Ctrl+F1 y pongale con la ayuda...

Agnostyc · #9 12-08-2008, 16:51

vale..solucione el problema...gracias

la parte del If aux = """" Then eso no pesca por lo de k el caracter lo considera como fin de linea..

ademas esas lineas eran de ejemplo ya k las toy sacando de un archivo de texto donde vienen varias lineas..pero ya lo solucione...gracias por el interes

aps y vale...ahi le puse su agredece

Originalmente publicado por fernaxhack

pero el lokillo ni responde... afirmando si le resulto....

uno ayuda solo con el interes de un agradecimiento

LOL!

fernaxhack · #10 12-08-2008, 21:47

Originalmente publicado por Agnostyc

vale..solucione el problema...gracias

la parte del If aux = """" Then eso no pesca por lo de k el caracter lo considera como fin de linea..

ademas esas lineas eran de ejemplo ya k las toy sacando de un archivo de texto donde vienen varias lineas..pero ya lo solucione...gracias por el interes

aps y vale...ahi le puse su agredece

lo compilaste para comprobar si te resultaba??

pues te digo que si resultaba ya que ese ejemplo que te di lo compile en el vb6 y resulto muy bien.

pero ahora podrias decirnos de que otra manera lo resolviste... seria interesante saber

Xipnet · #11 31-08-2008, 17:32

Originalmente publicado por fernaxhack

en un codigo visual basic con un boton en un form seria este:

Private Sub Command1_Click()
Dim cadena As String
Dim c As Integer
cadena = "MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2"" DN 40"
c = Len(cadena)
For cont = 1 To c
aux = Mid(cadena, cont, 1)
If aux = """" Then
cadena = "MEDIDOR A DIAFRAGMA G-10 TIPO 2, CUERPO ACERO CONEXIàN 2 DN 40"
Exit For
End If
Next cont
MsgBox cadena
End Sub

primero asigne a la variable cadena la frase que tu quieres y si te das cuenta lo ise con dos comillas "" ya que es la forma en que visual basic considera las comillas en una cadena...

luego en el IF me dice que si encuentra el caracter " entonces me elimina las comillas de la cadena

pruebalo y si te resulta presiona el boton "se agradece"

Andate caurito!! me tinca que para el T-SQL eres seco para los cursores!!

Creo que toda solucion necesita un poco mas de analisis y la maldita tecnica de la variable auxiliar creo que deberias dejarla de lado.

Originalmente publicado por Ribosoma

a.replace(chr(34),"")

VB .Net

Concuerdo con esta por el momento

Existe una funciòn instr(s string), el cual busca un caracter en una cadena, con eso te evitas el for. Ahora la gracia de esta funcion que tambien se puede ocupar como un case

, eso si este consejo se los dejo a su propio riesgo.

No estoy en mi pc, ahi podria estar mas inspirado.

Saludos.