vb.net listview disable auto checked

Why not a datagridview ?

hi jpaulino,

let say i need to display data like below and have checkbox in fron before the Desc .
Can Datagribview do below requiment??
 if user edit column from  either Q'ty , USD, Exchange,MarkUp,DPrice ,RPrice and SPrice . can datagridview do calculation with below fix fomula.
 USD* Exchange*MarkUp=DPrice
DPrice/0.7= RPrice
user need to check on the checkbox to save.
user also need to double click on either DPrice or RPrice to save either one.

Desc  Part#1    Part#2    Q'ty    USD    Exchange   MarkUp   DPrice       RPrice   SPrice     Total
5seat  5s          5SUV        1     9,000      2.4            0.9         21,600      24,000  34,285
2seat  2s          2Sport       1     19,000    2.4            0.9         45,600      50,666   72,380
9seat  9s          9MPV        1     15,000    2.4            0.9         36,000      40,000   57,142

if datagribview can do pls provide some vb.nt 2008 code.

Thank You

Do you have a source for that (db) ?

the DB source already loaded into a dataTable . below is the code.


Using adapter As New MySqlDataAdapter(strQuery3, cnString3)

            Dim rs3 As New DataTable()
            Try
                adapter.Fill(rs3)
            Catch ex As Exception
                'In case if any error occurs
                MsgBox("Database Connection Error", vbCritical, "Library Management System")
                Exit Sub
            End Try

Pls advice.
the DB source only have below column. the rest will be calculation base the fomula.
Desc  Part#1    Part#2    Q'ty    USD    Exchange   MarkUp

Below fomula to generate  DPrice       RPrice   SPrice    
USD* Exchange*MarkUp=DPrice
DPrice/0.95= RPrice
RPrice/0.7= SPrice

Hi jpaulino,

i got it work. but how to trim the data in datagridview?

Don't understand your question, can you try to explain better ?

i need to populate Datagridview column by column.

so that i can trim data and do dbnull and use diffrence header to display on datagridview.

i try below code but don't work.

  Do While r.Read()
                DataGridView1.Columns.Insert(0, check)
                DataGridView1.Item(1, i).Value = r.GetString("Desc")
                DataGridView1.Item(2, i).Value = r.GetString("Part#1")
                DataGridView1.Item(3, i).Value = r("Part#2")
                DataGridView1.Item(4, i).Value = r("Qty")
        DataGridView1.Item(5, i).Value = r("Qty")
                i = i + 1
                         Loop

But you can do all that in the sql statement !

You can trim the fields using LTRIM, RTRIM, you can change the header name like

"SELECT myField1 As myFieldHeaderName1, myField2 AS myFieldHeaderName2, ..."

Hi jpaulino,

how to use space i try below Sql don't work.

"SELECT myField1 As myFieldHeader Name1, myField2 AS myFieldHeader Name2, ..."

Pls also provide sample how to use LTRIM, RTRIM.

Thank You

Try this way:

"SELECT LTRIM(RTRIM(myField1)) As [myFieldHeader Name1], LTRIM(RTRIM(myField2)) AS [myFieldHeader Name2], ..."

the space do't work

pls advice

What space ? Show some example of what you have and what you want.

when myFieldHeaderName1 it work but when myFieldHeader Name1 there is error.


"SELECT LTRIM(RTRIM(myField1)) As [myFieldHeader Name1], LTRIM(RTRIM(myField2)) AS [myFieldHeader Name2], ..."

Can you show your code ?

Pls find below code

 Dim cnString3 As String = My.Settings.McsysplCon
        Dim strQuery3 As String = "SELECT LTrim(RTrim(commentt.Desc)) As Capacity,commentt.Part1 As Part Number,commentt.Part2 As Original Part,commentt.usd As USD,commentt.PMarkup As Mark UP From commentt WHERE BrandGP = " & ListView24.SelectedItems(0).SubItems(1).Text & ""

        Using adapter As New MySqlDataAdapter(strQuery3, cnString3)

            Dim rs3 As New DataTable()

            Try
                adapter.Fill(rs3)
            Catch ex As Exception
                'In case if any error occurs
                MsgBox("Database Connection Error", vbCritical, "Library Management System")
                Exit Sub
            End Try


error msg: Database Connection Error

i use MySQL database.

Database Connection Error is a problem of the connectin string and not with the sql syntax. Check the connection string and test if it work with a simple T-SQL, like "SELECT * FROM commentt "

but with the same code when the SQL Part Number no space like PartNumber it work

     Dim strQuery3 As String = "SELECT LTrim(RTrim(commentt.Desc)) As Capacity,commentt.Part1 As PartNumber,commentt.Part2 As OriginalPart,commentt.usd As USD,commentt.PMarkup As MarkUP From commentt WHERE BrandGP = " & ListView24.SelectedItems(0).SubItems(1).Text & ""

Have you tried like this ?

  Dim strQuery3 As String = "SELECT LTrim(RTrim(commentt.Desc)) As Capacity,commentt.Part1 As [Part Number],commentt.Part2 As [Original Part],commentt.usd As USD,commentt.PMarkup As MarkUP From commentt WHERE BrandGP = " & ListView24.SelectedItems(0).SubItems(1).Text & ""

i tried but still same error msg.