Contents

# TimeValue Function

ཨང་གྲངས་ཀྱི་གནས་གོང་རྐྱང་པ་ནང་དུས་ཚོད་ཁྱད་ཚབ་འབད་མི་ཡིག་རྒྱུན་སྦེ་རྩིས་སྤྲོད་གསལ་བཀོད་འབད་མི་ཆུ་ཚོད་ སྐར་མ་ དང་སྐར་ཆག་ ཚད་བཟུང་ཚུ་ལས་རིམ་ཨང་དུས་ཚོད་གནས་གོང་ཅིག་རྩིས་སྟོནམ་ཨིན། གནས་གོང་དེ་དུས་ཚོད་ཚུ་བར་ན་སོ་སོ་ཁ་ཕྱེལ་རྩིས་སྟོན་ནི་ལུ་ལག་ལེན་འཐབ་བཏུབ་ཨིན།

## ཚིག་སྦྱོར:

    དུས་ཚོད་གནས་གོང་ (Text As String)

## གནས་གོང་སླར་ལོག:

ཚེས་གྲངས་

## ཚད་བཟུང་ཚུ་:

ཚིག་ཡིག་: ཡིག་རྒྱུན་གསལ་བརྗོད་འདི་ནང་ཁྱོད་ཀྱིས་རྩ་སྒྲིག་ནང་རྩིས་སྟོན་ནི་ལུ་ "HH:MM:SS" དུས་ཚོད་འདི་ཡོདཔ་ཨིན།

གནས་གོང་རྐྱང་པ་ནང་ལུ་དུས་ཚོད་གང་རུང་གཞི་བསྒྱུར་འབད་ནི་ལུ་དུས་ཚོད་གནས་གོང་ལས་འགན་ལག་ལེན་འཐབ་ ཁྱོད་ཀྱིས་དུས་ཚོད་ཁྱད་པར་ཚུ་རྩིས་སྟོན་བཏུབ།

དུས་ཚོད་གནས་གོང་ལས་འགན་དེ་གིས་དབྱེ་བ་མི་མཐུན་པ་དང་གཅིག་ཁར་ཝར་དབྱེ་བ་ ༧ (ཚེས་)དང་ ༠ དང་ ༩༩༩༩༩༩༩༩༩༩ བར་ན་གཉིས་ལྡན་ཀྲིག་ཀྲི་ཨང་སྦེ་གནས་གོང་དེའི་ནང་འཁོད་གསོག་འཇོག་འབད་མི་སླར་ལོགཔ་ཨིན།

ཚེས་རིམ་ཨང་ཡང་ན་ཚེས་གནས་གོང་ལས་འགན་དེ་ལུ་རྒྱབ་འགལ་སྦེ་ གཏན་བཟོ་ཚེས་ལུ་འབྲུལ་བའི་ཉིནམ་ཚུ་ནང་་འབྱུང་མི་རིམ་ཨང་ཚེས་གནས་གོང་ཚུ་ཡོད་ས་ ཁྱོད་ཀྱིས་དུས་ཚོད་གནས་གོང་ལས་འགན་གྱིས་སླར་ལོག་ཡོད་མི་གནས་གོང་ཚུ་དང་གཅིག་ཁར་རྩིས་སྟོན་བཏུབ་ཨིན་རུང་ ཁྱོད་ཀྱིས་བརྟག་ཞིབ་འབད་མི་བཏུབ་ཨིན།

དུས་ཚོད་རིམ་ཨང་ལས་འགན་དེ་ནང་ ཁྱོད་ཀྱིས་ཚད་བཟུང་ཚུ་ངོ་རེ་རེ་(ཆུ་ཚོད་ སྐར་མ་ སྐར་ཆག)དབྱེ་སེལ་ཨང་གྲངས་ཀྱི་གསལ་བརྗོད་ཚུ་སྦེ་རྩིས་སྤྲོད་བཏུབ་ཨིན། དུས་ཚོད་གནས་གོང་ལས་འགན་དོན་ལུ་ ཁྱོད་ཀྱིས་ཚད་བཟུང་ནང་ན་དུས་ཚོད་ཡོདཔ་སྦེ་ཡིག་རྒྱུན་ཅིག་རྩིས་སྤྲོད་བཏུབ་ཨིན།

### Error codes:

༥ ནུས་མེད་བྱ་སྒོའི་ལམ་ལུགས་བོད་བརྡ་

༡༣ དབྱེ་བ་མ་མཐུནམ་

## དཔེར་བརྗོད:

    Sub ExampleTimerValue
    Dim daDT As Date
    Dim a1, b1, c1, a2, b2, c2 As String
        ཨེ་༡ = "start time"
        བི་༡ = "end time"
        སི་༡ = "total time"
        a2 = "8:34"
        b2 = "18:12"
        daDT = TimeValue(b2) - TimeValue(a2)
        c2 = a1 & ": " & a2 & chr(13)
        c2 = c2 & b1 & ": " & b2 & chr(13)
        c2 = c2 & c1 & ": " & trim(Str(Hour(daDT))) & ":" & trim(Str(Minute(daDT))) & ":" & trim(Str(Second(daDT)))
        MsgBox c2
    End Sub