2回の違いを計算する場合、どの機能を使用する必要がありますか？今日、New Technology Channelの編集者は、2回の差の関数を計算する方法を教えてくれます。この知識を学ぶことが役立つことを願っています！
'*******************************
'|| function timediff（sbegin、send）
'||この関数は2回の差を計算し、変更せずに直接使用できます。
'||著者：MachineCat 2001/10/26
'*******************************
'*******************************
'注：まず、Sbeginの間のサイズを決定し、ユーザーが入力した送信を決定する必要があります
「複雑な時間変換なしで、2つの間の時間差は、DataDiff関数を通じて得ることができます
コードコピーは次のとおりです。function timediff（sbegin、send）
dim ihourb、iminuteb、isecondb、iminisecondb
dim ihoure、iminutee、iseconde、iminiseconde
dim dtimeb、dtimee、dtimediff
Dim Ihour、iminute、isecond、iminisecond
ihourb = clng（左（sbegin、2））
iminuteb = clng（mid（sbegin、4、2））
ISECONDB = CLNG（MID（SBEGIN、7、2））
iminisecondb = clng（mid（sbegin、10、4））
ihoure = clng（左（send、2））
iminutee = clng（mid（send、4、2））
iseconde = clng（mid（send、7、2））
iminiseconde = clng（mid（send、10、4））
dtimeb = ihourb * 3600 + iminuteb * 60 + isecondb + iminisecondb / 1000
dtimee = ihoure * 3600 + iminutee * 60 + iseconde + iminiseconde / 1000
dtimediff = dtimee -dtimeb
ihour = int（dtimediff/3600）
dtimediff = dtimediff -ihour * 3600
iminute = int（dtimediff / 60）
dtimediff = dtimediff -iminute * 60
isecond = int（dtimediff）
dtimediff = dtimediff -int（dtimediff）
iminisecond = dtimediff
Timediff = ihour＆ "Hours"＆iminute＆ "Minutes"＆Isecond＆Formatnumber（iminisecond、3）＆ "seconds"
エンド関数
上記は、False New Technologyチャネルの編集者によって収集された関連する紹介です。 2回の違いを計算する機能を理解することが役立つことを願っています！