01.
Private
Sub
Button1_Click(
ByVal
sender
As
System.
Object
,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
02.
sql =
String
.Format(
"select bankmain,nsatabun,dgetreport,names,docid,dassetraka,adtambon,adaumper,adcity,typepro,getrai +getngan+gettatava1+gettatava2,rakateedin,rakasps,rakaall,teamasset1,sakagrow,statusqc from customer where dgetreport Between '"
& dtp1.Value.ToString(
"yyyy-MM-dd"
) &
"' AND '"
& dtp2.Value.ToString(
"yyyy-MM-dd"
) &
"' AND statusqc like '%"
& txt1.Text &
"%' "
)
03.
dgv1.DataSource = cmd_dataTable()
04.
05.
refresh_all_data_user()
06.
dgv1.Columns(0).Width = 80
07.
dgv1.Columns(1).Width = 150
08.
09.
End
Sub