| 
	
		|  Autor | Tema: Como sacar el ultimo caracter de una variable  (Leído 6,243 veces) |  
	| 
			| 
					
						| Edu 
								       
								
								 Desconectado 
								Mensajes: 1.082
								
								 
								Ex XXX-ZERO-XXX
								
								
								
								
								
								   | 
 
Eso mismo, como saco el ultimo caracter de una variable?por ejemplo la variable equivale a "elhackerg" y quiero q quede "elhacker", es con eso de righ$ y left$ o mid$, pero la verdad no puedo hacerlo a ver qien me ayuda..
 
 
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Karcrack 
								       
								
								 Desconectado 
								Mensajes: 2.416
								
								 
								Se siente observado ¬¬'
								
								
								
								
								
								   | 
 
Te recomiendo que te mires algun tuto basico sobre manejo de cadenas... Hay varias formas, mira:     Dim sText       As String     sText = "elhackerg"     MsgBox Left$(sText, Len(sText) - 1)    MsgBox Mid$(sText, 1, Len(sText) - 1)
 Saludos  
 
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Edu 
								       
								
								 Desconectado 
								Mensajes: 1.082
								
								 
								Ex XXX-ZERO-XXX
								
								
								
								
								
								   | 
 
Sabes q me da error.. esque acuerdate de ni nombre y cuando vayas a contestarme algo pensalo 2 veces a ver si no me habre complicado las cosas yo xD esque mi code es asi: Option ExplicitDim FF As IntegerDim variable As String, texto As String  Private Sub Command1_Click()FF = FreeFileOpen App.Path & "/hosts.txt" For Input As #FF Do Line Input #FF, variable texto = Left$(variable, Len(variable) - 1) Text1.Text = Text1.Text & vbCrLf & texto Loop While EOF(FF) = False   End Sub 
 Q hago mal? me da error eso asi.. |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Karcrack 
								       
								
								 Desconectado 
								Mensajes: 2.416
								
								 
								Se siente observado ¬¬'
								
								
								
								
								
								   | 
 
Me funciona perfectamente... Private Sub Command1_Click()Dim variable    As String
 Dim texto       As String
 
 Open App.Path & "\hosts.txt" For Input As #1
 Do
 Line Input #1, variable
 texto = Left$(variable, Len(variable) - 1)
 Text1.Text = Text1.Text & vbCrLf & texto
 Loop While Not EOF(1)
 Close #1
 End Sub
Unos consejos: -A no ser que necesites acceder a las variables desde otras funciones es una buena costumbre añadirlas dentro del procedimiento donde las usas. -Identa tus codigos. Un saludo   |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Edu 
								       
								
								 Desconectado 
								Mensajes: 1.082
								
								 
								Ex XXX-ZERO-XXX
								
								
								
								
								
								   | 
 
Copie y pegue tu codigo y asi tampoco me anda.. me salta error de q esta mal la llamada al procedimiento o funcion, por lo de left$, esa linea me sale erronea, pero dices q a vs te anduvo perfectamente.. ahora prueba con un .txt q tenga mas de 1 linea a ver q pasa.. |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Karcrack 
								       
								
								 Desconectado 
								Mensajes: 2.416
								
								 
								Se siente observado ¬¬'
								
								
								
								
								
								   | 
 
Copie y pegue tu codigo y asi tampoco me anda.. me salta error de q esta mal la llamada al procedimiento o funcion, por lo de left$, esa linea me sale erronea, pero dices q a vs te anduvo perfectamente.. ahora prueba con un .txt q tenga mas de 1 linea a ver q pasa..
 Lo probe con el fichero "C:\boot.ini" que tiene mas de una linea... Prueba a reiniciar el VB a ver... a mi hace tiempo me saltaban errores en algunas funciones propias... si no prueba a reemplazar Left$()  por Left()  |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Edu 
								       
								
								 Desconectado 
								Mensajes: 1.082
								
								 
								Ex XXX-ZERO-XXX
								
								
								
								
								
								   | 
 
Ya me di cuenta, lo q pasa es q yo probe lo de righ$ y eso, algo se de vb6 solo q hace poco aprendi todo, pero el problema era q el hosts.txt tenia 100 lineas vacias al principio y entonces la variable seria 0 y con el len(variable) - 1 quedaria -1 xD
 Ahora eso como solucionarlo no lo se pero voy a probar, de seguro me sale, gracias por los consejos y por ayudarme karcrack
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| BlackZeroX 
								Wiki  Desconectado 
								Mensajes: 3.158
								
								 
								I'Love...!¡.
								
								
								
								
								
								     | 
 
No vi Right$()  asi que lo pongo!¡.  Private Sub Form_Load()Const TmpStr$ = "Hola, Veronica?"    MsgBox Right$(TmpStr$, 1)End Sub  
 Dulces Lunas!¡. |  
						| 
								|  |  
								|  |  En línea | 
 
 The Dark Shadow is my passion. |  |  |  | 
			| 
					
						| Edu 
								       
								
								 Desconectado 
								Mensajes: 1.082
								
								 
								Ex XXX-ZERO-XXX
								
								
								
								
								
								   | 
 
No es lo q pedia pero gracias igual, yo ya se usar esos comandos solo q me daban error porq el .txt tenia lineas sin nada, en blanco, y entonces puse solo un if variable <> "" then.. y me arregle por ahi xD
 Voy a cerrar el tema mejor, gracias a todos
 
 pd: Si pudiera cerrarlo.. xD
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  |  |  
 
	
 
 
				
					
						| Mensajes similares |  
						|  | Asunto | Iniciado por | Respuestas | Vistas | Último mensaje |  
						|   |   | duda al introducir un caracter en una variable entera Dudas Generales
 | Norochii | 1 | 3,678 |  19 Octubre 2011, 20:07 pm por $Edu$
 |  
						|   |   | Como sacar el ultimo registro por fecha de una mysql query que retorna varios? PHP
 | Graphixx | 1 | 9,649 |  25 Marzo 2013, 15:09 pm por apilarte04
 |  
						|   |   | me come el ultimo caracter de la primer cadena Programación C/C++
 | basuel | 2 | 2,803 |  19 Octubre 2012, 01:08 am por rir3760
 |  
						|   |   | cómo comparar una variable caracter con un código ascii en C
							« 1 2 » Programación C/C++
 | etcheverrypablol | 12 | 26,724 |  5 Febrero 2016, 11:57 am por etcheverrypablol
 |  
						|   |   | Introducir un caracter como variable. Programación C/C++
 | skullmang | 0 | 1,928 |  7 Octubre 2018, 18:50 pm por skullmang
 |    |