Įrašų rūšiavimas pagal didžiąsias

Pastaba: Norėtume jums kuo greičiau pateikti naujausią žinyno turinį jūsų kalba. Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Gal galite šio puslapio apačioje mums pranešti, ar informacija buvo naudinga? Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip patogia nuoroda.

Microsoft Office Access 2007 rūšiuoja įrašus didėjimo arba mažėjimo tvarka, neatsižvelgdami į atveju. Tačiau rašydami Visual Basic for Applications (VBA) kodas kelias eilutes, galite rūšiuoti tekstą pagal jo ASCII simbolių reikšmes. Rūšiavimas pagal ASCII reikšmes išskiria didžiąsias raides mažosiomis raidėmis ir rezultatų didžiųjų ir mažųjų raidžių tvarka.

Šioje lentelėje parodyta, kaip rūšiuoti didėjimo tvarka programoje "Access" skiriasi nuo didžiųjų ir mažųjų raidžių rūšiavimo tvarką:

Iš anksto rūšiavimo tvarką

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 rezultatai stulpelyje didėjimo tvarka, iš pradžių gali pasirodyti nenuspėjami, jie negali. Stulpelyje didėjimo tvarka "a" rodomas prieš "A" ir "B" iki "b". Taip atsitinka dėl to, vertinant kaip tekstines reikšmes, "A" = "a" ir "B" = "b" ar didžiųjų ir mažųjų raidžių. Prieigos atsižvelgia į pradinį reikšmių tvarką. Stulpelį prieš rūšiavimo tvarką, "a" už "A" ir "B" už "b".

Kai didžiųjų ir mažųjų raidžių rūšiavimą, teksto reikšmės yra pakeičiami jų ASCII reikšmių. Pvz., A = 65; a = 97, B = 66, b = 98 ir pan.

Rašyti VBA kodą

  1. Sukurkite VBA modulį ir įrašykite šią eilutę sekcijoje aprašai, jei jis jau yra:

Option Explicit

  1. Įveskite toliau nurodytą procedūrą modulyje "Visual Basic" rengyklės:

    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

    Ankstesnio vartotojo apibrėžta funkcija, StrToHex galima iškviesti iš užklausos. Kai atliksite rūšiavimo lauko pavadinimą į šią funkciją, rūšiuoti laukų reikšmes, kad Didžiosios ir mažosios raidės.

  2. Dabar sukurkite užklausą, iš kurių paprastai skambina š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 įtraukti.

  4. Vilkite laukus, kuriuos norite į 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 didžiųjų ir mažųjų raidžių reikšmės lauko pavadinimas.

  6. Langelyje Rūšiuoti spustelėkite didėjimo tvarka arba mažėjimo tvarka.

    Pasirinkus didėjimo tvarka, reikšmė didžiosiomis raidėmis prasidedantys pasirodys prieš tuos, kurie prasideda mažosios raidės. Taikant mažėjimo tvarka rūšiavimo ar atvirkščiai.

  7. Perjungti į duomenų lapo rodinį.

    Programa Access rodo įrašus, didžiųjų ir mažųjų raidžių tvarka.

Puslapio viršus

Tobulinkite savo „Office“ į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ų.

×