با جلسه چهاردهم از آموزش بیسیک فور اندروید در خدمت شما هستیم با آموزش ساخت برنامه روزهای هفته در بیسیک فور اندروید از وب سایت آموزش برنامه نویسی سورس باران. در واقع برنامه ای در بیسیک فور اندروید می نویسید که کاربر روز هفته را وارد کند و نام روز هفته را نشان دهد. با ما همراه باشید…
آموزش ساخت برنامه روزهای هفته در بیسیک فور اندروید
در این برنامه یک EditText داریم و دو تا دکمه که کاربر عدد رو در EditText وارد کنه و روی دکمه نمایش کلیک کنه و نام روز هفته نمایش داده بشه و یک دکمه هم داشته باشیم برای خروج از برنامه. فقط یک نکته جدید هست که اونم متنی هست که در TextBox قرار داره که وقتی مقداری رو وارد می کنیم اون متن مخفی میشه، برای اینکار EditText رو در محیط Designer انتخاب و از قسمت Properties در خاصیت Hint متن دلخواهتون رو بنویسید.
پس از وارد کردن سه کنترل که دوتا Button و یک EditText هست ، رویداد های کلیک Button رو اضافه کنید و EditText رو برنامه اضافه کنید (وقتی روی EditeText در پنجره Abstract Designer راست کلیک میکنید ، گزینه Generate رو انتخاب و Dim EditText1 as Text رو بزنید). به محیط کدنویسی بر میگردیم ، برای دکمه خروج کد زیر رو می نویسیم:
Sub Button2_Click ExitApplication() End Sub
و برای دکمه نمایش کدهای زیر رو می نویسیم:
ub Button1_Click Dim num As Int num = EditText1.Text Select num Case 1 Msgbox("شنبه","") Case 2 Msgbox("یک شنبه","") Case 3 Msgbox("دو شنبه","") Case 4 Msgbox("سه شنبه","") Case 5 Msgbox("چهار شنبه","") Case 6 Msgbox("پنج شنبه","") Case 7 Msgbox("جمعه","") Case Else Msgbox("هفته 7 روز داره :)","") End Select End Sub
توضیحات سورس کد بالا
- در خط ۲ یک متغیر Num از نوع عددی یا همون int تعریف کردیم.
- در خط ۳ متغیر Num رو با EditTxt1.Text قرار دادیم ، یعنی هر مقداری که تو EditText وارد میشه رو میریزم تو متغیر Num.
- از خط های ۴ تا ۱۸ با استفاده از دستور Case مقادیر رو بررسی می کنیم که اگر مقدارمون با فلان عدد برابر بود پیغام دلخواهمون رو به نمایش بده.
- در خط ۱۹ گفتیم اگر مقادیر وارد شده با هیچ کدوم از case ها برابر نبود ، پیغام دلخواهی نمایش بده.
و در آخر تمام کدها به شرح زیر می باشد :
#Region Project Attributes #ApplicationLabel: Hafte #VersionCode: 1 #VersionName: 1.0.0 'SupportedOrientations possible values: unspecified, landscape or portrait. #SupportedOrientations: unspecified #CanInstallToExternalStorage: False #End Region #Region Activity Attributes #FullScreen: False #IncludeTitle: True #End Region Sub Process_Globals 'These global variables will be declared once when the application starts. 'These variables can be accessed from all modules. <div style="clear:both; margin-top:0em; margin-bottom:1em;"><a href="https://beporsam.ir/blog/aide-learn-session-8/" target="_blank" class="u90d4ecbe35e65132ef475363f4486e9b"><!-- INLINE RELATED POSTS 2/3 //--><style> .u90d4ecbe35e65132ef475363f4486e9b { padding:0px; margin: 0; padding-top:1em!important; padding-bottom:1em!important; width:100%; display: block; font-weight:bold; background-color:#eaeaea; border:0!important; border-left:4px solid #34495E!important; box-shadow: 0 1px 2px rgba(0, 0, 0, 0.17); -moz-box-shadow: 0 1px 2px rgba(0, 0, 0, 0.17); -o-box-shadow: 0 1px 2px rgba(0, 0, 0, 0.17); -webkit-box-shadow: 0 1px 2px rgba(0, 0, 0, 0.17); text-decoration:none; } .u90d4ecbe35e65132ef475363f4486e9b:active, .u90d4ecbe35e65132ef475363f4486e9b:hover { opacity: 1; transition: opacity 250ms; webkit-transition: opacity 250ms; text-decoration:none; } .u90d4ecbe35e65132ef475363f4486e9b { transition: background-color 250ms; webkit-transition: background-color 250ms; opacity: 1; transition: opacity 250ms; webkit-transition: opacity 250ms; } .u90d4ecbe35e65132ef475363f4486e9b .ctaText { font-weight:bold; color:inherit; text-decoration:none; font-size: 16px; } .u90d4ecbe35e65132ef475363f4486e9b .postTitle { color:#000000; text-decoration: underline!important; font-size: 16px; } .u90d4ecbe35e65132ef475363f4486e9b:hover .postTitle { text-decoration: underline!important; } </style><div style="padding-left:1em; padding-right:1em;"><span class="ctaText">حتما بخوانید:</span> <span class="postTitle">آموزش نرم افزار AIDE - قسمت هشتم(WebView)</span></div></a></div> End Sub Sub Globals Private EditText1 As EditText End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("Lmain") End Sub Sub Button2_Click ExitApplication() End Sub Sub Button1_Click Dim num As Int num = EditText1.Text Select num Case 1 Msgbox("شنبه","") Case 2 Msgbox("یک شنبه","") Case 3 Msgbox("دو شنبه","") Case 4 Msgbox("سه شنبه","") Case 5 Msgbox("چهار شنبه","") Case 6 Msgbox("پنج شنبه","") Case 7 Msgbox("جمعه","") Case Else Msgbox("هفته 7 روز داره :)","") End Select End Sub
امیدواریم که این مطلب مورد توجه دوستان قرار گرفته باشد…
مشاهده لیست جلسات قبل آموزش بیسیک فور اندروید
- آموزش بیسیک فور اندروید – دانلود تمامی ابزارهای مورد نیاز برنامه نویسی B4A
- آموزش بیسیک فور اندروید – آموزش گام به گام نصب و راه اندازی JDK
- آموزش کامل نصب Android SDK
- آموزش کامل نصب بیسیک فور اندروید+دانلود نرم افزار Basic4Android
- آموزش نصب و کار با شبیه ساز اندروید NOX
- آموزش کامل اجرا مستقیم برنامه روی گوشی با B4A Bridge
- آموزش بیسیک فور اندروید – معرفی Activity و Layout + تغییر تم محیط بیسیک فور اندروید
- آموزش و کاربرد دستور Try و Catch در بیسیک فور اندروید
- آموزش حذف انیمیشن پیشفرض لایوت ها در بیسیک فور اندروید
- آموزش استفاده از اینتنت های کافه بازار در بیسیک فور اندروید
- آموزش کار با فونت ها در بیسیک فور اندروید
- آموزش کار با پروگرس بار و سفارشی سازی آن در بیسیک فور اندروید
- آموزش ساخت آرایه ای از ویوها در بیسیک فور اندروید
راستی! برای دریافت مطالب جدید در کانال تلگرام یا پیج اینستاگرام سورس باران عضو شوید.
- منبع : سورس باران
- رمز فايل : www.sourcebaran.com
- انتشار: ۱۱ خرداد ۱۳۹۸
دسته بندی موضوعات
- آموزش برنامه نویسی
- آموزش کریپتو کارنسی (ارز دیجیتال)
- آموزش متنی برنامه نویسی
- پروژه برنامه نویسی
- فروشگاه
- فیلم های آموزشی
- #F
- ++C
- 3ds max
- Ada
- ADO.NET
- Adobe Flash
- Agile
- Ajax
- AngularJS
- Anime Studio
- apache
- ARM
- Asp.Net
- ASP.NET MVC
- assembly
- AVR
- Azure
- Bootstrap
- Cassandra
- CCNA
- CCNP
- CCSP
- ChatGPT
- Cisco
- CMD
- COBOL
- CSS
- Cython
- Django
- Dreameaver
- Elixir
- EntityFramework
- Erlang
- Flash
- Go
- Groovy
- Haskell
- Htaccess
- HTML
- IOS
- Jade
- jquery
- Kendo UI
- Linq
- Linux
- LUA
- MariaDB
- maya
- Meteor
- MongoDB
- Mono Android
- MonoGame
- Mysql
- NoSQL
- Oracle
- Orchard
- Perl
- php
- PHPMyAdmin
- R
- Rational Rose
- Ruby
- Rust
- Scala
- Scrum Master
- SFML
- SharePoint
- SignalR
- silver light
- SQL Server
- Stimulsoft Reports
- Telerik
- UML
- VB.NET&VB6
- Vue 3
- WPF
- Xml
- آردوینو
- آموزش های پروژه محور
- آیونیک
- اتوکد
- الگوریتم تقریبی
- الگوریتم نویسی و فلوچارت
- امنیت
- اندروید
- اندروید استودیو
- انیمیشن سازی
- بازی سازی با Scratch
- بک ترک
- بیسیک فور اندروید
- پایتون
- پرولوگ
- پریمیر
- جاوا
- جاوا اسکریپت
- جنگو
- جوملا
- دارت
- دلفی
- دوره های رایگان پیشنهادی
- زامارین
- سئو
- ساخت CMS
- ساخت اتوران
- ساختمان داده ها
- سی شارپ
- شبکه و مجازی سازی
- طراحی الگوریتم
- طراحی بازی
- طراحی وب
- فتوشاپ
- فریم ورک codeigniter
- فلاتر
- کاتلین
- کامپایلرها
- کانستراکت
- کریستال ریپورت
- کلوژر
- گوگل آنالیتیکس
- گیت
- لاراول
- مای بی بی
- مایکروسافت پروجکت
- متریال دیزاین
- متلب
- معماری کامپیوتر
- مهندسی اینترنت
- میکروتیک
- نود جی اس
- نیوک
- هوش مصنوعی
- ویبولوتین
- ویژوال استودیو
- یونیتی
- کتاب های آموزشی
- Ada
- Ajax
- Android
- ASP.NET
- ASP.NET Core
- AVR
- clips
- CNC
- COBOL
- CQRS
- Cython
- Dreamweaver
- Elixir
- Entity Framework 4.0
- Erlang
- Go
- Groovy
- Haskell
- LINQ
- Lua
- Matlab
- MFC
- Node.js
- PERL
- php
- PLC
- Prolog
- React
- Rust
- Scala
- SFML
- SharePoint
- silver light
- VHDL
- VMware
- WinJS
- Workflow
- WPF
- XHTML
- Yii Framework
- اتوکد
- اچ تی ام ال
- اسمبلی
- اکتیو ایکس
- الگوریتم و فلوچارت
- انگولار
- اوبونتو
- اوراکل
- بازی سازی
- بانک اطلاعاتی
- برنامه نویسی سوکت
- برنامه نویسی موبایل
- بک ترک
- پاسکال
- پایان نامه
- پایتون
- پرولوگ
- جاوا
- جاوا اسکریپت
- جی کوئری
- حوملا
- داده کاوی
- دلفی
- رباتیک
- روبی
- زبان ماشین
- سئو
- ساختمان داده ها
- سایر کتاب ها
- سخت افزار
- سوئیفت
- سی اس اس
- سی پلاس پلاس
- سی شارپ
- سیستم عامل
- سیستم های خبره
- شبکه و مجازی سازی
- شبیه سازی کامپیوتر
- طراحی الگوریتم
- فتوشاپ
- فریم ورک گتنا
- کاتلین
- کالی لینوکس
- کریستال ریپورت
- گزارش کارآموزی
- گوگل
- لیسپ
- متلب
- مقاله
- مهندسی نرم افزار
- نیوک
- هوش مصنوعی
- وب مستر
- ویژوال بیسیک
- نرم افزار و ابزار برنامه نویسی
- وردپرس