Razvrščanje zapisov po vrstnem redu, ki razlikuje velike in male črke

Opomba: Najnovejšo vsebino pomoči v vašem jeziku vam želimo zagotoviti v najkrajšem možnem času. Ta stran je bila prevedena z avtomatizacijo in lahko vsebuje slovnične napake ali nepravilnosti. Naš namen je, da bi bila vsebina za vas uporabna. Ali nam lahko na dnu te strani sporočite, ali so bile informacije za vas uporabne? Tukaj je angleški članek za preprosto referenco.

Microsoft Office Access 2007 razvrsti zapise v naraščajočem ali padajočem vrstnem redu, neodvisno od primera. Vendar pa s pisanjem nekaj vrstic Visual Basic for Applications (VBA) kodo, lahko razvrstite besedilo po vrednosti znakov ASCII. Razvrščanje na podlagi vrednosti ASCII razlikuje velike črke iz malih črk in rezultati v velike in male črke vrstnem redu.

V spodnji tabeli prikazuje, kako se naraščajoči vrstni red v Accessu razlikuje od vrstnim redom:

Vnaprej vrstni red razvrščanja

Naraščajočem vrstnem redu

Velike in male črke 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

Čeprav rezultati v stolpcu vrstni red naraščajoče se lahko na začetku prikaže nekoliko nepredvidljiv, niso. V stolpcu vrstni red naraščajoče »a« se prikaže pred »A« in »B« se prikaže pred »b« . « To se zgodi, ker, ko je ovrednoten kot besedilne vrednosti, »A« = »a« in »B« = »b« , ali male črke ali velike črke. Dostop do upošteva vrstni red izvirne vrednosti. V stolpcu vrstni red razvrščanja pred »a« predhodnik »A« in »B« pred »b« . «

Ko izvede se postopek razvrščanja velike in male črke, besedilne vrednosti so zamenjane z vrednostmi ASCII. Na primer, A = 65, a = 97, B = 66, b = 98, in tako dalje.

Pisanje kode VBA

  1. Ustvarjanje modulu VBA in vnesite to vrstico v odsek» Declarations« , če ga še ni na voljo:

Option Explicit

  1. V modulu v urejevalniku za Visual Basic vnesite ta postopek:

    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

    Prejšnje uporabniško določenih funkcij, StrToHex, lahko imenuje iz poizvedbe. Ko uspešno ime v polju Razvrsti za to funkcijo, ga razvrstite vrednosti polj v velike in male črke vrstnem redu.

  2. Sedaj ustvarite poizvedbo, iz katere bo poklicati to funkcijo.

    Na zavihku Ustvari v skupini Drugo kliknite Načrt poizvedbe.

  3. V pogovornem oknu Pokaži tabelo kliknite tabelo, ki ga želite razvrstiti, nato pa kliknite Dodaj.

  4. Povlecite želena polja v mrežo.

  5. V prvi prazen stolpec v vrstico polje vnesite Expr1: StrToHex([SortField]).

    StrToHex je uporabniško določena funkcija, ki ste ga predhodno ustvarili. SortField je ime polja, ki vsebuje vrednosti, velike in male črke.

  6. V celici Razvrsti kliknite naraščajoče ali padajoče.

    Če se odločite, naraščajoče, vrednost začne z velikimi črkami, bo prikazana pred tiste, ki se začnejo z malimi črkami. Uporaba padajočem vrstnem redu razvrščanja ne nasprotno.

  7. Preklopite v pogled podatkovnega lista.

    Access prikaže zapise, razvrščeni po velike in male črke.

Na vrh strani

Razširite poznavanje Officea
Oglejte si izobraževanje
Prvi dobite nove funkcije
Pridružite se programu Office Insider

Vam je bila informacija v pomoč?

Zahvaljujemo se vam za povratne informacije.

Zahvaljujemo se vam za povratne informacije. Videti je, da bi vam prišla prav pomoč enega od naših Officeovih agentov za podporo.

×