m0_68950896 2022-03-31 11:53 采纳率: 100%
浏览 21
已结题

这个vb看不明白啊,有没有人能解答一下啊😭😭

img


private Sub Form_Click()
Dim i%, j%, k%
For i = 3 To 0 Step -1
For j = 0 To 2 * i
Print " ";
Next j
'SPACE
For k = 5 To 【?】
Print "";
Next k
Print
Next i
For i = 0 To 3
For j = 0 To 2 * i + 2
'SPACE
【?】
Next j
For k = 0 To 4 - 2 * i
Print "
";
Next k
'SPACE
【?】
Next i
End Sub

  • 写回答

1条回答 默认 最新

  • 浪客 2022-03-31 12:26
    关注
    
    Dim i%, j%, k%
    For i = 3 To 0 Step -1
        For j = 0 To 2 * i
            Print " ";
        Next j
    'SPACE
        For k = 5 To 2 * i - 1 Step -1
            Print "*";
        Next k
        Print
    Next i
    For i = 0 To 3
        For j = 0 To 2 * i + 2
    'SPACE
            Print " ";
        Next j
        For k = 0 To 4 - 2 * i
            Print "*";
        Next k
    'SPACE
        Print
    Next i
    
    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

问题事件

  • 系统已结题 4月8日
  • 已采纳回答 3月31日
  • 创建了问题 3月31日

悬赏问题

  • ¥15 聚类分析或者python进行数据分析
  • ¥15 逻辑谓词和消解原理的运用
  • ¥15 三菱伺服电机按启动按钮有使能但不动作
  • ¥15 js,页面2返回页面1时定位进入的设备
  • ¥50 导入文件到网吧的电脑并且在重启之后不会被恢复
  • ¥15 (希望可以解决问题)ma和mb文件无法正常打开,打开后是空白,但是有正常内存占用,但可以在打开Maya应用程序后打开场景ma和mb格式。
  • ¥20 ML307A在使用AT命令连接EMQX平台的MQTT时被拒绝
  • ¥20 腾讯企业邮箱邮件可以恢复么
  • ¥15 有人知道怎么将自己的迁移策略布到edgecloudsim上使用吗?
  • ¥15 错误 LNK2001 无法解析的外部符号