month format in visual basic 6

Expand Post »

greetings!

anybody know how to convert the month value into word format

for example date = 12/2007
month is december

how to convert this 12 into "december "

is there any command to get the month value into string or word format...or i make may own...

thanks in advance

Similar Threads

C++ char array parsing-Help in C++

locsin

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

47 posts
since Aug 2007

Permalink

Dec 4th, 2007

Re: month format in visual basic 6

you can change date format :

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
Ex : Format(Date, "dddd MMMM dd,yyyy")
Ex : Format(Date, "dddd MMMM dd,yyyy")

every days name and month name will be long type

or you can make procedure to convert :

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
Private Sub Month_Convertion()
   Dim bulan As String
 
    bulan = Month(Date)
    Select Case bulan
    Case 1
        bulan = "Januari"
    Case 2
        bulan = "Februari"
    Case 3
        bulan = "Maret"
    Case 4
        bulan = "April"
    Case 5
        bulan = "Mei"
    Case 6
        bulan = "Juni"
    Case 7
        bulan = "Juli"
    Case 8
        bulan = "Agustus"
    Case 9
        bulan = "September"
    Case 10
        bulan = "Oktober"
    Case 11
        bulan = "November"
    Case 12
        bulan = "Desember"
    End Select
 
  bln = bulan
End Sub
Private Sub Month_Convertion()
   Dim bulan As String
    
    bulan = Month(Date)
    Select Case bulan
    Case 1
        bulan = "Januari"
    Case 2
        bulan = "Februari"
    Case 3
        bulan = "Maret"
    Case 4
        bulan = "April"
    Case 5
        bulan = "Mei"
    Case 6
        bulan = "Juni"
    Case 7
        bulan = "Juli"
    Case 8
        bulan = "Agustus"
    Case 9
        bulan = "September"
    Case 10
        bulan = "Oktober"
    Case 11
        bulan = "November"
    Case 12
        bulan = "Desember"
    End Select
  
  bln = bulan
End Sub

to call this procedure:

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)

 Month_Convertion
 lblMonth.Caption = bln

Jery
Best Regards

Jx_Man

Reputation Points: 1182

Solved Threads: 393

Posting Sensei

Offline

3,145 posts
since Nov 2007

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.

Previous Thread in Visual Basic 4 / 5 / 6 Forum Timeline: VB 2008 Express

Next Thread in Visual Basic 4 / 5 / 6 Forum Timeline: using variable in datasource in visual basic 6

DaniWeb Message

Cancel Changes

User Name
Password