vb综合性设计实验报告(共5页).doc

文档介绍：精选优质文档-----倾情为你奉上
精选优质文档-----倾情为你奉上
专心---专注---专业
专心---专注---专业
精选优质文档-----倾情为你奉上
专心---专注---专业
综 合 性 实 ate Sub Command5_Click()
= & "5"
End Sub
Private Sub Command6_Click()
= & "6"
End Sub
Private Sub Command7_Click()
= & "7"
End Sub
Private Sub Command8_Click()
= & "8"
End Sub
Private Sub Command9_Click()
精选优质文档-----倾情为你奉上
精选优质文档-----倾情为你奉上
专心---专注---专业
专心---专注---专业
精选优质文档-----倾情为你奉上
专心---专注---专业
= & "9"
End Sub
Private Sub Command11_Click()
= & "0"
End Sub
Private Sub Command10_Click()
op1 = Val()
operator = "+"
= ""
End Sub
Private Sub Command12_Click()
op1 = Val()
operator = "-"
= ""
End Sub
Private Sub Command13_Click()
op1 = Val()
operator = "*"
= ""
End Sub
Private Sub Command14_Click()
op1 = Val()
operator = "/"
= ""
End Sub
Private Sub Command15_Click()
op2 = Val()
If operator = "+" Then
= op1 + op2
ElseIf operator = "-" Then
= op1 - op2
ElseIf operator = "*" Then
= op1 * op2
ElseIf operator = "/" Then