Hai Opik,
Kata 6digit (atau 6 char) artinya ada karakter sebanyak 6 bijik.
Untuk menghitung jumlah karakter suatu data adalah dengan fungsi Len
Membandingkan jumlah karakter bisa dilakukan sepeti :
Len("ABC")>Len("XYZ") akan menghasilkan FALSE
Wassalam,
Kid.
2012/12/12 lapendosol opik <[email protected]>
> **
>
>
> Sore semuanya
> Mohon bantuannya, saya lagi bikin form buat ganti password
> Dimana password yg baru dibatasi minimal 6digit
> Saya udah coba:
>
> Private Sub cmdOK_Click()
> If LCase(txtOld.Text) <> Sheet1.Range("b2").Value Then
> MsgBox "Isi password lama dengan benar"
> txtOld.Text = ""
> txtOld.SetFocus
>
> 'disini saya sudah coba sisipkan untuk membatasi minimal 6digit
> 'tapi error, salah
> ElseIf LCase(txtNew.Text) < 6digit Then
> txtNew.Text = ""
> txtConfirm.Text = ""
> txtNew.SetFocus
>
> ElseIf LCase(txtNew.Text) <> LCase(txtConfirm.Text) Then
> MsgBox "Password baru tidak sesuai"
> txtNew.Text = ""
> txtConfirm.Text = ""
> txtNew.SetFocus
> Else
> Sheet1.Range("b2").Value = LCase(txtNew.Text)
> Unload Me
> MsgBox "Berhasil...!!!"
> End If
> End Sub
>
> Mohon bantuannya bahasa minimal 6digit yg bener seperti apa?
> Trimakasih sebelumnya
> Wassalam
>
> Lapendosol
>
>
>
