Dim x As String,y As String
Dim ans As Integer
x="5":y="20":ans=0
If x>y Then ans=Val(x) Else ans=Val(y)
ans=ans +Val(x+y)
Text1.Text=Str(ans)
执行该程序段后,文本框Text1中显示的内容是
微信扫码预览、分享更方便