با سلام من یه برنامه نوشتم که یه قسمتش یه تابع که دو تا ورودی میگیره و یه سری عملیات ریاضی انجام میده ومقدار را در یک رجیستر قرار میدهد اما این تابع درست کار نمیکنه میشه راهنمایی کنید که مشکلش چیه اینم تابع
کد:
Sub Mc3ph(vph1 As Word , Vph2 As Word) Local Vsave As Long Local Vsave1 As Long Vsave = Vph1 * Vph1 Vsave1 = Vph2 * Vph2 Vt = Vph1 * Vph2 Vt = Vt + Vsave Vt = Vt + Vsave1 Vt = Sqr(vt) End Su
دیدگاه