2024年11月21日 星期四 首页 编程论坛 技术文档 黑客安全 源代码 应用下载 电子图书 电脑硬件 游戏开发 休闲娱乐 编程网站  
‹‹ 上一主题 | 下一主题 ››
发新话题
打印

[基础] 用VB畫出方格？？

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
1# 大中 小发表于 2009-2-6 19:07  显示全部帖子
下面是VB6的代码
        Dim x As Integer, i As Integer
        x = InputBox("Enter value for number (1~10)", "Input x")
      
        For i = 1 To x
            Print String(x, "*")
        Next
换个头像，看见广告就眼红，直接封ID。

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
2# 大中 小发表于 2009-2-6 19:11  显示全部帖子
VB.Net的

        Dim x As Integer, i As Integer
        x = InputBox("Enter value for number (1~10)", "Input x")

        
        For i = 1 To x
            Print StrDup(x, "*")
        Next
换个头像，看见广告就眼红，直接封ID。

TOP

‹‹ 上一主题 | 下一主题 ››
发新话题