dim t_panjang as integer, bagi as integer, kanan as integer
t_panjang=len(trim(kataterbilang))
if t_panjang > 45 then
bagi=t_panjang/3
text1.text=left(kataterbilang,bagi)
text2.text=mid(kataterbilang,(bagi+1),bagi)
kanan=t_panjang-(bagi+bagi+2)
text3.text=right(kataterbilang,kanan)
end if
--> kl salah beritahu saya yaa....
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Forum ini berkembang dengan pesat, jika anda memiliki
dedikasi dan waktu, silahkan mengaplikasikan diri
menjadi moderator.
SPONSORED LINKS
| Computer internet security | Computer internet business | Computer internet access |
| Computer internet privacy securities | Computer internet help | Computer internet connection |
YAHOO! GROUPS LINKS
- Visit your group "indoprog-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.
