• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Tìm Kiếm Giá Trị trong 1 Trường

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Help] Tìm Kiếm Giá Trị trong 1 Trường
• Tìm Kiếm Giá Trị trong 1 Trường

• Tìm Kiếm Giá Trị trong 1 Trường

  dtcomsystem > 08-12-13, 11:28 PM

  https://www.mediafire.com/?949hk7rhy4o20q0
  MỌI NGƯỜI ƠI LÀM SAO ĐỂ TẠO CÔNG THỨC HOẶC TRUY VẤN ĐỂ TÌM 1 GIÁ TRỊ TRONG 1 CHUỔI VẬY
  FILE CỦA MÌNH ĐÓ
  VÍ DỤ MÌNH NHẬP 1.4.5.6.7 THÌ TƯƠNG ỨNG Ở CÁC CỘT 1,4,5,6,7 NHẬN GIÁ TRỊ LÀ 1. CÁC CỘT CÒN LẠI NHẬN GIÁ TRỊ LÀ 0 MỌI NGƯỜI GIÚP VỚI[img][/img]

• RE: TÌM KIẾM GIÁ TRỊ TRONG 1 TRƯỜNG

  tt1212 > 09-12-13, 12:16 AM

  bẠN VIẾT 7 HÀM
  [php]
  Function kiemtra( a as string) as integer
  Dim s as interger
  If right(a,1) =1 then
  s =0
  if.......

• RE: TÌM KIẾM GIÁ TRỊ TRONG 1 TRƯỜNG

  dtcomsystem > 09-12-13, 01:13 PM

  nhung ban oi, day do minh chua xac dinh duoc bao nhieu ky tu ma, tuy vao nguoi nhap
  co the la 1, 5 hoac nhieu nen su dung ham left, right, mid khong duoc nen minh muon nho moi goi y cho minh ham tim kiem. ben Excel thi minh lam duoc nhung ben nay kho qua

• RE: TÌM KIẾM GIÁ TRỊ TRONG 1 TRƯỜNG

  tt1212 > 09-12-13, 01:34 PM

  Dùng vòng For kiểm tra chuối nhạp vào đi bạn
  Ví dụ:
  

  Mã PHP:

  Kiemtra1(a as string)
Vitri as integer
s as integer
For i =1 to len(a)
vitri=instr(1,a)....
if vitri =1 then
s =1 else
s=0
end if
kiemtra2 =s 


  Mã PHP:

  Kiemtra2(a as string)
Vitri as integer
s as integer
For i =1 to len(a)
vitri=instr(1,a)....
if vitri =2 then
s =1 else
s=0
end if
kiemtra1 =s 


  
  Bạn viết 8 ham kiểm tra
  Sau đo bạn dùng các hàm này tại các ô giá trị
  Khi mình nhập một dãy vào thì đồng thời 8 hàm này cùng hoạt động
  hàm nào đúng thì ra 1
  còn sai thi ra 0
  Nói tóm lại bạn cứ tự chế thôi bạn a

• RE: TÌM KIẾM GIÁ TRỊ TRONG 1 TRƯỜNG

  paulsteigel > 09-12-13, 05:00 PM

  Bạn dùng 1 query này
  

  Mã PHP:

  SELECT [NHAP THU].[ma ky tu] AS mkt, GetValue([mkt],1) AS Expr1, GetValue([mkt],2) AS Expr2,
GetValue([mkt],3) AS Expr3, GetValue([mkt],4) AS Expr4, GetValue([mkt],5) AS Expr5, GetValue([mkt],6)
AS Expr6, GetValue([mkt],7) AS Expr7
FROM [NHAP THU]; 


  Và hàm này
  

  Mã PHP:

  Function GetValue(InTxt As String, Column As Long) As Long
    GetValue = IIf(InStr(InTxt, Column) > 0, 1, 0)
End Function 


  
  Hoặc đơn giản hơn, đưa thẳng vào trong câu lệnh SQL
  

  Mã PHP:

  SELECT [NHAP THU].[ma ky tu] AS MKT, IIf(InStr(MKT,1)>0,1,0) AS Expr1, 
IIf(InStr(MKT,2)>0,1,0) AS Expr2, IIf(InStr(MKT,3)>0,1,0) AS Expr3, 
IIf(InStr(MKT,4)>0,1,0) AS Expr4, IIf(InStr(MKT,5)>0,1,0) AS Expr5, 
IIf(InStr(MKT,6)>0,1,0) AS Expr6, IIf(InStr(MKT,7)>0,1,0) AS Expr7
FROM [NHAP THU]; 


• RE: TÌM KIẾM GIÁ TRỊ TRONG 1 TRƯỜNG

  dtcomsystem > 09-12-13, 05:16 PM

  Cảm ơn mọi người rất nhiều mình sẽ thử xem, hy vọng là được. Chân thành cảm ơn

• RE: TÌM KIẾM GIÁ TRỊ TRONG 1 TRƯỜNG

  bomnhauag > 09-12-13, 09:21 PM

  giải pháp cho bạn là dùm lệnh: Split và UBound
  
  

  Mã PHP:

  public funtion A(s as string)
dim t as byte, i as byte
t = Split(s, ".")        'lệnh này sẽ dựa vào dấu '.' mà tách các số ra cho bạn và đưa chúng vào mảng t
'UBound(t) sẽ cho biết số lượng phần tử có mặt trong mảng t sau khi được Split 'xào nấu' lại
for i=0 to UBound(t)-1
   select case t(i)
        case 1
             'làm cái j bạn mún làm ^^
        case 2
        case 3
        case 4
        case 5
        case 6
        case 7
        case 8
   end select
next i
end function 


  
  Bạn xem nhé! Thân!
• Bài trước Bài tiếp