Yazılım Geliştirme Uzmanı & E-Ticaret Danışmanı
Asp , Excel , VBA , E-Ticaret , Mobil , Desktop, Web Uygulamaları
Tel : 0 534 797 31 21 , Mail : baranseren@gmail.com
Function FlipData Yazılanları Tersine Çevirir

Function FlipData Yazılanları Tersine Çevirir 6.8.2011

	Public Function FlipData(data)
		length = Len(data)
		If length = 0 Then Exit Function
		For i=1 To length
			cache = Mid(data,i,1) & cache
		Next
		FlipData = cache
	End Function



Tags :