请用易语言翻译下面的VB代码信息
发布网友
发布时间:2024-01-19 03:09
我来回答
共1个回答
热心网友
时间:2024-03-08 19:39
公共职能转变(ByVal左值作为长,ByVal lnumberofbitstoshift长,ByVal ldirectiontoshift作为dcshiftdirection)长
const kscallname是字符串“转移”
错误procere_error
昏暗的LSHIFT长
如果ldirectiontoshift然后左移
LShift =左值*(2 ^ lnumberofbitstoshift)
别人右移
LShift =左值\(2 ^ lnumberofbitstoshift)
最后如果
procere_exit:
转变= LSHIFT
退出功能
procere_error:
错误。错误数量,提高。kscallname,描述,err.helpfile,err.helpcontext犯错。
简历procere_exit
端功能