VB编一个程序输入一个整型数据，输出每位数字，其间用逗号分隔。例如

#include<stdioh>
void main()
{
int num,i;
char buf[50];
printf("请输入数字:");
scanf("%d",&num);
sprintf(buf,"%d",num);
for(i=0;buf[i+1]!='\0';i++)
printf("%c,",buf[i]);
printf("%c",buf[i]);
}

把以下代码粘贴到你的VB代码窗口中，执行时，单击按钮看看
Private Sub Command1_Click()
n = Val(InputBox("请输入数字："))
Print n;
End Sub

VB中在For Next循环中，可以在使用Print方法时用分号";"实现将一个数组在一行输出。

在单行上显示不同的项

被显示或被打印的项，可包括属性值、常数和变量（字符串或数字）。“在窗体或框上显示文本”一节中讨论过的 Print 方法，可打印数字项的值。正数数值具有一个前导和一个尾部空格。负数数值用负数符号替代一个前导空格。

用分号 (;) 或逗号 (,)来分隔相邻的项。如果用的是分号，Visual Basic 将一项接着一项地打印，中间没有空格。如果用的是逗号，在打印一项后，Visual Basic 将跳到下一个制表列打印下一项。

示例代码：

Private Sub Form_Click()
    Dim i As Long
    For i = 0 To 50
        Print i ^ 2;
    Next
End Sub

---