什么方法用于在窗体输出数据

❶ vb关于将数据在窗体上直接输出的问题

你是要输出百钱买百鸡吧，代码如下：

PrivateSubForm_Click()
DimwAsInteger'钱数
DimzAsInteger'鸡的数目
DimgAsInteger,mAsInteger,xAsInteger'分别代表公鸡母鸡小鸡
Print"母鸡";Tab;"公鸡";Tab;"小鸡"
Forg=1To100
Form=1To100
Forx=1To100
w=g*3+m*2+x/3
z=g+m+x
Ifw=100Andz=100Then
Printm;Tab;g;Tab;x
EndIf
Nextx
Nextm
Nextg
Print"完成!"
EndSub