vb求助~~~ 将整数分解成质数相乘的形式~~操作界面如下 不要inputbox print啥的!界面如图

[复制链接]
查看11 | 回复1 | 2011-12-11 13:23:44 | 显示全部楼层 |阅读模式
Option ExplicitPrivate Sub Command1_Click()Dim i, n As Integer, str As String
n = Val(Text1.Text)again:For i = 2 To n
If n Mod i = 0 Then
str = str & i & "*"
n = n / i
GoTo again
End IfNext iLabel2.Caption =...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行