左心脏疼痛是什么原因:VB问题,一个简单问题

来源:百度文库 编辑:高考问答 时间:2024/05/04 07:15:23
我想让1、11、225、45、32等数字都和22一个数相乘,得出的数生成在一个表里(一行或一列),怎么能作到啊
1、11、225、45、32等数字是可以在一个什么样的框内输入的,

你可以在文本框里输入,以固定的“分隔符”来分隔,比如你上面所用的“、”,然后在计算时使用Split()函数将他们分离出来。
如:
Private Sub Command1_Click()
Text1.Text = "1、11、225、45、32"

Dim i As Integer
Dim intCount As Integer
Dim strItem() As String

strItem = Split(Text1.Text, "、")
intCount = UBound(strItem)

For i = 0 To intCount
If IsNumeric(strItem(i)) Then
strItem(i) = strItem(i) * 22
End If
Next

Text2.Text = Join(strItem, "、")
End Sub

没有悬赏分,不想作答