Not: En güncel yardım içeriklerini, mümkün olduğunca hızlı biçimde kendi dilinizde size sunmak için çalışıyoruz. Bu sayfanın çevirisi otomasyon aracılığıyla yapılmıştır ve bu nedenle hatalı veya yanlış dil bilgisi kullanımları içerebilir. Amacımız, bu içeriğin sizin için faydalı olabilmesini sağlamaktır. Buradaki bilgilerin faydalı olup olmadığını bu sayfanın sonunda bize bildirebilir misiniz? Kolayca başvurabilmek için İngilizce makaleye buradan ulaşabilirsiniz.
Microsoft Office Access 2007 kayıtları büyük/küçük harf bağımsız azalan veya artan düzende sıralar. Bununla birlikte, Visual Basic for Applications (VBA) kodu birkaç satır yazarak metin ASCII karakter değerlerini göre sıralayabilirsiniz. ASCII değerleri temel alarak sıralama büyük harfleri küçük harf ve büyük küçük harf duyarlı bir düzende sonuçları ayırır.
Aşağıdaki tabloda, Access artan sıralama düzende nasıl büyük küçük harf duyarlı sıralama sırasından farklıdır gösterilmektedir:
Önceden sıralama düzeni | Artan düzende | Büyük küçük harf duyarlı sırasına göre r |
|---|---|---|
|
c |
a |
A |
|
D |
A |
B |
|
a |
B |
C |
|
g |
b |
D |
|
B |
c |
a |
|
C |
C |
b |
|
A |
D |
c |
|
b |
g |
g |
Artan sırada sütundaki sonuçlar ilk bakışta biraz beklenmeyen görünse bile, bunlar değildir. "A" ve "B", "b" önce görünmesi artan sırada sütununda "bir" görüntülenir Bu nedeniyle oluşur, metin değerleri, "A" olarak değerlendirildiğinde = "bir" ve "B" küçük veya büyük olup olmadığını "b" =. Access özgün değerleri sırasını dikkate alınır. Öncesi sıralama düzeni sütununda "bir" "A" önce gelir ve "B", "b" önündeki
Büyük küçük harf duyarlı sıralama işlemi yapıldığında, metin değerleri ASCII değerleriyle değiştirilir. Örneğin, A = 65, bir 97, B = 66, = b 98 vb..
VBA kodu yazın
-
VBA modülünde oluşturun ve henüz girilmemişse bildirimler bölümünde, aşağıdaki satırı yazın:
Açık seçeneği
-
Visual Basic Düzenleyicisi'nde modülde aşağıdaki yordamı yazın:
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Önceki kullanıcı tanımlı işlev, StrToHex, bir sorgudan adlı. Bu işlev için sıralama alanın adını geçirdiğinizde, alan değerlerini büyük küçük harf duyarlı düzende sıralanır.
-
Şimdi, bu işlev arayarak bağlanacak bir sorgu oluşturun.
Oluştur sekmesinin Diğer grubunda Sorgu Tasarımı'na tıklayın.
-
Tabloyu Göster iletişim kutusunda, sıralamak istediğiniz tabloyu tıklatın ve ardından Ekle'yitıklatın.
-
İstediğiniz alanları kılavuza sürükleyin.
-
İlk boş sütununda, alan satırında yazın Expr1: StrToHex([SortField]).
Daha önce oluşturduğunuz kullanıcı tanımlı işlev StrToHex olur. SortField büyük küçük harf duyarlı değerleri içeren alanın adıdır.
-
Artan veya Azalansıralama hücresine tıklayın.
Artan düzende seçerseniz, değer başlayarak büyük harfleri küçük harfle başlayan olanlar önce görünür. Azalan düzende sıralama düzenini uygulama tersi yapar.
-
Veri Sayfası görünümüne geçin.
Access büyük küçük harf duyarlı düzende sıralanmış kayıtları, görüntüler.
