高校问答现在代理无本赚钱买卖:虾米求救！！！帮忙做做VB题，谢谢！
来源：百度文库 编辑：高校问答 时间：2024/05/13 03:06:45
编程题
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