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
-
Ustvarjanje modulu VBA in vnesite to vrstico v odsek» Declarations« , če ga še ni na voljo:
Option Explicit
-
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 FunctionPrejš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.
-
Sedaj ustvarite poizvedbo, iz katere bo poklicati to funkcijo.
Na zavihku Ustvari v skupini Drugo kliknite Načrt poizvedbe.
-
V pogovornem oknu Pokaži tabelo kliknite tabelo, ki ga želite razvrstiti, nato pa kliknite Dodaj.
-
Povlecite želena polja v mrežo.
-
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.
-
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.
-
Preklopite v pogled podatkovnega lista.
Access prikaže zapise, razvrščeni po velike in male črke.
