private sub button7_click(byval sender as system.object,byval e as system.eventargs)handles button7.click dim str as string=" str=inputbox("请输入要反转的数字") dim pl as string=strreverse(str) textbox6.text=val(pl).tostring end sub 20210311
我不知道你这个问题是用来解决什么的(好吧,我看这倒真的是双色球,但明显这是天真的双色球),首先,不是问题难不难的问题,而是这个结果太庞大,而且显得毫无意义。6c33 x 1c6(且按照你写的这么算),结果为1107568 x 720=7,9744,8960(种情况). 此题从数学意义上来说结果已经很明确,你要得到...