http://localhost:4671/test2/Default4.aspx
1X2=2 2X2=4
1X3=3 2X3=6 3X3=9
1X4=4 2X4=8 3X4=12 4X4=16
1X5=5 2X5=10 3X5=15 4X5=20 5X5=25
1X6=6 2X6=12 3X6=18 4X6=24 5X6=30 6X6=36
1X7=7 2X7=14 3X7=21 4X7=28 5X7=35 6X7=42 7X7=49
1X8=8 2X8=16 3X8=24 4X8=32 5X8=40 6X8=48 7X8=56 8X8=64
1X9=9 2X9=18 3X9=27 4X9=36 5X9=45 6X9=54 7X9=63 8X9=72 9X9=81
code:
<script language ="vb" runat ="server">
Sub page_load(ByVal sender As Object, ByVal e As EventArgs)
'下面先给二维数组赋值
Dim I, J, a(8, 8) As Integer
For I = 1 To 9
For J = 1 To 9
a(I - 1, J - 1) = I * J
Next
Next
'将乘法表输出
For I = 1 To 9
For J = 1 To I
message.text &= J & "X" & I & "=" & a(I - 1, J - 1) & " "
Next
message.text &= "<br>"
Next
End Sub
</script>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>无标题页</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label ID=message runat=server></asp:Label>
</div>
</form>
</body>
</html>