پرسش و پاسخ: 2
پرسش: سلام. من نیاز مبرمی به کمک شمادارم من رشتم کامپیوتره برای
امتحان عملی ویژوال بیسیک بادی برنامه های زیرو بسازم وبلد هم نیستم میشه
لطفا کمکم کنید؟؟؟
1)برنامه ای نوشته که شماره های سال رادریافت ومعادل ان را چاپ کند
2) برنامه ای بنویسید که هرکلیدی را که کابرفشارمیدهد خودکلیدوکدمربوط به ان رانمایش دهد.
3)برنامه ای بنویسی که رشته ای دریافت کند وتعداد کارکترهای A را نمایش دهد. بازم ممنونم اگه زحمتی نیست این ادرسه ایمیلم ممنون میشم بیاین وکمکم کنید.
1)برنامه ای نوشته که شماره های سال رادریافت ومعادل ان را چاپ کند
2) برنامه ای بنویسید که هرکلیدی را که کابرفشارمیدهد خودکلیدوکدمربوط به ان رانمایش دهد.
3)برنامه ای بنویسی که رشته ای دریافت کند وتعداد کارکترهای A را نمایش دهد. بازم ممنونم اگه زحمتی نیست این ادرسه ایمیلم ممنون میشم بیاین وکمکم کنید.
پاسخ: با سلام. 1) منظور ؟
2)
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Label1.Caption = Shift
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Label1.Caption = KeyAscii
End Sub
3) هر بار که کاراکتر رو دریافت میکنید چک کنید ببینید آیا برای 65 هست یا نه؟ 65 کد اسکی کاراکتر A است. اگه بود به کانتر اضافه کن اگه نبود که هیچی . آخرش مقدار کانتر رو تو یه تکست باکس قرار بده.
+ نوشته شده در جمعه ششم اردیبهشت ۱۳۹۲ ساعت 17:39 توسط محسن افوان
|
روزی که به دنیای مجازی اومدم فرش قرمزی پهن بود وهزاران هزار کاربر کلاه خود را به احترام من برداشته بودن واز آنجایی که می دانستند شخص شخیصی مثل من به زودی پله های ترقی را یک به یک طی خواهدکشید، کلاه های خود را تکان می دادند و سوت می زدند و کف.