想做一個窗體，有四個文本框和一個命令按鈕。要求在三個文本框內(nèi)輸入任意的三個數(shù)后，單擊命令按鈕，則在第四個文本框中顯示其中的中間數(shù)。不知道有沒有說明白，請各位幫忙，謝謝！

熱心網(wǎng)友

Dim a1, a2, a3, a4 As LongPrivate Sub Command1_Click()a1 = Text1.Texta2 = Text2.Texta3 = Text3.TextIf (a1 a2) And (a1 a3) Thena4 = a1End IfIf (a2 a1) And (a2 a3) Thena4 = a2End IfIf (a3 a1) And (a3 a2) Thena4 = a3End IfText4.Text = a4End Sub

熱心網(wǎng)友

VB都忘得差不多了，只能給你一個思路if text1的值=text2的值 if text2的值=text3的值 text4的值=text2的值 else if text1的值=text3的值 text4的值=text3的值 else text4的值=text1的值 endif endifelse if text1的值=text3的值 text4的值=text1的值 else if text2的值=text3的值 text4的值=text3的值 else text4的值=text2的值 endif endifendif 。

熱心網(wǎng)友

在命令按鈕的代碼的Click()函數(shù)后加上相應(yīng)的內(nèi)容就行了，你指的中間數(shù)應(yīng)該就是三個文本框中的第二個吧，比如叫textbox2，就寫成textbox4.test=textbox2.test不就成了

熱心網(wǎng)友

這么簡單還需要問，自己上學(xué)做什么了？