Question

VB程序题，急！谢谢！编写程序，从文本框输入x与y的值，在第三个文本框中输出结果：

编写程序，从文本框输入x与y的值，在第三个文本框中输出结果：
F={ Lnx+Lny x>0,y>0
Sinx+Siny x>0,y<=0
Sinx+Cosy x<=0

Answer 1

有图有真相，望采纳。。。。

Answer 2

设Text1和Text2分别为X和Y的输入框，Text3输出结果，另有Command1是计算按钮。
在窗体代码“通用”段编写函数过程：
Private Function F(ByVal X As Double, ByVal Y As Double) As Double
Select Case X
Case Is > 0
If Y > 0 Then
F = Log(X) + Log(Y)
Else
F = Sin(X) + Sin(Y)
End If
Case Else
F = Sin(X) + Cos(Y)
End Select
End Function
'计算按钮事件调用F：
Private Sub Command1_Click()
Text3.Text = F(Val(Text1.Text), Val(Text2.Text))
End Sub