Hi there. If you havnt worked out something yet here is some stuff i used for a grid both from pls and sql. You will have to change a few parameters but is quite easy. I used a msflex grid from the Smart Objects -> Control -> MS FlexGrid Control in the Graphics designer and scripted with vb.

Populate with WinCC Tags

'-----------------------------------------------------------------------------
Dim Grid'MS Flex grid added from the controls option in graphics designer
Set Grid = ScreenItems("DisplayGrid")'Bind the MScontrol to WinCC

Dim DataArray()'Used to hold WinCC Tag data from plc
Dim Row, Column'Used to reference the data when adding it to the grid
Dim RowCount,ColumnCount
'Notes about this:
'Used to determine how many columns and rows to add
'The number of columns depends on what you want to display
'and will have to set up in the DataArray for the header settings

'---------------------------------------------------------------------------------
ColumnCount = 4'The number of columns you want to display
RowCount = 1'Typically the number of steps for the recipe
Redim DataArray(ColumnCount-1, RowCount)
' -1 cause index starts at 0
' row is has no -1 cause it will only allow 1 row for headers if 1 rowcount is requested

'Set up header names for columns
'Careful here, dont add more columns than have been declared above in ColumnCount
'certain crash!!!!!!!!

DataArray(0,0) = "TAG1"'Name of WinCC Tag
DataArray(1,0) = "TAG2"'Name of WinCC Tag
DataArray(2,0) = "TAG3"'Name of WinCC Tag
DataArray(3,0) = "TAG4"'Name of WinCC Tag
'---------------------------------------------------------------------------------
'Read the WinCC tags. Because reading tags individually may take a while a group
'will be used for speed. Bit more code but better performance

'If the optional parameter "Readmode" is set to 1, the process tags are
'read directly from the plc. ' group.Read 1

Dim RecipeGrp
Set RecipeGrp = HMIRuntime.Tags.CreateTagSet

RecipeGrp.Add "TAG1"
RecipeGrp.Add "TAG2"
RecipeGrp.Add "TAG3"
RecipeGrp.Add "TAG4"
RecipeGrp.Read

Dim G

'Starts at 1 cause DataArray already contains headers at 0
For G = 1 To RowCount
DataArray(0, G) = RecipeGrp("TAG1").Value
DataArray(1, G) = RecipeGrp("TAG2").Value
DataArray(2, G) = RecipeGrp("TAG3").Value
DataArray(3, G) = RecipeGrp("TAG4").Value
Next

'---------------------------------------------------------------------------------

'Make sure there is no gray row headers only column headers
grid.FixedCols = 0
grid.FixedRows = 1

'Fill Grid with the data from the DataArray
grid.Cols = ColumnCount
grid.Rows = RowCount + 1 'first row takes up header at index 0

Dim R,C'To loop through the DataArray

For R = 0 To RowCount

For C = 0 To ColumnCount - 1
With Grid
.Row = R
.Col = C
.Text = DataArray(C,R)
'Set the column widths here 0 = first column
If C = 1 Then
.ColWidth(C) = 2300
End If
End With
Next

Next


POPULATE FROM SQL

'-----------------------------------------------------------------------------
Dim Grid'MS Flex grid added from the controls option in graphics designer
Set Grid = ScreenItems("DisplayGrid")'Bind the MScontrol to WinCC
Dim DataArray()'Used to hold data from SQL
Dim Row, Column'Used to reference the data when adding it to the grid
Dim RowCount,ColumnCount

'-----------------------------------------------------------------------------
'Some Variables for the SQL Stuff
Const TableName = "UTILITIES"
Const UserName = "sa"
Const Password = "HESTONY"
Const DataBaseName = "PROCESS_DATA"
Const ServerName = "SHANE_LAPTOP\WINCC"
Dim strConnectionString
Dim objConnection
Dim objCommand
Dim oRs
Dim strSQL

'Set Connection String To SQL2000 Server To Retrieve Data
strConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" & UserName & ";Pwd=" & Password & ";Initial Catalog=" & DataBaseName & ";Data Source=" & ServerName & ";"
'sql string to get the data
strSQL = "SELECT D_Date, L55_010, L55_011, L55_012 FROM UTILITIES ORDER BY D_Date DESC"

'Create The Connection
Set objConnection = CreateObject("ADODB.Connection")
objConnection.ConnectionString = strConnectionString
objConnection.CursorLocation = 3
objConnection.Open
'Attach The Record Set To The Connection
Set oRs = CreateObject("ADODB.Recordset")
Set objCommand = CreateObject("ADODB.Command")
objCommand.CommandType = 1
Set objCommand.ActiveConnection = objConnection

objCommand.CommandText = strSQL
Set oRs = objCommand.Execute


ColumnCount = oRs.Fields.Count'The number of columns you want to display
RowCount = oRs.RecordCount'The number of rows to display

'Resize the Array to hold the SQL Data
Redim DataArray(ColumnCount - 1 ,RowCount)

Dim X,Y
'Loop Used to get the field names
For X = 0 To ColumnCount -1

DataArray(X,0) = oRs.Fields(x).Name

Next


'Loop To Get all row the values
For Y = 1 To RowCount -1

DataArray(0, Y) = oRs.Fields("D_Date").Value
DataArray(1, Y) = oRs.Fields("L55_010").Value
DataArray(2, Y) = oRs.Fields("L55_011").Value
DataArray(3, Y) =oRs.Fields("L55_012").Value
Next

'Some grid stuff
'Make sure there is no gray row headers only column headers
grid.FixedCols = 0
grid.FixedRows = 1

'Fill Grid with the data from the DataArray
grid.Cols = ColumnCount
grid.Rows = RowCount + 1 'first row takes up header at index 0

Dim R,C'To loop through the DataArray

For R = 0 To RowCount

For C = 0 To ColumnCount - 1
With Grid
.Row = R
.Col = C
.Text = DataArray(C,R)
'Set the column widths here 0 = first column
If C = 1 Then
.ColWidth(C) = 2300
End If
End With
Next

Next

Set objCommand = Nothing
objConnection.Close
Set objConnection = Nothing