Әріптердің үлкен-кішілігін ескеріп жазбаларды сұрыптау

Microsoft Office Access 2007 бағдарламасы жазбаларды артуы немесе кемуі бойынша сұрыптайды және әріптердің үлкен-кішілігін ескермейді. Әйткенмен, Visual Basic for Applications (VBA) бағдарламалау жолдарын жазу арқылы, мәтінді ASCII таңбаларының мәндері бойынша сұрыптауға болады. ASCII таңбаларының мәндеріне негізделген сұрыптау кіші әріптерді бас әріптерден айырады, және соның нәтижесінде жазбалар әріптердің үлкен-кішілігі бойынша сұрыпталады.

Келесі кесте Access бағдарламасында артуы бойынша сұрыптау тәртібі әріптердің үлкен-кішілігі бойынша сұрыптау тәртібінен қалай ажыратылатынын бейнелеп көрсетеді:

Алдын ала сұрыптау тәртібі

Артуы бойынша

Әріптердің үлкен-кішілігі бойынша

c

a

A

D

A

B

a

B

C

d

b

D

B

c

a

C

C

b

A

D

c

b

d

d

«Артуы бойынша сұрыптау» бағанындағы нәтижелер басында бірдеме жорамалсыз болып көрінуі мүмкін болса да, іс жүзінде бұл солай емес. «Артуы бойынша сұрыптау» бағанында «а» таңбасы «А» таңбасынан бұрын шығады, ал «B» таңбасы «b» таңбасынан бұрын шығады. Бұның себебі - мәтіндік мәндер ретінде бағаланған кезде «А» = «а» және «B» = «b», олар кіші не бас әріптер болса да. Access бағдарламасы есепке мәндердің бастапқы тәртібін алады. «Алдын ала сұрыптау тәртібі» бағанында «а» таңбасы «А» таңбасынан бұрын келеді және «B» таңбасы «b» таңбасынан бұрын келеді.

Әріптердің үлкен-кішілігі бойынша сұрыптау әрекеті орындалған соң, мәтіндік мәндер өзінің ASCII мәндеріне ауыстырылады. Мысалы, A = 65, a = 97, B = 66, b = 98, және т.б.

VBA кодын жазу

  1. VBA модулін жасаңыз және келесі жолын баяндамалар бөлімінде теріңіз, егер ол онда жоқ болса:

Option Explicit

  1. Келесі іс рәсімін Visual Basic өңдеушісі ішіндегі модуліне теріңіз:

    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

    Пайдаланушы тарапынан алдын ала анықталатын функция, StrToHex, сұраудан шақырылуы мүмкін. Сұрыптау өрісінің атауын осы функцияға өткізгенде ол өрістің мәндерін әріптердің үлкен-кішілігі бойынша сұрыптайды.

  2. Ендігі кезде осы функцияны шақыратын сұрауды жасаңыз.

    жасау қойындысының Басқа тобында Сұрау жасақтамасы түймешігін нұқыңыз.

  3. Кестені көрсету тілқатысу терезесінде сұрыптағыңыз келетін кестені нұқыңыз да, Қосу түймешігін басыңыз.

  4. Қалаған өрістерді торға сүйреп апарыңыз.

  5. Бірінші таза бағанның Өріс жолында Expr1: StrToHex([Өрістерді сұрыптау ]) дегенін теріңіз.

    StrToHex бұл Сіз бұрынырақ жасаған пайдаланушы тарапынан анықталатын функция болып табылады. «Өрістерді сұрыптау» бұл құрамында әріптердің үлкен-кішілігін ескеретін мәндер бар өрістің атауы.

  6. Сұрыптау ұяшығында Артуы бойынша немесе Кемуі бойынша дегенін нұқыңыз.

    Егер артуы бойынша сұрыптау тәртібін таңдасаңыз, бас әріптермен басталатын мән кіші әріптермен басталатын мәннен бұрын келеді. Кемуі бойынша сұрыптау тәртібінің қолданылуы мәндерді керісінше сұрыптайды.

  7. Деректер кестесінің көрінісіне өтіңіз.

    Access жазбаларды әріптердің үлкен-кішілігі бойынша сұрыпталған тәртіппен бейнелейді.

Беттің жоғарғы жағы

Дағдыларды жетілдіру
Оқыту курсымен танысыңыз
Жаңа мүмкіндіктерге бірінші болып қол жеткізу
Office Insider бағдарламасына қосылу

Осы ақпарат пайдалы болды ма?

Пікіріңіз үшін рақмет!

Пікіріңізге рақмет! Сізді Office қолдау көрсету қызметіндегі агенттердің бірімен байланыстырған жөн болуы мүмкін.

×