作者fcbia ()
看板Visual_Basic
标题Re: [请益] 怎麽把九九乘法表写成像垫板背面的样꘠…
时间Thu Dec 2 18:09:05 2004
※ 引述《nowstop (伤心咖啡店之歌)》之铭言：
: 因为程式课老师要我们写九九乘法表
: 刚学vb 不是非常的懂
: 希望大家能帮助我
: 感恩不尽 谢谢同血们 ^^
: 拜托啦 ：)
Private Sub cmdOK_Click()
lblShow.Caption = ""
For i = 1 To 9
For j = 1 To 9
If Len(CStr(j * i)) = 1 Then
ji_num = " " & CStr(j * i)
Else
ji_num = CStr(j * i)
End If
lblShow.Caption = lblShow.Caption & CStr(j) & "*" +
CStr(i) & "=" & ji_num & " "
Next
lblShow.Caption = lblShow.Caption & vbNewLine
Next i
End Sub
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 221.169.5.131