Fungsi IF Else Proses Login dengan Visual Basic

Proses Login dalam Visual Basic dengan fungsi IF ELSE - Sekarang saya akan buat contoh sintaks untuk proses Login sederhana menggunakan Visual Basic.
Seperti halnya fungsi dalam kebanyakan sosial media yang ada, mereka pasti menyediakan suatu proses pendeteksi pengguna yang dimana user telah melakukan proses
pendaftaran sebelumya dan data akan disimpan di dalam database, namun hal itu masih terlalu jauh untuk pengenalan Visual Basic yang saya posting (karena saya masih newbie) :D
Dan sekarang disini saya akan coba menerapkan proses login sederhana beserta sintaks kode menggunakan Visual Basic berbasis console.

Pertama-tama pastikan Path dan Classpath telah disetting pada komputer kamu, cara setting Path dan Classpath disini.

Berikut sintaks kode Program Proses Login dalam Visual Basic

Imports System
Module latmod2
Sub Main()
Dim Username As String
Dim Password As String
Console.WriteLine("Proses Login")
Console.WriteLine()
Console.Write("Username : ")
Username = Console.ReadLine()
Console.Write("Password : ")
Password = Console.ReadLine()
If (Username = "Ricky") And (Password = "2011092151") then
Console.WriteLine("=====================")
Console.WriteLine("Selamat datang " & Username)
Console.WriteLine("Login SUKSES")
Else
Console.WriteLine("=====================")
Console.WriteLine("Username dan Password tidak tersedia")
Console.WriteLine("Login GAGAL")
End If
Console.ReadLine()
End Sub
End Module

Setelah selesai, lakukan kompilasi kemudian running program, cara klik disini.
Bila sukses hasilnya seperti berikut :
rickusriana.blogspot.com

Karena dalam proses login terdapat dua kondisi - IF ELSE - maka, apabila username dan password yang dimasukkan salah maka hasilnya seperti berikut.
rickusriana.blogspot.com


2 komentar

  1. wah dapet ilmu baru nich tentang visual basic :)

    BalasHapus
  2. :) makasih juga ya udah mampir kesini, semoga bermanfaat.. maaf blog newbie :D

    BalasHapus

Navigation

Image Link [https://lh3.googleusercontent.com/LG-pOB_ZkbfJUKAU34G6X4zEP1E0x_grgOPGu6VqvoQn2eUcZSTC0Xxrapx_A1puKXsRUiKTzq-Ya1SQCtYnrJ60weehK4WniCJ1wjXK5Sp5KS4_zfgC0NwZD2bStfXrvCBNRely-fmkp13WnqZ83YpiIqcUDnATK6zgT599_YfX29VpYRmCMXNLZm0Xm2j1uNrJRc-gAUbXQGW2Clx_L1p6VtTr_UsgdXXIeW2Q2pkk0-K93F_VMTazbqO6mhWIGkqRrSh4F7-_GsL1xPi-XhOWAvH_M6lAljxx46TQReYkKRlpQXP9H1Lr7w9Z2nqENYMUTgAivqdnToFcamwyuoKvoaJfwjF8SZBjoYbGu4Xv_dI2ceYsJSt-Qlf6JyvfgJR0wxFMQCefHt5n2WO7ByjdoRK0VN6rQyYajB6rsMTYKkKv_QohQbmjdPgeC8PJQw9TGJucm1mWE7ykyYjtmC_7DomyTiRTood5dEFYUzohCA0wNHNyCeo9wbDnx7BNl4G6hAZNBTPEXL_vNbzyt2ySYt2_kNLAiAzh7Y1u00GPtakyizlrGInLMTyMActZN4eGy7rzmCJZmT_eCt153L6mra-qrTAsA3WaPUGnWILf_Sk5=w547-h648-no] Author Name [Ricky Kusriana Subagja] Author Description [Is typing...] Facebook Username [rickykusriana] Twitter Username [rickykusriana] GPlus Username [103003133964044414690] Pinterest Username [#] Instagram Username [rickykusriana]