Answer:
Module Program
Sub Main()
Dim A, B, C, x As Double
A = 2.0
B = 3.0
C = 7.0
x = (C - B) / A
Console.WriteLine($"Solution for {A}x + {B} = {C} is x = {x}")
Console.ReadKey()
End Sub
End Module
Step-by-step explanation:
For A=0, the program wouldn't work, because then any x would be a solution.