今天第一天 學 VB 看書做了簡單的程式
我是 用 VB 2005 Express
簡單的加減運算
需要 3個標籤 3個文字方塊 2個按鈕 分別作 加法與 減法的計算
以下為程式碼
Public Class Form1
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
End Sub
Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
End Sub
Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click
End Sub
Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click
txtOutput.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
End Sub
Private Sub btnSub_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSub.Click
txtOutput.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
End Sub
End Class
做出來會像這個
- Jul 09 Wed 2008 19:36
VB → 簡單加減程式
全站熱搜
留言列表
發表留言