Private Sub Form_Load()
    Dim i As Integer
    
    For i = 1 To 31
        Combo1.AddItem i
    Next
    Combo1.Text = Day(Now)
    
    For i = 1 To 12
        Combo2.AddItem i
    Next
    Combo2.Text = Month(Now)
    
    For i = 1930 To Year(Now)
        Combo3.AddItem i
    Next
    Combo3.Text = Year(Now)
End Sub


sherinalavenda <[EMAIL PROTECTED]> wrote:          dear all...
saya mau tanya, bagaimana agar 3 combobox masing2 menampilkan tgl,bln 
dan tahun? combobox agar bisa didropdown utk tgl 1 s/d 31, bln 1 s/d 
12,dan tahun dari tahun sekarang(system) s/d tahun 1930?
thanks for attention.



         

       
---------------------------------
Be a better Globetrotter. Get better travel answers from someone who knows.
Yahoo! Answers - Check it out.

[Non-text portions of this message have been removed]

Kirim email ke