查人人中国名人网美国臂力最大的人:虾米求救！！！帮忙做做VB题，谢谢！
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/05 22:50:42
编程题
1、把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框Text1中显示出来
2、用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。
1、把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框Text1中显示出来
2、用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。
1.
open "smtext1.txt" for input as #1
Input #1, s
Text1.Text = s
close #1
2.
a = array(1,2,3,4,5,6,7,8)
do until i = 7
max=a(i)
if max < a(i) then max = a(i)
i = i+1
loop
msgbox "最大的是"& max