VB6 code conversion into VB.NET

Hi ,

We are converting 1 VB6 application into VB.NET and below is some small part of VB6 code.

If Not (rstEditColumns.BOF And rstEditColumns.EOF) Then
        rstEditColumns.MoveFirst
        Do While Not rstEditColumns.EOF
            With grdSingleRecord.Columns
                .Item(rstEditColumns!tablecolumnname).AllowFocus = False
                .Item(rstEditColumns!tablecolumnname).Locked = True
                .Item(rstEditColumns!tablecolumnname).ForeColor = &H80000010
            End With
            rstEditColumns.MoveNext
        Loop
End If

Where

rstEditColumns is recordset

grdSingleRecord is ComponentOne TrueDBGrid control

We want to understand what is the meaning of line rstEditColumns!tablecolumnname in the above code ? So that according to that we will write code for VB.NET.

Please let us know if anyone knows about this.

Thanks and Regards
Prasad

3 Replies

Know the answer? Post it — somebody with the same question will find it here.

Mahesh Chand14y ago
Accepted answer
It's the column name of the table.
0
Vulpes14y ago
In VB6 (and indeed in VB.NET) the '!' or 'bang' operator is used to look up items in a dictionary-based collection.

So, if dict represents such a collection, d!key is equivalent to dict("key") or dict.Item("key").
0
Prasad Godbole14y ago
Hi,

Thanks for giving information.
Is there any special meaning for exclamation mark used there?

Thanks and Regards
Prasad
0