buat alternatif aja, mas bisa pake fungsi replace nya vb.
Dim s as string
s = "123 456"
s = Replace(s, Chr(32), "", , , vbTextCompare)
s = "123 456"
s = Replace(s, Chr(32), "", , , vbTextCompare)
best regards
[wwn]
On 2/25/06, b-l wiwit <[EMAIL PROTECTED]> wrote:
mungkin pake kayak gini bisa mas
dim i as integer,tmp as string
tmp = "":cekno = ""
for i = 1 to len(text1.text)
tmp = mid(text1.text,i,1)
if tmp <> " " then cekno = cekno & tmp
next
semoga membantu
thanks, PusHm0v
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
SPONSORED LINKS
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
