• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Through this code you can Move Text boxes on the MS-FlexGrid. as per size of Grid Column

Through this code you can Move Text boxes on the MS-FlexGrid. as per size of Grid Column

Through this code you can Move Text boxes on the MS-FlexGrid. as per size of Grid Column

API Declarations


''''txtQtyLot and txtRFQ
dim introw,intcol



Rate Through this code you can Move Text boxes on the MS-FlexGrid. as per size of Grid Column

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

        ''assigns data from Flexgrid depends upon Mouse click
     ''checks for Int Col & int Row
     intRow = .MouseRow
     intCol = .MouseCol

     If intRow >= .Rows Then Exit Sub
     '' if int row or intcol is 0 then exit sub
     If intRow = 0 Or intCol = 0 Then Exit Sub
        txtQtyLot = .TextMatrix(introw, intcol)
        ''following Code txtQtylot will Placed on the grid
       txtQtyLot.Move .Left + .CellLeft, .Top+ .CellTop, .CellWidth, .CellHeight
        txtQtyLot.Visible = True
        txtQtyLot.SetFocus
        Exit Sub
     
       txtRFQ = Round(Val(.TextMatrix(intRow, intCol)), 2)
       If .CellWidth > 0 Then
          '''folloqwing code is for to place TxtRFQ
          txtRFQ.Move .Left + .CellLeft, .Top+ .CellTop, .CellWidth, .CellHeight
          txtRFQ.Visible = True
          txtRFQ.SetFocus
       End If
   End With
End Sub