Menyelesaikan 2 persamaan aljabar sederhana pada VB

Pada kesempatan ini penulis ingin berbagi ilmu untuk menyelesaikan salah satu persamaan aljabar sederhana pada Program Visual Basic.
--------------------
a x + b y = c
p x + q y = r
--------------------
Untuk itu mari ikuti langkah-langkah berikut :

1. Buka Visual Basic Editor pada Ms. Excel
2. Buat Userform

3. Masukkan Perintah berikut

4. Hasil

Penjelasan Algoritma Pemrograman :

--------------------
a x + b y = c
p x + q y = r
--------------------

Sederhananya dengan substitusi nilai x dalam y pada persamaan 1, yaitu x = ( c - by ) / a
Lalu x pada persamaan kedua disubtitusikan dengan nilai x di atas menjadi,

p ((c-by)/a) + qy = r
----------------------- di kali dengan a
p(c-by) + aqy = ar
pc -pby + aqy = ar
y (aq -pb) = ar -pc
Selanjutnya langkah perhitungan di atas,

Selesai, Semoga Bermanfaat ya