Langsung ke konten utama

Free vpngeeks Premium Accounts

vpngeeks VPNGeeks Review View offers » URL vpngeeks.com Reconnects unlimited Price monthly $ 8.00 Price 6 months $ 39.96 Price 12 months $ 60.00 Servers 7 IPs unknown Trial No Payment Paypal, Credit Card,, Amazon Payments, Payza, Skrill Clients Windows, Mac OS, Linux, iPhone, iPad Logfiles Yes Support Contact form Protocols OpenVPN, PPTP Filesharing Allowed Traffic Limit No Go to vpngeeks.com VPNGeeks – 29 Total Ratings with 1.00 / 5 possible Rating Points. Vpngeeks.com VPN Service Provider How To Download Free vpngeeks Premium Account Link 1 Free vpngeeks Premium Account Link 2 Free vpngeeks Premium Account Link 3 Free vpngeeks Premium Account Link 4 Free vpngeeks Premium Account Link 5 Free vpngeeks ...

Cara Membuat N Element Pada View Menggunakan Kode B4a | Tutorial B4a Indonesia

Cara Membuat N Element Pada View Menggunakan Kode B4a | Tutorial B4a Indonesia


Pada dasarnya membuat view bisa dilakukan pada Designer, namun apa jadinya jika kalian mendapatkan kasus khusus, seperti membuat 1000 element panel atau switch pada halaman views tersebut? Sebenarnya kalian bisa membuat satu persatu sebanyak 1000 kali dan mengatur propertiesnya sebanyak 1000 kali juga.
Ya , bagus... besoknya kalian akan dipecat karena tidak efektif dalam melakukannya.
Selain membosankan, tentu akan memakan waktu jika melakukan pekerjaan berulang dengan pola yang sama tersebut.

Nah, karna itulah diberikan solusi membuat Layout menggunakan kode:
Kita ambil contoh kasus, dimana kalian diminta untuk membuat switch sebanyak N buah. Terserah berapa N nya karena kodenya akan tetap sama:

1.Kalian menggunakan Designer
Jika kalian menggunakan Designer, maka yang kalian lakukan lebih kurang seperti gambar dibawah ini:
Dan kalian tinggal copy dan atur sebanyak 1000 kali hehehe.

2. Kalian menggunakan kode
Contoh kodenya bisa kalian lihat dibawah ini:

Sub Globals
Private B4XSwitch1 As B4XSwitch
End Sub

Sub Activity_Create
(FirstTime As Boolean)
For i = 1 To 20
AddSwitch(50dip, 40dip * i, i)
Next
End Sub

Sub AddSwitch
(Left As Int, Top As Int, Tag As Object) As B4XSwitch
Activity.LoadLayout("B4XSwitch")
B4XSwitch1.mBase.Left = Left 'B4XSwitch1 global variable will point to the last one added
B4XSwitch1.mBase.Top = Top
B4XSwitch1.Tag = Tag
Return B4XSwitch1
End Sub


Sub B4XSwitch1_ValueChanged
(Value As Boolean)
Dim switch As B4XSwitch = Sender
Log(switch.Tag)
End Sub

Kesimpulannya:
Kalian lebih kurang akan mendapatkan hasil seperti dibawah ini jika menggunakan dan menjalankan kode yang ada diatas tersebut:

Tag: Tutorial B4a Indonesia, Tutorial B4a Pemula, Contoh Aplikasi B4a, B4a Bahasa Indonesia, Forum B4a Indonesia

Cara Membuat N Element Pada View Menggunakan Kode B4a | Tutorial B4a Indonesia

Postingan populer dari blog ini

Free vpntunnel Premium Accounts

vpntunnel VPNTunnel Review View offers » URL vpntunnel.com Reconnects unlimited Price monthly € 5.00 Price 6 months $ 27.00 Price 12 months $ 49.20 Servers unknown IPs 10000 Trial No Payment Paypal, Payson Clients Windows, Mac OS, Linux, iPhone, iPad, Android Logfiles No Support Ticket Support, Email Support Protocols PPTP, OpenVPN Filesharing Allowed Traffic Limit No Go to vpntunnel.com VPNTunnel – 29 Total Ratings with 0.05 / 5 possible Rating Points. Vpntunnel.com VPN Service Provider How To Download Free vpntunnel Premium Account Link 1 Free vpntunnel Premium Account Link 2 Free vpntunnel Premium Account Link 3 Free vpntunnel Premium Account Link 4 Free vpntunnel Premium Account Link 5 Free vpntunn...

Free kepard Premium Accounts

kepard Kepard Review View offers » URL kepard.com Reconnects unlimited Price monthly $ 7.00 Price 6 months $ 37.98 Price 12 months $ 35.04 Servers 15 IPs unknown Trial 30 min Free Trial Account Payment Credit Card, Paypal Clients Mac OS, Windows, Linux, iPhone, iPad, Android Logfiles No Support Ticket Support, Email Support Protocols PPTP, L2TP, IPSec, OpenVPN Filesharing Partial (in Netherlands) Traffic Limit No Go to kepard.com Kepard – 29 Total Ratings with 0.10 / 5 possible Rating Points. Kepard.com VPN Service Provider How To Download Free kepard Premium Account Link 1 Free kepard Premium Account Link 2 Free kepard Premium Account Link 3 Free kepard Premium Account Link 4 Free kepard Premium Accou...

Free usaip Premium Accounts

usaip UsaIP Review View offers » URL usaip.eu Reconnects unlimited Price monthly $ 7.99 Price 6 months $ 47.94 Price 12 months $ 75.00 Servers 35 IPs unknown Trial Money back guarantee Payment Credit Card, Paypal, Pecunix, Alertpay Clients Windows, Mac OS, Linux, iPhone, iPad, Android Logfiles Yes Support Phone support, email support, ICQ, Yahoo! and Wlife Protocols OpenVPN, PPTP, SSTP, L2TP Filesharing partially (in Russia, Luxembourg, Czech Republic) Traffic Limit No Go to usaip.eu UsaIP – 29 Total Ratings with 1.70 / 5 possible Rating Points. Usaip.eu VPN Service Provider How To Download Free usaip Premium Account Link 1 Free usaip Premium Account Link 2 Free usaip Premium Account Link 3 Free usaip ...