Public Sub adressConversion(ByVal post As String, ByVal postmessagetable As Hashtable)
Dim reader As StreamReader = Nothing
Dim ary As New ArrayList
Try
reader = New StreamReader(Application.StartupPath() & "\KEN_ALL.CSV", Encoding.Default)
While (-1 < reader.Peek)
Dim buffer As String = reader.ReadLine
Dim arystr As String() = buffer.Split(",")
arystr(0) = String.Format("{0:0000000}", CType(arystr(0), Integer))
If post = arystr(0) Then
If Not postmessagetable.ContainsKey(arystr(0)) Then
ary.Add(arystr(1))
postmessagetable.Add(arystr(0), ary)
Else
ary.Add(arystr(1))
postmessagetable.Item(ary) = ary
End If End If End While Catch ex As Exception Throw ex Finally If reader IsNot Nothing Then reader.Close() End If End Try End Sub
vb.netでは上記のように記述しますが
javaで下記のようなvalueを変更するような記述はどのように記述したらよいでしょうか?
postmessagetable.item(ary) = ary
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2016/04/27 10:22