太阳的化身 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个数即可。
6小时前
猜你喜欢的问题
5个月前1个回答
5个月前1个回答
5个月前1个回答
5个月前2个回答
5个月前1个回答
5个月前2个回答
热门问题推荐
1个月前2个回答
3个月前3个回答
4个月前1个回答
1个月前1个回答
2个月前1个回答
4个月前2个回答
2个月前2个回答
1个月前1个回答
1个月前1个回答