Public Class Frm_Yk
    Private Sub Frm_Yk_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.bs.DataSource = DSET1.tbl_yk
    End Sub
End Class