Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Hàm cắt chuỗi trong access
#1
Chào Các Anh Chị
Cho em hỏi trong access có hàm cắt chuỗi không?
Vd: em lọc ra chuỗi ABC0809AM
nhưng em chỉ cần ABC và bỏ 0809AM
Anh chị giúp em với.
Chữ ký của chatchut Xin chào, mình là chatchut, Tham gia http://thuthuataccess.com/forum từ ngày 15-03 -12.
Reply
Những người đã cảm ơn
#2
Bạn gõ: =left(Tenchuoi,3) là OK.
Trong đó: Tenchuoi là: ABC0809AM của bạn.
Thân chào !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#3
Tương tự Excel, Access có hỗ trợ các hàm:
Left(Chuỗi, số ký tự cần cắt)
Right(Chuỗi, số ký tự cần cắt)
Mid(chuỗi, vị trí bắt đầu, số ký tự cắt kể từ vị trí)

Ví dụ trên bạn dùng left("ABC0809AM",3)
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn chatchut
#4
(09-08-13, 06:12 PM)Noname Đã viết: Tương tự Excel, Access có hỗ trợ các hàm:
Left(Chuỗi, số ký tự cần cắt)
Right(Chuỗi, số ký tự cần cắt)
Mid(chuỗi, vị trí bắt đầu, số ký tự cắt kể từ vị trí)

Ví dụ trên bạn dùng left("ABC0809AM",3)

Không phải đơn giản vây đâu anh chị ơi. Do em nhầm xíu
vd: ABC0809AM = ABC
CDEFG0909PM = CDEFG
em chỉ lấy dãy chuỗi nhất định thôi, chẳng hạn như trước dãy số
Chữ ký của chatchut Xin chào, mình là chatchut, Tham gia http://thuthuataccess.com/forum từ ngày 15-03 -12.
Reply
Những người đã cảm ơn
#5
(09-08-13, 07:20 PM)chatchut Đã viết:
(09-08-13, 06:12 PM)Noname Đã viết: Tương tự Excel, Access có hỗ trợ các hàm:
Left(Chuỗi, số ký tự cần cắt)
Right(Chuỗi, số ký tự cần cắt)
Mid(chuỗi, vị trí bắt đầu, số ký tự cắt kể từ vị trí)

Ví dụ trên bạn dùng left("ABC0809AM",3)

Không phải đơn giản vây đâu anh chị ơi. Do em nhầm xíu
vd: ABC0809AM = ABC
CDEFG0909PM = CDEFG
em chỉ lấy dãy chuỗi nhất định thôi, chẳng hạn như trước dãy số
Đơn giản mà bạn. Ý bạn muốn là cắt các chữ cái đầu tiên đến vị trí số thì dừng lại đúng không. bạn viết một cái hàm như sau:
Mã PHP:
Public Function GetString(as String) As String
Dim i 
As Byte
Dim st 
As String
st
=""
i=1
s
=s+"0"
'Số 0 nhé, không phải chữ O. Cái này dùng để chắc chắn rằng chuỗi của bạn có số
Do While ASC(Mid(s,i,1)) <= ASC(0) and ASC(Mid(s,i,1)) >= ASC(9)
     st = st + Mid(s,i,1)
     i= i + 1
Loop
GetString = st
End Function 
Reply
Những người đã cảm ơn Noname
#6
1/ Hàm của bạn trav2t tôi test thử không cho kết quả
2/ Nếu như bạn chỉ tách lấy những chữ cái đầu đến khi gặp số thì dừng lại, tôi xin tặng bạn hàm tự tạo sau :

Mã PHP:
Function TachChuoi(strChuoi As String) As String
    Dim sChuoi 
As StringsChuoiTach As String
    sChuoi 
Trim(strChuoi)
    
sChuoiTach Space(0)
    
Dim i As Integer
    
For 1 To Len(sChuoi)
        If 
IsNumeric(Mid(sChuoii1)) = False Then
            sChuoiTach 
sChuoiTach Mid(sChuoii1)
        Else
            Exit For            
        
End If
    
Next
    TachChuoi 
sChuoiTach
End 
Function 

Khi đó TachChuoi("ABCD567HG") = ABCD

3/ Nếu muốn lấy toàn bộ chữ cái trong chuỗi thì sửa lại hàm trên như sau:

Mã PHP:
Function TachChuoi(strChuoi As String) As String
    Dim sChuoi 
As StringsChuoiTach As String
    sChuoi 
Trim(strChuoi)
    
sChuoiTach Space(0)
    
Dim i As Integer
    
For 1 To Len(sChuoi)
        If 
IsNumeric(Mid(sChuoii1)) = False Then
            sChuoiTach 
sChuoiTach Mid(sChuoii1)
        Else           
            
sChuoiTach sChuoiTach Space(0)
        
End If
    
Next
    TachChuoi 
sChuoiTach
End 
Function 

Khi đó TachChuoi("ABCD567HG") = ABCDHG

Các bạn vận dụng để tách lấy số trong chuỗi
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn khải nguyên
#7
(11-08-13, 12:58 PM)Xuân Thanh Đã viết: 1/ Hàm của bạn trav2t tôi test thử không cho kết quả
2/ Nếu như bạn chỉ tách lấy những chữ cái đầu đến khi gặp số thì dừng lại, tôi xin tặng bạn hàm tự tạo sau :

Mã PHP:
Function TachChuoi(strChuoi As String) As String
    Dim sChuoi 
As StringsChuoiTach As String
    sChuoi 
Trim(strChuoi)
    
sChuoiTach Space(0)
    
Dim i As Integer
    
For 1 To Len(sChuoi)
        If 
IsNumeric(Mid(sChuoii1)) = False Then
            sChuoiTach 
sChuoiTach Mid(sChuoii1)
        Else
            Exit For            
        
End If
    
Next
    TachChuoi 
sChuoiTach
End 
Function 

Khi đó TachChuoi("ABCD567HG") = ABCD

3/ Nếu muốn lấy toàn bộ chữ cái trong chuỗi thì sửa lại hàm trên như sau:

Mã PHP:
Function TachChuoi(strChuoi As String) As String
    Dim sChuoi 
As StringsChuoiTach As String
    sChuoi 
Trim(strChuoi)
    
sChuoiTach Space(0)
    
Dim i As Integer
    
For 1 To Len(sChuoi)
        If 
IsNumeric(Mid(sChuoii1)) = False Then
            sChuoiTach 
sChuoiTach Mid(sChuoii1)
        Else           
            
sChuoiTach sChuoiTach Space(0)
        
End If
    
Next
    TachChuoi 
sChuoiTach
End 
Function 

Khi đó TachChuoi("ABCD567HG") = ABCDHG

Các bạn vận dụng để tách lấy số trong chuỗi
Thân mến
Xin lỗi hàm của mình nhầm 01 chỗ. Chính xác thì thay đổi dong Do While như sau:
Mã PHP:
Do While ASC(Mid(s,i,1)) <= ASC(0) and ASC(Mid(s,i,1)) >= ASC(9
Reply
Những người đã cảm ơn
#8
(11-08-13, 01:32 PM)trav2t Đã viết: Xin lỗi hàm của mình nhầm 01 chỗ. Chính xác thì thay đổi dong Do While như sau:
Mã PHP:
Do While ASC(Mid(s,i,1)) <= ASC(0) and ASC(Mid(s,i,1)) >= ASC(9

Ý tôi nói là bạn xem lại cái hàm Asc nhé
Thân

P/S : Asc(String As String) As Integer
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Lỗi "A problem occurred while Microsoft Access was communicating with the OLE server thanhoai 1 109 03-11-16, 03:53 PM
Bài mới nhất: maidinhdan
  [Hỏi] Việc set thuộc tính OnClick trong Code toancvp 5 229 31-10-16, 10:14 AM
Bài mới nhất: toancvp
  [Lỗi] Cúp điện ---> lỗi access 2013 biencuong86 3 149 26-10-16, 04:30 PM
Bài mới nhất: maidinhdan
  [Hỏi] chương trình đơn giản để so sánh chuỗi text kanmai07 4 318 28-09-16, 06:05 PM
Bài mới nhất: kanmai07
  thay đổi biểu tượng Access dưới thanh Start từ win 7 đến win 10 thanhtruong 7 434 05-08-16, 10:53 PM
Bài mới nhất: hungefi

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ