设计表单FORM4.SCX，可以在文本框中输入任意正整数后敲回车键再输入，直到输入0时结束，统计输入的这组数的个数，并显示平均值。双击表单空白处，可以关闭表单。


我添加了一个text 一个command 一个label（用来显示结果）
我把代码写在 command里面

y=0
z=0
p=0
x=thisform.text1.value
if x!=0
   y=y+1
   p=p+x
   thisform.text1.value=x+chr(13)
   z=p/y
else
    thisform.label1.caption='个数为'+str(y)+'平均值为'+str(z)
endif
   
知道这个代码有错误，但是在不知道怎么改了

还是不对。这样都把x改为字符型了，怎么参加计算

还是和题目要求有点不符。    可以在文本框中输入任意正整数后敲回车键再输入
这个敲回车键再输入没有做到。
另外每次我按照你的代码写上去，结果我的都运行不出来，但你的都可以运行

还是不行

运行的时候显示找不到变量  NKEYCODE
而且我按回车键的时候，就会跳到command按钮上