StringをIntegerにするには？ (ID:120585)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 [VB6.0] Private Sub Command1_Click() Dim wString As String Dim wStrArray() As String Dim wIntArray() As Integer Dim i As Integer wString = "1,2,3,4,5,6,7,8,9" wStrArray = Split(wString, ",") ReDim wIntArray(UBound(wStrArray)) For i = LBound(wStrArray) To UBound(wStrArray) wIntArray(i) = CInt(wStrArray(i)) Next End Sub