Skip to main content

AccessTr.neT


alfanumerik alandaki noktaları kaldırmak

alfanumerik alandaki noktaları kaldırmak

Çözüldü #1
access'e import ettiğim Invoices tablosunda hesap kodu alanındaki 320.001.0001 gibi hesap kodundaki noktaları yoksayıp 3200010001 haline çevirmek istiyorum. Bunun için aşağıdaki function'ı bana önermiştiniz. Bu functionu Sql kayıt kümesi içine nasıl oturtmak gerekir. Tşk

Public Function Trz(bb As String)
Dim i As Integer
Dim index As Integer
Dim Count As Integer
Dim FoundByAscii(0 To 255) As Boolean
Set bb = Me.HesapKodu
For i = 1 To Len(bb)
If Not IsNumeric(Mid(bb, i, 1)) Then Trz = Mid(bb, i + 1)
Next
End Function
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
alfanumerik alandaki noktaları kaldırmak - Yazar: pega54 - 12/07/2014, 09:48
Task