tx = Trim(tx) 'menghilangkan space kosong samping kiri dan kanan
tx = Trim(Mid(tx, 2, Len(tx) - 1)) 'mengambil nilai dimulai dari digit ke-2 sampai dengan
'total digit tx - 1
rem_dot = tx 'kembalikan hasil
End Function
Bila ada kepastian hanya untuk tanda titik diawal, bisa memanfaatkan fungsi berikut:
Function rem_dot(tx As String)
tx = Trim(tx) 'menghilangkan space kosong samping kiri dan kanan
tx = Trim(Mid(tx, 2, Len(tx) - 1)) 'mengambil nilai dimulai dari digit ke-2 sampai dengan
'total digit tx - 1
rem_dot = tx 'kembalikan hasil
End Function
Sebelum mengirim umpan tx, harus dipastikan bahwa umpan tx berisi nilai.
Semoga bisa membantu dan memberi semangat.
Hariyanto (Surabaya)
--------------------------------------------
On Fri, 13/6/14, him mah himmah.mlg@gmail.com [belajar-access] <belajar-access@yahoogroups.com> wrote:
Subject: [belajar-access] remove karakter titik di awal kalimat
To: belajar-access@yahoogroups.com
Date: Friday, 13 June, 2014, 4:56 PM
Assalamu'alaikum Wr.
Wb.Dear All
saya ada kesulitan dalam
menghilangkan tanda titik (.) yang ada di awal
string
misal saya punya
teks yang depannya ada titik nya, kira kira caranya
menghilangkannya gimana ya
.
selamat
>>> seharusnya >>> selamat
.No. 5
>>> seharusnya >>> No. 5
catatan yang dihapus adalah yang di
depan karakter saja, dan tidak semua data diawali dengan
tanda titik
terima kasih, sebelum
nya
Posted by: him mah <himmah.mlg@gmail.com>
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (4) |
Tidak ada komentar:
Posting Komentar