VB6.0最小最大值基础教程
最小最大值的 VB6.0 基础教程,写得还挺实在,代码也不复杂。嗯,一开始先假设个初始最大值,用个循环去比对,谁大谁上位。平时写小工具或者随机数挺方便,响应也快。
讲真,Private Sub那段代码比较短小,核心就几行:
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 "最大值="; Max
End Sub
随机生成 10 个100~200之间的数,看哪个最大。思路也简单,就是先有个假设,再对比替换。
要是你还想研究其他最值写法,可以去看看VB 简单教程或者Visual Basic 的教程,思路都差不多,但写法上有点小区别。
平常写报表、工具或统计小脚本,用这种思路还挺香。如果你懒得敲代码,也能直接参考里头的示例。
3.29MB
文件大小:
评论区