ketik code berikut di command_click
text1.text = clng(text1.text)+1
select case (len(text1.text))
case is = 1
text1.text = "0000" & text1.text
case is = 2
text1.text = "000" & text1.text
case is = 3
text1.text = "00" & text1.text
case is = 4
text1.text = "0" & text1.text
End Select
semoga membantu...
regards,
LiveDeviL
On 1/4/06, Hasan <[EMAIL PROTECTED]> wrote:
Rekans...
Saya mo tanya neh, saya lagi buat program vb dan sql
server.
Gimana seh caranya, untuk nampilin dan ngesave data
dengan format 00001. Situasi jelas nya gini, textbox a
nilainya 00001, trs pas saya klik command button dia
akan berubah jadi 00002, dikilik lagi jadi 00003,
begitu seterusnya, ada tipe data nya ga seh, abis dari
tadi saya coba pasti angka nol nya lgs ilang( ga
muncul). Tolong bantu saya ya...
Thanx...
Hasan
__________________________________________
Yahoo! DSL – Something to write home about.
Just $16.99/mo. or less.
dsl.yahoo.com
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
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.
--
There's no teacher who can teach us anything new...
They just help us to remember the things we always knew...
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
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.
