急救,VFP编程。。

来源:百度知道 编辑:UC知道 时间:2024/07/04 23:36:54
编程(编程环境:vfp6.0)
程序名为Z2.PRG。功能是从键盘输入任意三个数,输出其中的最打数和最小数。编两个自定义函数,一个用来求从键盘输入的任意三个数中的最大数,另一个用来求从键盘输入的任意三个数中的最小数。

clear
LOCAL lnSz1,lnSz2,lnSz3
ACCEPT "请输入第一个数:" TO lnSz1
ACCEPT "请输入第二个数:" TO lnSz2
ACCEPT "请输入第三个数:" TO lnSz3
?"最大数是:"
??SzMax(lnSz1,lnSz2,lnSz3)
?"最小数是:"
??SzMin(lnSz1,lnSz2,lnSz3)

FUNCTION SzMax()
LPARAMETERS lnSz1,lnSz2,lnSz3
RETURN MAX(lnSz1,lnSz2,lnSz3)
ENDFUNC

FUNCTION SzMin()
LPARAMETERS lnSz1,lnSz2,lnSz3
RETURN Min(lnSz1,lnSz2,lnSz3)
ENDFUNC

声音的播放

在程序的编制过程中,适当地使用声音,可达到意想不到的效果,下面是在VFP中加入声音的几种方法:

1. 使用set bell to 命令

用set bell to 命令可以直接播放声音,此方法主要适用于给按钮加上声音效果,比如有一个“开始”按钮,要在按下它时能发声,可在其CLICK EVENT中加入如下代码:

wav_name="sound.wav”

set bell to wav_name,0

??chr(7)

其中sound.wav为要播放的声音文件。

2. 调用mplayer2.exe来播放

Mplayer2.exe是Windows自带的媒体播放器,在VFP中,可使用如下命令来播放声音文件:

Run /n7 c:\progra~1\micros~2\mplayer2