这个VB代码可以吗（点击详情）

2019-05-07 19:43发布

站内问答 / 电脑网络
811 1 4
'算一个数的因数
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条回答
Sorrowful山賊 - 这个人很懒，什么都没留下
1楼 · 2019-05-07 20:29.采纳回答

逻辑上基本正确

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

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

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

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

text1.text=text1.text &  " " i

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

以下是测试

一周热门 更多>

相关问题