在Visual Basic中，有如下程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer,c As Integer
Dim d As Integer,z As Integer
a="Val(Text1" Text):b=Val(Text2.Text):c=Val(Text3.Text)
d=max(a,b)
z=max(d,c)
Text4,Text=Str(d)
Text5,Text=Str(z)
End Sub
Function max(x As Integer,y As Integer) As Integer
If x>y Then max="x" Else max=y
End Function
分析该程序段，下列说法正确的是（   ）

A．该程序中包含了两个自定义函数

B．在函数max中定义了两个整数型参数

C．在textl，text2，text3中输入数据后程序即被执行

D．函数max的返回值是字符串类型