Trucos de Visual Basic 6
5087
post-template-default,single,single-post,postid-5087,single-format-standard,ajax_fade,page_not_loaded,,vertical_menu_enabled,qode-title-hidden,side_area_uncovered_from_content,qode-theme-ver-11.0,qode-theme-bridge,wpb-js-composer js-comp-ver-5.0.1,vc_responsive

Trucos de Visual Basic 6

microsoft-visual-basicUna par tips para VB 6 y Microsoft Access que pueden ser de utilidad:

Como saber la extensión de un archivo

Esta instrucción tiene en cuenta que en el nombre del archivo pueda haber mas de un punto y que la extensión pueda ser un numero variable de caracteres. Se facilita en formato de Function pero puede ser convertida a una sola instrucción

Function ExtensionArchivo(Archivo As String, Optional Caracter As String = ".") As String
' Con \ devuelve el nombre del archivo completo
On Error Resume Next
ExtensionArchivo = Right(Archivo, Len(Archivo) - InStrRev(Archivo, Caracter))
End Function

Como entrar en un TextBox de Access y que se ponga al final del campo sin seleccionar todo el texto

nombreCampo.SelLength = 0
nombreCampo.SelStart = Len(descripcion_episodio)<span style="font-size: 13px; line-height: 19px;">

Cómo saber el ID de un autonumérico recién creado

Si creamos un nuevo registro en una tabla cuyo índice es un campo autonumérico es posible que necesitemos saber la ID del registro recien creado. Para ello podemos utilizar las siguientes instrucciones:

' Como obtener el último valor autonumérico de una clave
rst.Move 0, rst.LastModified
lngID = rst!ID

Cómo eliminar el último carácter de una cadena

Eliminar el último carácter de una cadena.

dim Texto as string
Texto = "Hola1"
Texto = Left(Texto, Len(Texto) - 1)
1 Star2 Stars3 Stars4 Stars5 Stars (1 votes, average: 5,00 out of 5)
Cargando…
Tags:
No Comments

Deja un comentario

Uso de cookies

Este sitio web utiliza cookies para que usted tenga la mejor experiencia de usuario. Si continúa navegando está dando su consentimiento para la aceptación de las mencionadas cookies y la aceptación de nuestra política de cookies, pinche el enlace para mayor información.plugin cookies

ACEPTAR
Aviso de cookies