VB有没有求最大值函数
VB里面有没有类似于SQL里面的MAX函数,直接求一组数的最大值。。不想自己编写求最大值的函数。望告之。。谢谢。。...
VB里面有没有类似于SQL 里面的MAX函数,直接求一组数的最大值。。不想自己编写求最大值的函数。
望告之。。谢谢。。 展开
望告之。。谢谢。。 展开
9个回答
展开全部
以前 5.0 中有 Max() 和 Min() 函数用来求最大/小值;但 6.0 后没有了,你只能自己写,
参考:
Public Function Max(ByRef SZtmp()) As Double
Dim i%
Max = 0
For i = LBound(SZtmp) To UBound(SZtmp)
If CDbl(SZtmp(i)) > Max
Then Max = CDbl(SZtmp(i))
Next i
End Function
Visual Basic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说,VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
对象与类
对象(Object)
Visual Basic 具有“面向对象”的特性,Visual Basic 应用种程序的基本单元是对象,用 Visual Basic 编程就是用“对象”组装程序。这种“面向对象”的编程方法与传统的全部用代码编制程序的方法有很大区别,就像用集成电路芯片组装电视机和用三极管,二极管组装电视机的区别一样。显然,“面向对象”的编程方法比传统的编程方法更简单,更方便,并且编写出的程序也更加稳定。因此,“对象”可以被看做 Visual Basic 程序设计的核心。
在 Visual Basic 程序设计中,对象中还可以包含头,手,腿,脚等部位,其中的每个部位又可以单独作为作为被研究的对象。在 Visual Basic 程序设计中,整个应用程序就是一个对象,应用程序中又包含着窗体(Form),命令按钮(Command),菜单(Menu)等对象。
类(Class)
在 Visual Basic 中,对象是由类创建的,因此对象可以说是类的具体实例,这就好比是蛋糕和做蛋糕的模具之间的关系。
各种不同的对象分属于各种不同的种类。同一类对象可能具有一些不同的特征(或是说同一类对象不一定具有完全相同的特性);具有某些相同的特性的对象,不一定是同一类对象,这就好比是人和猴子虽然都有身高、性别等特征,但二者之间还存在着智商、语言等特性差异,这两个对象之间的特性相差很多,根本就不能算是同一类对象。而男人和女人,虽然有着性别、生理等方面的差异,但他们绝大部分特性相同,可以算是同一种类。由此,可以归结为一句话:同一类对象的绝大部分特性相同。
参考:
Public Function Max(ByRef SZtmp()) As Double
Dim i%
Max = 0
For i = LBound(SZtmp) To UBound(SZtmp)
If CDbl(SZtmp(i)) > Max
Then Max = CDbl(SZtmp(i))
Next i
End Function
Visual Basic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说,VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
对象与类
对象(Object)
Visual Basic 具有“面向对象”的特性,Visual Basic 应用种程序的基本单元是对象,用 Visual Basic 编程就是用“对象”组装程序。这种“面向对象”的编程方法与传统的全部用代码编制程序的方法有很大区别,就像用集成电路芯片组装电视机和用三极管,二极管组装电视机的区别一样。显然,“面向对象”的编程方法比传统的编程方法更简单,更方便,并且编写出的程序也更加稳定。因此,“对象”可以被看做 Visual Basic 程序设计的核心。
在 Visual Basic 程序设计中,对象中还可以包含头,手,腿,脚等部位,其中的每个部位又可以单独作为作为被研究的对象。在 Visual Basic 程序设计中,整个应用程序就是一个对象,应用程序中又包含着窗体(Form),命令按钮(Command),菜单(Menu)等对象。
类(Class)
在 Visual Basic 中,对象是由类创建的,因此对象可以说是类的具体实例,这就好比是蛋糕和做蛋糕的模具之间的关系。
各种不同的对象分属于各种不同的种类。同一类对象可能具有一些不同的特征(或是说同一类对象不一定具有完全相同的特性);具有某些相同的特性的对象,不一定是同一类对象,这就好比是人和猴子虽然都有身高、性别等特征,但二者之间还存在着智商、语言等特性差异,这两个对象之间的特性相差很多,根本就不能算是同一类对象。而男人和女人,虽然有着性别、生理等方面的差异,但他们绝大部分特性相同,可以算是同一种类。由此,可以归结为一句话:同一类对象的绝大部分特性相同。
展开全部
以前 5.0 中有 Max() 和 Min() 函数用来求最大/小值,但 6.0 后没有了,你只能自己写,参考:
Public Function Max(ByRef SZtmp()) As Double
Dim i%
Max = 0
For i = LBound(SZtmp) To UBound(SZtmp)
If CDbl(SZtmp(i)) > Max Then Max = CDbl(SZtmp(i))
Next i
End Function
Public Function Max(ByRef SZtmp()) As Double
Dim i%
Max = 0
For i = LBound(SZtmp) To UBound(SZtmp)
If CDbl(SZtmp(i)) > Max Then Max = CDbl(SZtmp(i))
Next i
End Function
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
VB6.0没有这样的函数,不过你可以自己编程 例如:人以输入10个数,求最大值及所在位置。
Private Sub form_click()
dim a(1to10)as integer, i as integer
dim max as integer ,l as integer
for i=1to 10
a(i)=val(inputbox("请输入a("&str(i)&")的值"))
next i
max=a(i)
l=1
for i=2to9
if a(i)>max then
max=a(i)
l=i
end if
next i
print max,l
end sub
Private Sub form_click()
dim a(1to10)as integer, i as integer
dim max as integer ,l as integer
for i=1to 10
a(i)=val(inputbox("请输入a("&str(i)&")的值"))
next i
max=a(i)
l=1
for i=2to9
if a(i)>max then
max=a(i)
l=i
end if
next i
print max,l
end sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
有啊
就是 输入 一堆数 让它自己分出 MAX =
是不是
就是 输入 一堆数 让它自己分出 MAX =
是不是
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
没有
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询