在窗体上放置一个命令按钮（Command1），对该命令按钮编写单击事件，在窗体上显示出100

你要的是VB还是C#呀 C#版本 for (int i = 100; i < 1000; i++) { int bai = 0; int shi = 0; int ge = 0; int baiyushu = 0; bai = i / 100; baiyushu = i % 100; shi = baiyushu / 10; ge = baiyushu % 10; if (i == bai * bai * bai + shi * shi * shi + ge * ge * ge) { Response.Write("水仙花数：" + i + "
"); } VB： Private Sub Form_Click() Dim q As Integer Dim b As Integer Dim s As Integer Dim n As Integer For n = 100 To 999 q = n \ 100 '求出百位数字 b = (n - q * 100) \ 10 '求出十位数字 s = n Mod 10 '求出个位数字 If ((q * q * q + b * b * b + s * s * s) = n) Then Print n End If Next End Sub

求采纳