...box输入个人姓名,性别,学号,用消息框显示输入信息,同时将信息保存至...

发布网友发布时间：2024-03-02 21:06

共1个回答

热心网友时间：2024-08-17 20:01

Dim xtemp() As String
xtemp = Split(InputBox("请输入学生姓名、性别、学号信息，以英文逗号分开：", ""), ",")
For i = 0 To UBound(xtemp)
Sheet1.Cells(1, i + 1).Value = xtemp(i)
Next
上面代码比较简单，没有考虑容错问题；你控制不了别人用的时候输入的内容，比如你是要求别人输入三个内容、以英文逗号分开，但实际输入的时候别人可能只输入了两项、分隔符号也有可能是其他的（比如在输入汉字后没转换输入法就输了逗号），这些都是在编程的时候要考虑的。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com