赞 太阳的化身 2星
共回答了77个问题采纳率：93.5% 评论
窗体新建一个按钮Command1和文本框Text1 PrivateSubCommand1_Click() DimiAsInteger,resultAsString'定义整型变量i,字符串变量result Fori=1ToText1.TextStep1'循环过程开始将i的最小值和最大值限定为1和Text1的内容，步距为1 result=result&InputBox("")'弹出InputBox并且与之前的合并赋给result Next'循环过程完毕 Clipboard.Clear'清空剪贴板 Clipboard.SetTextresult'将剪贴板内容设置为result EndSub 运行程序后在文本框里面输入要弹出的InputBox个数即可。
18小时前
33
可能相似的问题
-
查看 93回答 1
-
查看 74回答 1
-
查看 288回答 1
-
查看 546回答 1
-
查看 402回答 1
-
查看 396回答 1
-
查看 30回答 1
-
查看 428回答 1
-
查看 21回答 1
-
查看 482回答 1
猜你喜欢的问题
-
2天前1个回答
-
2天前1个回答
-
2天前1个回答
-
2天前2个回答
-
2天前1个回答
-
2天前2个回答
热门问题推荐
-
2个月前1个回答
-
3个月前2个回答
-
4个月前1个回答
-
1个月前3个回答
-
4个月前1个回答
-
3个月前2个回答
-
1个月前1个回答
-
1个月前1个回答
-
2个月前1个回答