新手求教,关于Do while...Loop做菱形图案. * *** ************ ***** *** *用Do while...Loop做出上图的菱形图案。谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 楼主,你看看是不是要这个效果呀Private Sub Form_Load()Showh1 = 4: i = 1Do While i <= 7 Print Tab(10 + Abs(h1 - i)); String$((h1 - Abs(h1 - i)) * 2 - 1, "*") i = i + 1LoopEnd Sub WebBrowser 修改Cookies 如何实现两个程序之间传递信息? 如何读取到一个文件的修改时间? 请教:怎样双击鼠标在一个文本框上产生事件!~ vb调用api问题 '????超级疑难问题,源代码,有问题,请测试修改,谢谢! 谁会用ACTIVEX控件来做WEB页面啊,求救!!!~~~高分!!! 关于DATAGRID在显示之后的问题? 从发请教ado与access的问题 请问这样的窗口句柄怎么获得?(对高手来说很简单,送分了!) 我想做个记录系统类似于监控系统,就是我操作了哪些东西能把时间和内容记录下来,放到数据库中,谁能帮帮我? 求VB 下载文件最好的方法
Private Sub Form_Load()
Show
h1 = 4: i = 1
Do While i <= 7
Print Tab(10 + Abs(h1 - i)); String$((h1 - Abs(h1 - i)) * 2 - 1, "*")
i = i + 1
Loop
End Sub