تمرین : ماکرویی بنویسید که دو عدد را از کاربر گرفته و سپس ضرب آنها را نمایش دهد :

SUB ZARB()

DIM I AS SINGLE

DIM J AS SINGLE

DIM K AS SINGLE

 I= INPUTBOX(" ENTER I :")

 J= INPUTBOX(" ENTER J :")

 K=I*J

 MSGBOX " I*J = " &K

END SUB