Blog Adi Sanjaya Global Techno Solution

Delphi, Mikrokontroler , Embedded system...Menerima Pembuatan alat berbasis mikrokontroller

LightBlog
Responsive Ads Here

Thursday, February 23, 2017

Parsing (pisah) data dengan basic4android dengan SubString2

Bagi anda yang membutuhkan pemisahan data semisal ABCD menjadi karakter karater terpisah dengan basic 4 android sebagai mana aturan di bawah ini :

karakter pertama = A,
karakter kedua = B
karakter ketiga = C
karakter keempat = D

maka anda dapat melakukannya dengan basic4android menggunakan fungsi substring 2
kira kira source code nya menjadi sebagai berikut ini :

Sub ButtonPisah_Click
   
    Dim karakter As String
    Dim karakter1 As String
    Dim karakter2 As String
    Dim karakter3 As String
    Dim karakter4 As String
   
    karakter = EditText1.Text
    karakter1=karakter.SubString2(0,karakter.Length-3)
    karakter2=karakter.SubString2(1,karakter.Length-2)
    karakter3=karakter.SubString2(2,karakter.Length-1)
    karakter4=karakter.SubString2(3,karakter.Length-0)
   
    LabelKarakter1.Text=karakter1
    LabelKarakter2.Text=karakter2
    LabelKarakter3.Text=karakter3
    LabelKarakter4.Text=karakter4
   
   
End Sub

Hasil screen shoot aplikasi Parsing (pisah) data dengan basic4android dengan SubString2 adalah sebagai berikut :



source code Parsing (pisah) data dengan basic4android dengan SubString2 silakan KLIK DISINI


No comments:

Post a Comment

Silakan dikomentari