神马品牌网小李飞刀兵器谱:VB问题，一个简单问题
来源：百度文库 编辑：神马品牌网 时间：2024/04/27 23:13:22
我想让1、11、225、45、32等数字都和22一个数相乘，得出的数生成在一个表里（一行或一列），怎么能作到啊
1、11、225、45、32等数字是可以在一个什么样的框内输入的，
1、11、225、45、32等数字是可以在一个什么样的框内输入的，
1、11、225、45、32等数字是可以在一个什么样的框内输入的?
[答]可以用InputBox()
private sub Form_load()
do
inputbox可以接受数值或字串
'数据的输入
dim a as integer
a=inputbox("输入一个数字,输入0结束")
if a=0 then exit do '如果输入0就退出循环
'计算及输入
'********加一个ListBox控件：List1
dim t as string,tt as string
a=a*22
t=str(a) '整型变字符串
tt=tt&" "&t '累加字串
list1.additem tt '加到listbox列表
loop
end sub