vb 知道一个数想求这个数是哪些数相加等到的

Private Sub Command1_Click()
s = InputBox("请输入一个整数！")

For i = 0 To s / 2
result = result & i & "+" & s - i & "=" & s & vbCrLf
Next
MsgBox result
End Sub

如果只是对整数进行操作，那好办，用双重循环。

n=rnd*100

for i=0 to n
for j=0 to n
if i+j=n then print i;"+";j;"=";j
next
next

编程不是让你求出数。而是用算法让别人看到你求出数的东西。我跟你说个办法。你可以先取比这个数小的随机数。然后在用这个数减去你求出的这个随机数。得到两个数。这两个数不就是你想要的两个数了吗？