Kirjete sortimine tõstutundlikkuse alusel

Märkus.: Soovime pakkuda teie keeles kõige ajakohasemat spikrisisu niipea kui võimalik. See leht on tõlgitud automaatselt ja sellel võib leiduda grammatikavigu või ebatäpsusi. Tahame, et sellest sisust oleks teile abi. Palun märkige selle lehe allservas, kas sellest teabest oli teile kasu või mitte. Soovi korral saab ingliskeelset artiklit lugeda siit.

Microsoft Office Access 2007 sordib kirjed tõusvas või laskuvas järjestuses, arvestamata juhul. Siiski, kirjutades paar rida Visual Basic for Applications (VBA) kood, saate sortida teksti ASCII-märkide väärtuste. ASCII-väärtuste alusel sortimine eristab suurtäht väiketähti ja tulemuste tõstutundlikkuse alusel.

Järgnevas tabelis on näidatud, kuidas Accessi tõusvas järjestuses sortimine järjestuses erineb tõstutundlik sortimisjärjestus:

Sortimata järjestus

Tõusvas järjestuses

Tõstutundlik orde r

c

a

A

D

A

B

a

B

C

d

b

D

B

c

a

C

C

b

A

D

c

b

d

d

Kuigi Tõusev järjestus veeru tulemid võidakse kuvada esmalt veidi ettearvamatuid, ei ole. Veerus Tõusev järjestus, "a" kuvatakse enne "A" ja "B" kuvatakse enne "b". Selle põhjuseks on asjaolu, kui hinnatud tekstiväärtustena, "A" = "a" ja "B" = "b", väiketähtedeks või suurtähtedeks. Accessi arvestab algse järjestuse väärtused. Eelse sortimisjärjestuse veerus "a" eelneb "A" ja "B" eelneb "b".

Kui on sortida tõstutundlikult tehe, siis tekstiväärtusi on asendatud nende ASCII väärtusi. Näiteks A = 65; on = 97, B = 66, b = 98 jne.

VBA-koodi kirjutamine

  1. VBA-moodulis loomine ja tippige järgmine rida deklaratsioonijaotis, kui see pole juba olemas.

Konkreetsete suvand

  1. Tippige moodulis Visual Basic Editoris järgmist:

    Function StrToHex (S As Variant) As Variant
    '
    ' Converts a string to a series of hexadecimal digits.
    ' For example, StrToHex(Chr(9) & "A~") returns 09417E.
    '
    Dim Temp As String, I As Integer
    If VarType(S) <> 8 Then
    StrToHex = S
    Else
    Temp = ""
    For I = 1 To Len(S)
    Temp = Temp & Format(Hex(Asc(Mid(S, I, 1))), "00")
    Next I
    StrToHex = Temp
    End If
    End Function

    Eelmise kasutaja määratletud funktsiooni StrToHex saab helistada päringu. Kui te kaotate selle funktsiooni sortimine välja nime, selle sortimine tõstutundlikkuse alusel välja väärtused.

  2. Nüüd looge päringu, kust te selle funktsiooni helistada.

    Klõpsake menüü Loo jaotises Muu nuppu Päringukujundus.

  3. Dialoogiboksis Tabeli kuvamine tabelit, mida soovite sortida, klõpsake käsku Lisa.

  4. Lohistage soovitud väljad ruudustikku.

  5. Tippige esimese tühja veeru reale väliAvaldis1: StrToHex([SortField]).

    StrToHex on varem loodud kasutaja määratletud funktsioon. SortField on tõstutundlikud väärtusi sisaldava välja nimi.

  6. Sortimine lahtri, klõpsake raadionuppu Tõusev järjestus või laskuv järjestus.

    Kui valite tõusvas järjestuses, kuvatakse väärtus algavad sõnadega suurtähed enne mis algavad väiketähti. Rakendades laskuvas järjestuses sortimine ei vastand.

  7. Aktiveerige Andmelehevaade.

    Access kuvab tõstutundlikkuse alusel sorditud kirjed.

Lehe algusse

Täiendage Office'i kasutamise oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×