扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
for i=1 to 9
成都网站制作、网站设计的开发，更需要了解用户，从用户角度来建设网站，获得较好的用户体验。成都创新互联公司多年互联网经验，见的多，沟通容易、能帮助客户提出的运营建议。作为成都一家网络公司，打造的就是网站建设产品直销的概念。选择成都创新互联公司，不只是建站，我们把建站作为产品，不断的更新、完善，让每位来访用户感受到浩方产品的价值服务。
for k=1 to 9
if k=i then
print i " x " k "=" i*k,
else
exit for
end if
next k
next i
在按钮的单击事件里写
For i = 1 To 9
For j = 1 To (10 - i)
If (i * j) 9 Then
Print i " * " j " = " i * j " ";
Else
Print i " * " j " = " i * j " ";
End If
Next j
Next i
标准三角，不因为算式长短而错位
'点击窗体出现九九乘法表，如果显示不全，适当调大窗体
Private Sub Form_Click()
Dim a As Integer
Dim b As Integer
Dim c As String
For a = 1 To 9
c = ""
For b = 1 To 9
c = c a "×" b "=" a * b vbTab
Next b
Print c
Next a
End Sub
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网