欢迎访问服务器技术网-www.fuwuqijishu.com

VB学习

软件 fuwuqijishu 2年前 (2022-10-01) 14次浏览 0个评论 扫描二维码

关于For i = 0 To 10
Print
Print
For j = 1 To i * 2 + 1
Print Tab(j * 2); 1;
Next j
Print
Next i
帮我看看代码,我本来要做菱形的,可是为什么每个1都换行呢,我自学VB,请多指教。的问题

Dim i, j
For i = 1 To 5
For j = 1 To i
Print 1;
Next
Print
Next
For i = 1 To 5
For j = i To 5
Print 1;
Next
Print
Next
算半个菱形吧
不好意思
我也是刚学

喜欢 (0)
发表我的评论
取消评论
表情 贴图 加粗 删除线 居中 斜体 签到

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址

Warning: error_log(/www/wwwroot/fuwiqijishu/wp-content/plugins/spider-analyser/#log/log-2404.txt): failed to open stream: No such file or directory in /www/wwwroot/fuwiqijishu/wp-content/plugins/spider-analyser/spider.class.php on line 2900