Multi Dimensional Array single Line Initialisation
'Auto Dimension on first Array values
'Dim ArrData(,) As String {{"D", "", "", intSDACCID, dblIntAmt}, {"C", strVoucherNo, strRefyr, intCustAccID, dblNetAmt}, {"C", "", "", intTDSID, dblTDSAmt}}
Dim ArrData(,) As String = New String(2, 4) {{"D", "", "", intSDACCID, dblIntAmt}, {"C", strVoucherNo, strRefyr, intCustAccID, dblNetAmt}, {"C", "", "", intTDSID, dblTDSAmt}}
Dim X(,) As Short = New Short(1, 1) {{100, 150}, {200, 250}}
Dim Z(,) As String = New String(1, 1) {{100, 150}, {200, 250}}
'Dim ArrData(,) As String {{"D", "", "", intSDACCID, dblIntAmt}, {"C", strVoucherNo, strRefyr, intCustAccID, dblNetAmt}, {"C", "", "", intTDSID, dblTDSAmt}}
Dim ArrData(,) As String = New String(2, 4) {{"D", "", "", intSDACCID, dblIntAmt}, {"C", strVoucherNo, strRefyr, intCustAccID, dblNetAmt}, {"C", "", "", intTDSID, dblTDSAmt}}
Dim X(,) As Short = New Short(1, 1) {{100, 150}, {200, 250}}
Dim Z(,) As String = New String(1, 1) {{100, 150}, {200, 250}}
Comments
Post a Comment