1.设计一个表单,每次按增加按钮,文本框数值加1,文本框初始值为0.写代码就好.

1.设计一个表单,每次按增加按钮,文本框数值加1,文本框初始值为0.写代码就好.
2.编程输出1至100的自然整数中个位数为0的数值,并计算其个数.(可用right()函数取个位数判断是否为0)
第一道题是正整数
羽羽_ff 1年前 已收到1个回答 举报

知味者 幼苗

共回答了12个问题采纳率:91.7% 举报

1.假如文本框为text1,默认的value为0,增加的click代码为:
thisform.text1.value=thisform.text1.value+1
2.
clear
s=0
for i=1 to 100
if right(alltrim(str(i)),1)=="0"
alltrim(str(i))+"的个位数为0."
s=s+1
endif
endfor
"1至100的自然整数中个位数为0的数有"+alltrim(str(s))+"个."

1年前 追问

6

羽羽_ff 举报

第一题不可以啊,什么情况呢。可以再看看么?非常感谢

举报 知味者

看你的默认的值是什么数据类型呢? 如果是数值型的,就是我上面写的,你再看下你有没有设置文本框的默认值,没有的话,就在form1的init事件输入: thisform.text1.value=0 如果是字符型的呢,就要改成: thisform.text1.value=alltrim(str(val(thisform.text1.value)+1))
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 17 q. 0.027 s. - webmaster@yulucn.com