题目是输入10个整数.来判断最大最小值
我想用一个文本框来接受输入的数字..输入的数字之间用空格分开..我定义了一个 通用 数组来存放输入的10个数.然后判断..问题是怎么从这个文本框中读出用户输入的10个整数啊...是写到 KeyPress 事件里吗? 要怎么判断啊?
谢谢大家了!

放个按钮
Dim arrNumbers() As Integer
arrNumbers=Split(Text1.Text," ")
然后可以用arrNumbers(i) i=0 to 9 来引用。

路过看看

split函数 好象只能用于 字符串类型的数组 所以应该把二楼的 数组类型改成 string就好了!
一般情况是写到按钮事件里的

呃 假设不出错吧……应该可以自动转换吧……我猜的

二楼的思路问题！

本来很简单 啊
dim ArrTemp() as string
dim i as long
dim maxNum as long
arrtemp=split(text1," ")
maxNum=Arrtemp(lbound(arrtemp))
for i=lbound(arrtemp) to ubound(arrtemp)
if maxnum<arrtemp(i) then
maxnum=arrtemp(i)
end if
next