在VB编程中,求最大值和最小值?

[复制链接]
查看11 | 回复4 | 2011-10-15 08:35:20 | 显示全部楼层 |阅读模式
回复

使用道具 举报

千问 | 2011-10-15 08:35:20 | 显示全部楼层
你应该是要在一串数中找出最大和最小的你如果知道这串数字DIMa()aslongdimiasintegerdimmaxdimminprivateSUBform_load()a(0)=....(你知道的数字)a(1)=....(你知道的数字)......fori=0to100ifa(i)a(i1)thenmax=a(i)elsemax=a(i1)endifnexti循环完毕最大值就找到赋值在MAX里面min同理endsub
回复

使用道具 举报

千问 | 2011-10-15 08:35:20 | 显示全部楼层
用for循环逐个比较
回复

使用道具 举报

千问 | 2011-10-15 08:35:20 | 显示全部楼层
在线等最小是8,最大是72
回复

使用道具 举报

千问 | 2011-10-15 08:35:20 | 显示全部楼层
dimi,j,max,minj你的数组名i=0;for(ito你数组的最大个数)ifmaxj(i)thenmax=j(i)endififminj(i)thenmin=j(i)endif
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行