杭州交通信息网郑州裕达国贸董事长:VB编写九九乘法表
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/27 21:07:53
实现用VB编写九九乘法表,在一个容器内显示出来.当单击"确定"命令按钮时,就会显示出来.
sub btn_onclick()是何意思?请问图片框能否用来显示乘法表?要怎么使用?
sub btn_onclick()是何意思?请问图片框能否用来显示乘法表?要怎么使用?
Private Sub 确定_Click()
Dim i As Integer
Dim j As Integer
Dim str As String
Me.AutoRedraw = True
For i = 1 To 9
str = ""
For j = 1 To 9
str = str & i & "×" & j & " = "
str = str & i * j
str = str & vbTab
Next j
Print str
Next i
End Sub
三楼的改的还是不对压，你试过了吗？
应该这么写：
Private sub btn_onclick()
for i=1 to 9
for j=1 to 9
label.caption= label.caption & cstr(i)&"*"& cstr(j) & " = "& i*j $ vbTab
next
next
end sub
个人认为一楼的是搞Flash的，Click事件能写成OnClick。
一楼老兄的代码应该改成这样
sub btn_onclick()
for i=1 to 9
for j=1 to 9
label.text=cstr(i)&"*"& cstr(j) & " = "& i*j
next
next
end sub
sub btn_onclick()
for i=1 to 9
for j=1 to 9
label.text="i*j"=i*j
next
next
end sub