这个VB代码可以吗(点击详情)

2019-05-07 19:43发布

'算一个数的因数
dim a,i as long
text1.text=a & "的因数有:"
for i=1 to a
if a mod i=0 then
text1.text=text1.text & i
end if
next i
1条回答

逻辑上基本正确

1 你的程序必须在某个子程序或函数中

2,你的a没有定义,必须赋个值或用input输入

3。你的Form上必须的text1这个控件

4。text1.text=text1.text & i最好改为

text1.text=text1.text &  " " i

否则因子全连接在一起了,看不出结果

以下是测试

一周热门 更多>