ms-access - separar - funciones en access ejemplos

¿Hay un equivalente a la función SUBSTRING en MS Access SQL?

Question

Quiero hacer algo como esto dentro de una consulta de MS Access, pero SUBSTRING es una función indefinida.

SELECT DISTINCT SUBSTRING(LastName, 1, 1)
FROM Authors;

Answer 1

Creo que hay MID () y quizás IZQUIERDA () y DERECHA () en Access.

Answer 2

He trabajado mucho con msaccess vba. Creo que estás buscando la función MID

ejemplo

    dim myReturn as string
    myreturn = mid("bonjour tout le monde",9,4)

le devolverá el valor "tout"

Answer 3

No pude encontrar un módulo listo para usar que agregara esta función, así que escribí uno:

En Access, vaya a la cinta Herramientas de la base de datos, en el área de Macro haga clic en Visual Basic. En el área superior izquierda del proyecto, haga clic con el botón derecho en el nombre de su archivo y seleccione Insertar -> Módulo. En el módulo pega esto:

Public Function Substring_Index(strWord As String, strDelim As String, intCount As Integer) As String

Substring_Index = delims

start = 0
test = ""

For i = 1 To intCount
    oldstart = start + 1
    start = InStr(oldstart, strWord, strDelim)
    Substring_Index = Mid(strWord, oldstart, start - oldstart)
Next i

End Function

Guarde el módulo como module1 (el valor predeterminado). Ahora puede usar declaraciones como:

SELECT Substring_Index([fieldname],",",2) FROM table

Answer 4

Puede usar las funciones de cadena de VBA (como @oneday cuando señala en los comentarios, no son realmente las funciones de VBA, sino sus equivalentes de las bibliotecas de MS Jet. En cuanto a las firmas de funciones, se llaman y funcionan igual, incluso aunque la presencia real de MS Access no es necesaria para que estén disponibles):

SELECT DISTINCT Left(LastName, 1)
FROM Authors;

SELECT DISTINCT Mid(LastName, 1, 1)
FROM Authors;