熱心網友

對于這樣的問題建議不要回答，可能是學校老師布置的題目，自己不動腦子是不行的

熱心網友

代碼如下:Option ExplicitDim a As SingleDim b As SingleDim c As SinglePrivate Sub Command1_Click() If a b And a c Then Print "a "; a ElseIf b a And b c Then Print "b "; b ElseIf c a And c b Then Print "c "; c End IfEnd SubPrivate Sub Form_Load()a = 216.8: b = 556.52: c = 34.9End Sub