下面一段代码的作用是 当用户输入x,y的值 显示x^3+y^3的值
(默认是vb)

<%

 function q(x,y)

 q=x*x*x+y*y*y

 end function

 dim x,y

 x=request.form("x") '用户没有输入x值为空怎么判断 x是字符串怎么判断

 y=request.form("y")

 response.write(x&"^3+"&y&"^3="&q(x,y))
%>
<form name="form1" method="post" action="vbxy.asp">
x=<input type="text" name="x">
y=<input type="text" name="y">
<input type="submit" name="submit" value="计算">
</form>

有两个问题不能解决
2 如何判断用户没有输入
1 如何判断用户输入的是字符还是数字

您看过相关教程没？

<%
function q(x,y)
q=x*x*x+y*y*y
end function
dim x,y
x=request.form("x") '用户没有输入x值为空怎么判断 x是字符串怎么判断
y=request.form("y")
Response.Write "<script language=javascript>"
IF X="" Then
   Response.Write "alert('x不能为空');"
End IF
IF IsNumber(X)=False Then
   Response.Write "alert('X非数字');"
End IF
Response.Write "</script>"
response.write(x&"^3+"&y&"^3="&q(x,y))
%>
<form name="form1" method="post" action="vbxy.asp">
x=<input type="text" name="x">
y=<input type="text" name="y">
<input type="submit" name="submit" value="计算">
</form>

谢谢楼上的
IsNumber(X)在我的机器上不能用  改成这个了IsNumeric(X)
代码如下能达到预期的效果了

<%
function q(x,y)
q=x*x*x+y*y*y
end function
sub c()
dim x,y
x=request.form("x") '用户没有输入x值为空怎么判断 x是字符串怎么判断
y=request.form("y")
IF X="" Then
   exit sub
End IF
IF IsNumeric(X)=False or IsNumeric(y)=False Then
   Response.Write "请输入数字"
   exit sub
End IF
Response.Write "</script>"
response.write(x&"^3+"&y&"^3="&q(x,y))
end sub
call c()
%>
<form name="form1" method="post" action="vbxy.asp">
x=<input type="text" name="x">
y=<input type="text" name="y">
<input type="submit" name="submit" value="计算">
</form>