Re: [Programmer-VB] Menambah karakter otomatis di Proses penyimpanan

Thu, 16 Feb 2006 18:38:43 -0800

function LoadData(byVal Str as String) as string
On Error Goto ErrMsg
   LoadData Str & String(5 - Len(Str), "A")
   Exit Function
ErrMsg:
  Msgbox err.Description ,vbCritical,"KwetChiro"
End Function
 
 
debug.print LoadData ("Test")
 
Regards,
Yulianto
 

JemyX Shinichi <[EMAIL PROTECTED]> wrote:
coba bikin fungsi kaya gini (sory blm di run, ya kalo salah2 dikin benerin hehehe, CMIIW maksud nya)
 
private Function ISIdata(ByVal str as String) as String
dim I as Byte
 
 
    I = len(str)
 
    do while I < 5
        str = str & "A"
        I = I + 1
    loop
 
end function
   
 
 
 
----- Original Message -----
From: Udin
Sent: Friday, February 17, 2006 8:55 AM
Subject: [Programmer-VB] Menambah karakter otomatis di Proses penyimpanan

Dengan hormat,
Saya mau menyimpan data ke database dengan jumlah karakter yang sama jumlahnya, misalnya saya mau menyimpan harus 5 karakter. maka jika ada yang input kata cuma 4 karakter maka akan ditambah otomatis satu karakter misalnya A diakhir kata tersebut, Ada yang tahu nggak gimana caranya ya ? mohon saranya
 
Regards
Syafruddin
 

Brings words and photos together (easily) with
PhotoMail - it's free and works with Yahoo! Mail.

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



Kirim email ke