文件名称：最小、最大值-VB基础教程入门全篇精讲
文件大小：2.54MB
文件格式：PPT
更新时间：2024-05-13 00:45:41
基础教程 入门到精通 vb6.0
5.最小、最大值 在若干个数中求最大值，一般先假设一个较小的数为最大值的初值，若无法估计较小的值，则取第一个数为最大值的初值；然后将每一个数与最大值比较，若该数大于最大值，将该数替换为最大值；依次逐一比较。 例 随机产生10个100～200之间的数，求最大值。 Private Sub Command1_Click() Max = 100 For i = 1 To 10 x = Int(Rnd * 101 + 100) Print x; If x > Max Then Max = x Next i Print Print "最大值="; Max End Sub