第二题
设计程序,在窗体上建立 5 个文本框和 1 个命令按钮,利用 4 个文本框输
入 4 个数,单击命乏按钮进行处理,求出这 4 个数中的最大数显示在第 5 个文
本框中]]]]][提示]① 数值的数据类型可以定义为单精度型;②可以参考例 4.2 的
处理方法;也可以分两组数(2 个数为一组)进行比较,再从两组数中的较大
数中求出最大数.
程序如下:
PrivateSubCommand1_Click()'执行
DimmAsSingle,aAsSingle'定义变量为单精度
DimbAsSingle,cAsSingle
DimdAsSingle
a=Val(Text1.Text)'为变量赋值
b=Val(Text2.Text)
c=Val(Text3.Text)
d=Val(Text4.Text)
Ifa>bThen‘利用 if 与 else 语句来判断大小 a 与 b 的大小
m=a'将较大值赋给 m
Else:m=b
EndIf
Ifc>mThen'上步判断出的较大值与第三个值 c 进行比较
2 / 11