2009年2月27日 星期五

100以內數字相除

image

image

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text < 100 Then
            If TextBox2.Text < 100 Then
                TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)

            End If
        End If
    End Sub
End Class

(參考20133陳怡娟的程式)

沒有留言:

張貼留言