จะเอาค่าจาก dataset มาแสดง โดยเปลี่ยนค่าจากเลข 0 เป็น Open และ 1 เป็น Close ต้องทำยังไงคะ

dt_Stock.Columns.Clear()
        dt_Stock.Columns.Add("ln_CassetteNo", GetType(String))
        dt_Stock.Columns.Add("vc_HostCd1", GetType(String))
        dt_Stock.Columns.Add("vc_DrugNm", GetType(String))
        dt_Stock.Columns.Add("vc_LotNo", GetType(String))
        dt_Stock.Columns.Add("ln_CurrentStock", GetType(String))
        dt_Stock.Columns.Add("dt_ValidityDate", GetType(String))
        dt_Stock.Columns.Add("vc_UnUsedDivision", GetType(String))
ds.Tables().Clear()
ds = clsP.Stock(Sortby)
If ds.Tables(0).Rows.Count = 0 Then MsgBox("ไม่มีข้อมูล") : Exit Sub
        dt_Stock.Rows.Clear()
For i = 0 To ds.Tables(0).Rows.Count - 1
            dt_Stock.Rows.Add(New Object() {ds.Tables(0).Rows(i).Item("ln_CassetteNo").ToString, _
                                            ds.Tables(0).Rows(i).Item("vc_HostCd1").ToString, _
                                            ds.Tables(0).Rows(i).Item("vc_DrugNm").ToString, _
                                            ds.Tables(0).Rows(i).Item("vc_LotNo").ToString.Trim, _
                                            ds.Tables(0).Rows(i).Item("ln_CurrentStock").ToString, _
                                            ds.Tables(0).Rows(i).Item("vc_UnUsedDivision").ToString, _
                                            ds.Tables(0).Rows(i).Item("dt_ValidityDate").ToString})
        Next
        ds_Stock.Tables().Clear()
        ds_Stock.Tables.Add(dt_Stock)

Code (SQL)
[sql]
SELECT
dbo.M_Cassette.ln_CassetteNo,
dbo.M_Drug.vc_HostCd1,
dbo.M_Drug.vc_DrugNm,
dbo.M_Cassette.vc_LotNo,
dbo.M_Cassette.ln_CurrentStock,
dbo.M_Cassette.dt_ValidityDate,
dbo.M_Cassette.vc_UnUsedDivision

FROM
dbo.M_Cassette
INNER JOIN dbo.M_Drug ON dbo.M_Cassette.vc_DrugCd = dbo.M_Drug.vc_DrugCd