Please help me out Need a flow chart of the steps that are g

Please help me out Need a flow chart of the steps that are going to be used to build this program in Visual Basic

36. Friday the 13th Write a program that lets the user enter a year into a masked text box and then counts the number of times Friday 13th occurs during that year. See Fig. 6.38. Use a Boolean-valued function called IsFriday with one parameter of type Date.

Solution

1. Start
2. Year=Input an year
3. Month = 1
3. counter=0
4. If (13th day in Month) = Friday then counter=counter+1
5. Month=Month+1
6. If Month <=12 Then Goto 4 \'Maximum number of months=12
7. Print \"Number of Friday 13th in Year %d = %d\",Year,counter
8. End

Convert to Flowchart.

Program:

Function isFriday(inDate) as Boolean
   isFriday=(Format(d, \"dddd\"))=\"Friday\"
End Function

Sub Button1_Click()
   year=InputBox(\"Enter year (YYYY) :\")
   counter=0
   For mnth = 1 to 12
       If isFriday(mnth & \"/13/\" & year) counter=counter+1      
   next
   msgbox \"Total number of Friday 13th = \" & counter
End Sub