افزودن شخصيت هاي كارتني به برنامه
چون این اولین مطلبی هست که می نویسم اگه تکراری یا خیلی سطح پایین بود ببخشیداگه تا به حال با مجموعه آفیس کار کرده باشید حتما شخصیت های کارتنی ای مثل گربه یا سگ یا .. رو دیدید که مدام از خودشون شکلک در میارند در اینجا می خواهم نحوه
استفاده از اونارو توضیح بدم برای این کار ابتدا یک پروژه ویژوال بیسیک رو باز کنیدسپس روی قسمت toolbox راست کلیک کرده و components رو انتخاب کنید در این قسمت microsoft agent control 2.0 را انتخاب کرده ok را بزنید حالا یک کنترل agent به فرم خود اضافه نمایید سپس روی یک قسمت خالی از فرم دو بار کلیک کرده وکد زیر رو به آن اضافه کنید
کد:
Me.Hide
agent1.Characters.Load "check"
agent1.Characters.Item("check").Show True
agent1.Characters.Item("check").GestureAt 100, 150
agent1.Characters.Item("check").Speak "hello"
agent1.Characters.Item("check").MoveTo 129, 456
agent1.Characters.Item("check").Play "write"
agent1.Characters.Item("check").Think "??????"
agent1.Characters.Item("check").Play "read"
agent1.Characters.Item("check").Play "congratulate"
agent1.Characters.Item("check").Listen True
agent1.Characters.Item("check").Speak "ÈíÏ ÎæÈ "
agent1.Characters.Item("check").Play "congratulate_2"
اولین قسمت رو برای این نوشتم که فرم نشون داده نشه وسطر دوم کاراکتر رو لود می کنه و در سطرهای بعدی همونطوری که معلومه باعث انتقال کارکتر به موقعیت مشخص شده moveto با باعث صحبت speak یا فکر کردن think میشه که باید متنی رو که می خواهید نمایش داده بشه رو بین دو علامت " " بنویسید ونیز play کاری رو که نوشتید انجام میده این کارها از قبیلdomagic1,domagic2,explain,decline,read,wri te,…. می باشه ضمننا این برنامه از کارکتر مرلین که بطور پیش فرض در شاخه C:\WINDOWS\msagent\chars وجود داره استفاده می کنه شما می تونین جدید ترین Agent ها رو از خود سایت مایکرو سافت داونلود کنید ودر برنا متون از اونا استفاده کنید مثلا اگه کاربر بخواهد در برنامه یه فایل نا مربوط رو باز کنه با یه دستور if می تونین با استفاده از متد speak کاراکتر یه پیغام مناسب به طرف بدید کنترل agent متد های زیادی داره که خودتون می تونین امتحان کنین و وظیفه هرکدوم رو بفهمید
