Function lsc(x,y) As Integer
If x>y Then
lsc=x-y
Else
lsc=y-x
End If
End Function
Private Sub Command1_Click( )
Dim a1 As Integer,a2 As Integer
a1=Val(Text1.Text)
a2=Val(Text2.Text)
Label1.Caption=
End Sub
要实现上述功能,程序画线处应填入的语句为( )
微信扫码预览、分享更方便