Hour Function

рд╕рдордп рд╢реНрд░реГрдЩреНрдЦрд▓рд╛ рд╡рд╛ рд╕рдордп рдорд╛рди рдкреНрд░рдХрд╛рд░реНрдпрджреНрд╡рд╛рд░рд╛ рдЙрддреНрдкрдиреНрди рдЧрд░рд┐рдПрдХреЛ рд╕рдордп рдорд╛рдирдмрд╛рдЯ рдШрдгреНрдЯрд╛ рдлрд░реНрдХрд╛рдЙрдБрджрдЫ ред

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:


рдШрдгреНрдЯрд╛ (рдирдореНрдмрд░)

рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:

рдЗрдиреНрдЯрд┐рдЬрд░

рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:

рдирдореНрдмрд░: рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрдд рдЬрд╕рд▓реЗ рд╢реНрд░реГрдЩреНрдЦрд▓рд╛ рд╕рдордп рдорд╛рди рд╕рдорд╛рд╡реЗрд╢ рдЧрд░реНрджрдЫ, рддреНрдпреЛ рдШрдгреНрдЯрд╛ рдорд╛рди рдлрд░реНрдХрд╛рдЙрди рд▓рд╛рдИ рдкреНрд░рдпреЛрдЧ рд╣реБрдиреНрдЫ ред

рдпреЛ рдкреНрд░рдХрд╛рд░реНрдп рд╕рдордп рд╢реНрд░реГрдЩреНрдЦрд▓рд╛рдкреНрд░рдХрд╛рд░реНрдпрдХреЛ рд╡рд┐рдкрд░рд┐рдд рд╣реЛ ред рдпрд╕рд▓реЗ рд╕рдордп рд╢реНрд░реГрдЩреНрдЦрд▓рд╛ рд╡рд╛ рд╕рдордп рдорд╛рди рдкреНрд░рдХрд╛рд░реНрдп рджреНрд╡рд╛рд░рд╛ рдЙрддреНрдкрдиреНрди рдЧрд░рд┐рдПрдХреЛ рд╕рдордп рдорд╛рдирдмрд╛рдЯ рдШрдгреНрдЯрд╛ рдкреНрд░рддрд┐рдиреАрдзрд┐рддреНрд╡ рдЧрд░реНрдиреЗ рдПрдЙрдЯрд╛ рдЗрдиреНрдЯрд┐рдЬрд░ рдорд╛рди рдлрд░реНрдХрд╛рдЙрдБрджрдЫ ред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐

Print Hour(TimeSerial(12,30,41))

рдорд╛рди резреи рдлрд░реНрдХрд╛рдЙрдБрджрдЫ ред

рддреНрд░реБрдЯрд┐ рд╕рдЩреНрдХреЗрддрд╣рд░реВ

5 рдЕрд╡реИрдз рдХрд╛рд░реНрдп-рд╡рд┐рдзрд┐ рдХрд▓

рдЙрджрд╛рд╣рд░рдг:


          Sub ExampleHour
          "рд╣рд╛рд▓рдХреЛ рдШрдгреНрдЯрд╛" & рдШрдгреНрдЯрд╛( рдЕрд╣рд┐рд▓реЗ ) рд╣реЛ рдореБрджреНрд░рдг рдЧрд░реНрдиреБрд╣реЛрд╕реН
          End Sub
      

Please support us!