陈翔六点半演员表女性:用VB编写一个小程序

来源:百度文库 编辑:高考问答 时间:2024/04/30 01:59:25
要求输入一个数字,例如4,就显示一个窗口,
窗口如下:
****
****
****
****
显示出4行4列的“*”

窗体上添加一个text1控件

dim i,j,k as integer
k=val(text1.text)
for i=1 to k
for j=1 to k
print "*"
next j
print chr(13)
next i