dalao123
级别: 论坛先锋
精华主题: 0
发帖数量: 1016 个
工控威望: 1186 点
下载积分: 11973 分
在线时间: 695(小时)
注册时间: 2011-05-29
最后登录: 2026-03-15
查看dalao123的 主题 / 回贴
楼主  发表于: 昨天
图片:
乘法表打印实现如下
Dim se As String
        Dim j As Integer
        Dim i As Integer
        For i = 1 To 9

            ' TextBox3.Text &= Space((i - 1) * 9)
            For j = 1 To 9
                se = i & " *" & j & "=" & i * j
                TextBox3.Text &= se & Space(8 - Len(se))
            Next j
            TextBox3.Text &= vbCrLf



        Next i
附件: WindowsApp2.zip (10 K) 下载次数:4
plc
金蛇郎君czz
车到山前必有路
级别: 网络英雄
精华主题: 0
发帖数量: 2306 个
工控威望: 8421 点
下载积分: 216 分
在线时间: 489(小时)
注册时间: 2019-05-22
最后登录: 2026-03-15
查看金蛇郎君czz的 主题 / 回贴
1楼  发表于: 昨天
这是C#写的?
czz674613079@163.com