女朋友的作业,我没时间接触VB,想请各位帮忙写个小程序。

解决方案 »

  1.   

    设录入为N
    从 for i = 1 to int(sqr(N)) 循环处理
    如果 N/i  = int(N/i) 说明N能被i整除, 则 i 和 N/i 都是 N的因子,进行输出 (注意i=N/i的情况),继续循环下一个直至结束如果你用C,这件事情很简单。
    代码就不给了,毕竟那是你的女朋友。另外你的截图里,既然1算其中一个因子,为毛45不算?
      

  2.   

    所以,问问题的时候就不要先把自己弄得很无辜的样子,显得你会,只不过是语言不通的问题。
    这就像在和朋友聊天的时候说:我有一个朋友balabalabala……你们觉得他应该怎么做。 一听就知道这是说自己的事情,大家七嘴八舌识破不戳破而已。
      

  3.   

    代码:Private Sub Command1_Click()
        Dim colDivisors As New Collection
        Dim i As Integer
        For i = 1 To Text1 - 1
            If Text1 Mod i = 0 Then
                colDivisors.Add i
            End If
        Next
        
        Label2.Caption = "共有" & colDivisors.Count & "个因子."
        
        Text2 = ""
        For i = 1 To colDivisors.Count
            Text2 = Text2 & colDivisors(i) & "  "
        Next
    End Sub运行示例:下载地址:
    链接:https://pan.baidu.com/s/1Bvgp_Y0_jqFWKDJw7Nht6g 
    提取码:bv95 
      

  4.   

    会C语言的人不会VB,就好像开大卡车的司机说自己不会开小汽车一样奇怪。我记得学C语言的时候,老师都会让大家做一个Basic的解释器。对于合格的C程序员,别说Basic了,做一个Basic的解释程序都应该不是问题才对。