🔷 Check SMS Balance (VB.net)

https://www.isms.com.my/isms_balance.php?un=your_username&pwd=your_password

Imports System.Net.Http

Module IsmsBalance

    Private ReadOnly _client As New HttpClient()

    Async Function GetBalanceAsync(username As String, password As String) As Task(Of String)
        Dim url = $"https://www.isms.com.my/isms_balance.php?un={username}&pwd={password}"
        Dim response = Await _client.GetStringAsync(url)
        Return response.Trim()
    End Function

    Sub Main()
        Dim balance = GetBalanceAsync("your_username", "your_password").Result
        Console.WriteLine("SMS Credits Remaining: " & balance)
    End Sub

End Module