form1 init事件代碼
thisform.text1.value=0
thisform.text2.value=0
thisform.text3.value=0
command1 click事件代碼
a=thisform.text1.value
b=thisform.text2.value
c=thisform.text3.value
n=max(a,b,c)
thisform.text4.value=n
文本框、按鈕直接在面版上畫,然后設(shè)置Caption屬性,在Command的Click事件里寫一個(gè)比較的程序,完后設(shè)置一下thisform.text3.value=就OK!!