Įrašų rūšiavimas skiriant didžiąsias ir mažąsias raides

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Microsoft Office Access 2007 rūšiuoja įrašus didėjimo arba mažėjimo tvarka, nepaisydama didžiųjų ir mažųjų raidžių. Tačiau parašę kelias Visual Basic for Applications (VBA) kodo eilutes, galite rūšiuoti tekstą pagal jo ASCII simbolių reikšmes. Jei rūšiuojama pagal ASCII reikšmes, skiriamos didžiosios ir mažosios raidės, t. y. naudojama tvarka, skirianti didžiąsias ir mažąsias raides.

Šioje lentelėje parodyta, kuo programos Access didėjanti rūšiavimo tvarka skiriasi nuo rūšiavimo tvarkos, skiriančios didžiąsias ir mažąsias raides:

Tvarka iki rūšiavimo

Didėjimo tvarka

Didžiųjų ir mažųjų raidžių 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

Nors stulpelio Didėjimo tvarka rezultatai iš pirmo žvilgsnio gali pasirodyti nenuspėjami, jie tokie nėra. Stulpelyje Didėjimo tvarka „a“ rodoma prieš „A“, o „B“ – prieš „b“. Taip yra todėl, kad įvertinus raides kaip tekstines reikšmes, „A“ = „a“ ir „B“ = „b“, nepaisant didžiųjų ir mažųjų raidžių. Programa Access atsižvelgia į pirminę reikšmių tvarką. Stulpelyje Tvarka iki rūšiavimo „a“ yra prieš „A“, „b“ prieš „B“.

Kai atliekamas rūšiavimas paisant didžiųjų ir mažųjų raidžių, teksto reikšmės pakeičiamos ASCII reikšmėmis. Pvz., A = 65, a = 97, B = 66, b = 98 ir t. t.

VBA kodo rašymas

  1. Sukurkite VBA modulį ir įrašykite šią eilutę sekcijoje Aprašai, jei jos nėra:

Option Explicit

  1. Naudodami programą Visual Basic rengyklę, modulyje įrašykite šią procedūrą:

    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

    Ankstesnę vartotojo nustatytą funkciją StrToHex galima iškviesti iš užklausos. Kai perduodate šiai funkcijai rūšiavimo lauko pavadinimą, ji surūšiuos reikšmes tvarka, skiriančia didžiąsias ir mažąsias raides.

  2. Dabar sukurkite užklausą, iš kurios kviesite šią funkciją.

    Skirtuko Kūrimas grupėje Kita spustelėkite Užklausos dizainas.

  3. Dialogo lange Lentelės rodymas spustelėkite lentelę, kurią norite rūšiuoti, tada spustelėkite Pridėti.

  4. Nuvilkite norimus laukus į tinklelį.

  5. Pirmo tuščio stulpelio eilutėje laukas įveskite Išraiška1: StrToHex()[Rūšiavimo_laukas]).

    StrToHex yra jūsų anksčiau sukurta vartotojo nustatyta funkcija. Rūšiavimo_laukas yra lauko pavadinimas, kuriame yra reikšmių, skiriančių didžiąsias ir mažąsias raides.

  6. Langelyje Rūšiuoti spustelėkite Didėjimo tvarka arba Mažėjimo tvarka.

    Jei pasirenkate didėjimo tvarką, reikšmės, kurių pradžioje yra didžiosios raidės, bus rodomos prieš reikšmes, kurių pradžioje yra mažosios raidės. Jei rūšiuojama mažėjimo tvarka, reikšmės išdėstomos atvirkščiai.

  7. Įjunkite duomenų lapo rodinį.

    Programoje Access rodomi įrašai, surūšiuoti skiriant didžiąsias ir mažąsias raides.

Puslapio viršus

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×