使用VB求数的约数

2025-04-19 08:31:33

1、打开VB软件，进入界面，选择“打开”

2、找到文本框按键，拖动鼠标建立文本框

3、双击空白处，进入代码界面。

4、输入代码，Dim a%, i%a = InputBox("请输入一个正整数")For i = 2 To a - 1If a Mod i = 0 ThenText1.Text = iEnd IfNext

5、按运行按钮，进行检验。

6、进入运行状态，输入数字

7、保存

声明：本网站引用、摘录或转载内容仅供网站访问者交流或参考，不代表本站立场，如存在版权或非法内容，请联系站长删除，联系邮箱：site.kefu@qq.com。