Skip to content

Instantly share code, notes, and snippets.

@canokay
Created November 11, 2018 21:26
Show Gist options
  • Save canokay/4f82248053bd23d517005ed0eae016cc to your computer and use it in GitHub Desktop.
Save canokay/4f82248053bd23d517005ed0eae016cc to your computer and use it in GitHub Desktop.
Public Class Form1
Dim son As String
Dim s1, s2 As String
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
s1 = CInt(TextBox1.Text)
s2 = CInt(TextBox2.Text)
son = s1 & "/" & s2 & "=" & ((s1 / s2) + 40)
MsgBox(son)
End Sub
End Class
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment