Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Tìm Kiếm Giá Trị trong 1 Trường
#1
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][Hình: GIUP%252520VPO.JPG][/img]
Chữ ký của dtcomsystem Xin chào, mình là dtcomsystem, Tham gia http://thuthuataccess.com/forum từ ngày 07-12 -13.
Reply
Những người đã cảm ơn
#2
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.......
Chữ ký của tt1212 Present Nhận viết phần mềm, hỗ trợ viết phần mềm, hợp tác viết phần mềm trên nên Microsoft Access mọi phiên bản Liên hệ: Mr Đức -989276236. Email: Tantriviet.vnn@gmail.com website:http://www.tantrivietsoft.com/
Reply
Những người đã cảm ơn
#3
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
Chữ ký của dtcomsystem Xin chào, mình là dtcomsystem, Tham gia http://thuthuataccess.com/forum từ ngày 07-12 -13.
Reply
Những người đã cảm ơn
#4
Dùng vòng For kiểm tra chuối nhạp vào đi bạn
Ví dụ:
Mã PHP:
Kiemtra1(as string)
Vitri as integer
as integer
For =1 to len(a)
vitri=instr(1,a)....
if 
vitri =1 then
=else
s=0
end 
if
kiemtra2 =
Mã PHP:
Kiemtra2(as string)
Vitri as integer
as integer
For =1 to len(a)
vitri=instr(1,a)....
if 
vitri =2 then
=else
s=0
end 
if
kiemtra1 =

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
Chữ ký của tt1212 Present Nhận viết phần mềm, hỗ trợ viết phần mềm, hợp tác viết phần mềm trên nên Microsoft Access mọi phiên bản Liên hệ: Mr Đức -989276236. Email: Tantriviet.vnn@gmail.com website:http://www.tantrivietsoft.com/
Reply
Những người đã cảm ơn dtcomsystem
#5
Bạn dùng 1 query này
Mã PHP:
SELECT [NHAP THU].[ma ky tu] AS mktGetValue([mkt],1) AS Expr1GetValue([mkt],2) AS Expr2,
GetValue([mkt],3) AS Expr3GetValue([mkt],4) AS Expr4GetValue([mkt],5) AS Expr5GetValue([mkt],6)
AS 
Expr6GetValue([mkt],7) AS Expr7
FROM 
[NHAP THU]; 
Và hàm này
Mã PHP:
Function GetValue(InTxt As StringColumn As Long) As Long
    GetValue 
IIf(InStr(InTxtColumn) > 010)
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 MKTIIf(InStr(MKT,1)>0,1,0) AS Expr1
IIf(InStr(MKT,2)>0,1,0) AS Expr2IIf(InStr(MKT,3)>0,1,0) AS Expr3
IIf(InStr(MKT,4)>0,1,0) AS Expr4IIf(InStr(MKT,5)>0,1,0) AS Expr5
IIf(InStr(MKT,6)>0,1,0) AS Expr6IIf(InStr(MKT,7)>0,1,0) AS Expr7
FROM 
[NHAP THU]; 
Chữ ký của paulsteigel ====================
Quốc gia hưng vong
Thất phu hữu trách
====================
Reply
Những người đã cảm ơn dtcomsystem
#6
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
Chữ ký của dtcomsystem Xin chào, mình là dtcomsystem, Tham gia http://thuthuataccess.com/forum từ ngày 07-12 -13.
Reply
Những người đã cảm ơn
#7
giải pháp cho bạn là dùm lệnh: SplitUBound

Mã PHP:
public funtion A(as string)
dim t as byteas byte
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(tsẽ 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!
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn dtcomsystem


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Hỏi] Làm sao để ấn định Null cho trường Date khi sử dụng Class Module Minh Tiên 8 614 18-11-16, 09:29 AM
Bài mới nhất: MinhnHang
  [Help] Giúp đỡ về cách xóa nội dung trong một field nam8384 2 117 17-10-16, 08:43 PM
Bài mới nhất: toancvp
  [Hỏi] Sử dụng chuột giữa trong subform là report. toancvp 10 358 12-10-16, 01:01 AM
Bài mới nhất: toancvp
  Lọc theo điều kiện trong listbox Ranju 3 178 06-10-16, 05:26 PM
Bài mới nhất: Ranju
  Định dạng trong listbox feeling 3 159 06-10-16, 02:44 PM
Bài mới nhất: jeck09nt

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ