复旦石磊老婆去世:用VB做:显示乘法九九表(提示:用双重循环,界面自己设计)

来源:百度文库 编辑:高校问答 时间:2024/05/09 08:07:47

dim i as integer
dim j as integer
dim k as integer

for i=1 to 9
for j=1 to 9
k=i*j
print k
next
next

这些应该行!

怎么都那么长啊,来个短的
Private Sub Command1_Click()
For i = 1 To 9
For j = 1 To i
Print j; "*"; i; "="; i * j,
Next j
Print
Next i

End Sub

dim i as integer
dim j as integer
dim k as integer

for i=1 to 9
for j=1 to i
k=i*j
print k
next
print
next

上楼的是四方形的 这个是三角形的

Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim c As String

a = 1
b = 1
For x = 1 To 9

c = ""
For y = 1 To a
b = y * a
c = c & y & "*" & a & "=" & b & " "

Next y
Print (c)
a = a + 1

Next x

End Sub

c语言书上好像有这个例题,使用表格显示的,自己翻书看看,书上的很工整。