H
Tôi có một bảng TblData trong đó có field " Number" dạng text:
01176
00257
63579
........
Bạn nào chỉ tôi làm cách nào để TblData sẽ có dạng text (bỏ đi các số "0" đằng trước và sẽ là:
1176
257
63579
Mà không phải design TblData với???
Hoặc bạn nào giúp tôi cách khai báo để hàm sau có thể dùng trong Query:
Public function Txt(S)
' chỗ này tôi không biết khai báo như thế nào để khi vào trong Query tôi có thể dùng: Txt(Number) thì nó cho kết quả như mình muốn???
Dim n as string
s = n
for i = 1 to 5
if mid(n,i,1) <>"0" then
s = mid(n,i,6-i)
exit for
esle
next i
End if
Tôi đã thử rồi nếu cho n = 00123 thì kết quả là 123 nhưng không đem dùng trong Query để Update cả field Nuber được??
Xin cảm ơn!
01176
00257
63579
........
Bạn nào chỉ tôi làm cách nào để TblData sẽ có dạng text (bỏ đi các số "0" đằng trước và sẽ là:
1176
257
63579
Mà không phải design TblData với???
Hoặc bạn nào giúp tôi cách khai báo để hàm sau có thể dùng trong Query:
Public function Txt(S)
' chỗ này tôi không biết khai báo như thế nào để khi vào trong Query tôi có thể dùng: Txt(Number) thì nó cho kết quả như mình muốn???
Dim n as string
s = n
for i = 1 to 5
if mid(n,i,1) <>"0" then
s = mid(n,i,6-i)
exit for
esle
next i
End if
Tôi đã thử rồi nếu cho n = 00123 thì kết quả là 123 nhưng không đem dùng trong Query để Update cả field Nuber được??
Xin cảm ơn!