杭州四季香山:高手进 帮我一个小忙

新建一个工程，添加一个Command控件Command1和一个TextBox控件Text1，然后在Command1控件的Click方法中添加如下代码：
Private Sub Command1_Click()
For i = 1 To 9
Print
For j = 1 To 2 * i - 1
Text1.Text = Text1.Text & Str(i)
Next
Text1.Text = Text1.Text & vbCrLf
Next
End Sub
这样就可以了。当你单击Command1时，就会在TextBox中显示出你要的结果。希望我没搞错哦
另外一种做法：
新建一个工程，然后添加一个Label控件Label1，然后再添加如下代码就OK了！
Private Sub Form_Activate()
For i = 1 To 9
For j = 1 To 2 * i - 1
Label1.Caption = Label1.Caption & str(i)
Next
Label1.Caption = Label1.Caption & vbNewLine
Print
Next
End Sub
以上代码已在VB6.0下调试通过，希望是你要的

哈哈,看来VB要淘汰了!
asp(和VB语法一样的哦):
<%
for i=1 to 9
for j=1 to i
response.write i
next
response.write "<br>"
next
%>

php:
<?php
for($i=1;$i<=9;$i++){
for($j=1;$j<=$i;$j++){
echo "$i";
}
echo "<br>";
}
?>

算法重要哦!

#include <stdio.h>
#include <math.h>
void main(){
int i,j,k;
for(i=1,j=1;i<=9;i++,j=j+2){

for(k=1;k<=j;k++){
printf("%d",i);
}
printf("\n");
}
}

C代码,测试通过

java的
class jj{
public static void main(String args []){
for(int i=1;i<10;i++){
for(int k=0;k<i;k++){
System.out.print(i);
}
System.out.println();
}
}
}

main()
{int i,j=1,k=1;
printf("\n");
while(k<=9)
{for(i=1;i<=j;i++)
printf("%d",k);
printf("\n");
j=j+2;
k++;
}
}
是C语言。

public class test
{
public static void main(String[] args)
{
int i,j;
for(i=1;i<=9;i++)
{
for(j=1;j<=i;j++)
{
System.out.print(i);
}
System.out.println();
}
}
}
这是Java写的!不过主要是算法嘛!讲究吧!