Chào mừng đến với Diễn đàn Dân Kế Toán - Kế toán tổng hợp thực tế.
Trang 1 của 2 12 CuốiCuối
Kết quả 1 đến 10 của 13
  1. #1
    Ngày tham gia
    Nov 2015
    Bài viết
    0

    keycode phím # là thế nào vậy ạ?


  2. #2
    Ngày tham gia
    Apr 2016
    Bài viết
    212
    Ðề: keycode phím # là thế nào vậy ạ?

    :lasao::lasao::lasao::lasao:

  3. #3
    Ngày tham gia
    Nov 2015
    Bài viết
    25
    Ðề: keycode phím # là thế nào vậy ạ?

    Trong VBA không thấy định nghĩa const keycode của phím # nhưng bạn có thể dùng các hàm sau đây để giải quyết bài toán của mình nhé:
    Asc(string)Chr(charcode)

    Asc("#") = 35
    chr(35) = "#"

    Muốn kiểm tra người sử dụng nhập phím # (shift + 3) thì bạn dùng tham số shift ở sự kiện keydown như sau:

    Dim intShiftDown As Integer
    intShiftDown = (Shift And acShiftMask) > 0
    If intShiftDown and keycode = vbKey3 Then MsgBox "Ban vua nhap ky tu #"

  4. #4
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Ðề: keycode phím # là thế nào vậy ạ?




    Trích dẫn Gửi bởi dtngoc
    Em đã ngồi 1đêm rùi mà ko tìm được keycode của phím #. Anh chị chỉ giúp em nhé.
    Cụ thể là thế này, khi em muốn convert 1table sang file.txt, trong đó đoạn ngắt dòng, ngắt cột em cần sự trợ giúp của phím #.

    Cảm ơn anh chi.
    Tôi hơi lấy làm lạ là thường ký tự xuống dòng là ký tự có mã ASCII là 10 (line feed) và 13 (enter).

    Vậy bạn có thể cho chúng tôi biết rõ hơn về dấu # để xuống dòng hay không?

  5. #5
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Ðề: keycode phím # là thế nào vậy ạ?

    Vâng, em cụ thể thế này anh nhé:
    _ Em có 1tbale: http://www.4shared.com/file/72329869/6c69ba9b/Candoi.html
    _ Cuối tháng em muốn còn-vớt table trên thành file.txt như mẫu đây: http://www.4shared.com/file/72303088/9e83453f/BC080930.html

    Mong được anh chị giúp đỡ em (Bằng VBA là tốt nhất anh chị ạ).

    Cảm ơn anh chị!

  6. #6
    Ngày tham gia
    May 2016
    Bài viết
    2
    Ðề: keycode phím # là thế nào vậy ạ?

    Có bác nào xem xong rồi hiểu không? Mình xem xong chẳng hiểu gì vì chẳng thấy nó liên quan gì tới nhau cả:
    BG#A0101#24901111#
    20080930#5#A0101101000401#25698160000#
    20080930#5#A0101201000401#3522200000#
    EN#A0101#24901111#2#

    BG: đoán là Begin, Con En đoán là End, mấy dòng giữa chắc là số liệu báo cáo.
    Thực ra nếu chỉ cần cho ký tự # vào giữa thì đơn giản việc gì dùng keycode làm cái gì cho nó mệt. VD cần A#B thì tạo 1 query có dạng: ketqua: A & "#" & B. Rồi cho cái query đó xuất sang text là xong

  7. #7
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Ðề: keycode phím # là thế nào vậy ạ?




    Trích dẫn Gửi bởi behattieu
    Có bác nào xem xong rồi hiểu không? Mình xem xong chẳng hiểu gì vì chẳng thấy nó liên quan gì tới nhau cả:
    BG#A0101#24901111#
    20080930#5#A0101101000401#25698160000#
    20080930#5#A0101201000401#3522200000#
    EN#A0101#24901111#2#

    BG: đoán là Begin, Con En đoán là End, mấy dòng giữa chắc là số liệu báo cáo.
    Thực ra nếu chỉ cần cho ký tự # vào giữa thì đơn giản việc gì dùng keycode làm cái gì cho nó mệt. VD cần A#B thì tạo 1 query có dạng: ketqua: A & "#" & B. Rồi cho cái query đó xuất sang text là xong
    Theo tôi nhìn cái đoạn trên thì thực chất ký tự # chỉ là ký tự phân cách giá trị giữa các field mà thôi.

    Nếu thế thì chỉ cần sử dụng lệnh Split để tác các giá trị đó đưa vào một biến mảng, sau đó đưa chúng vào các field tương ứng.

    Để test thử, bạn có thể chép đoạn thủ tục này vào module public, sau đó cho Run. Bạn sẽ thấy kết quả trả sẽ là từng phần của chuỗi.

    Public Sub Thu()
    Dim st As String, i As Integer
    Dim mang() As String
    st = "BG#A0101#24901111#20080930#5#A0101101000401#25698 160000#20080930#5#A0101201000401#3522200000#EN#A01 01#24901111#2#"
    mang = Split(st, "#")
    Debug.Print UBound(mang)
    For i = 0 To UBound(mang) - 1
    Debug.Print mang(i)
    Next
    End Sub

  8. #8
    Ngày tham gia
    Apr 2016
    Bài viết
    41
    Ðề: keycode phím # là thế nào vậy ạ?

    Người ta cần cái này



    Trích dẫn Gửi bởi dtngoc
    khi em muốn convert 1table sang file.txt, trong đó đoạn ngắt dòng, ngắt cột em cần sự trợ giúp của phím #.
    mà bác lại cho cái này



    Trích dẫn Gửi bởi phatnq2002
    Nếu thế thì chỉ cần sử dụng lệnh Split để tác các giá trị đó đưa vào một biến mảng, sau đó đưa chúng vào các field tương ứng.
    em nghĩ chỉ cần : & "#" & là xong rồi

  9. #9
    Ngày tham gia
    Nov 2015
    Bài viết
    0
    Ðề: keycode phím # là thế nào vậy ạ?




    Trích dẫn Gửi bởi behattieu
    Có bác nào xem xong rồi hiểu không? Mình xem xong chẳng hiểu gì vì chẳng thấy nó liên quan gì tới nhau cả:
    BG#A0101#24901111#
    20080930#5#A0101101000401#25698160000#
    20080930#5#A0101201000401#3522200000#
    EN#A0101#24901111#2#

    BG: đoán là Begin, Con En đoán là End, mấy dòng giữa chắc là số liệu báo cáo.
    Thực ra nếu chỉ cần cho ký tự # vào giữa thì đơn giản việc gì dùng keycode làm cái gì cho nó mệt. VD cần A#B thì tạo 1 query có dạng: ketqua: A & "#" & B. Rồi cho cái query đó xuất sang text là xong
    a. Quy định cấu trúc file báo cáo

    Mỗi file báo cáo thống kê bao gồm một hoặc nhiều phân nhóm mã chỉ tiêu nhỏ. Dữ liệu của mỗi phân nhóm mã chỉ tiêu được tổ chức như sau:

    - Dòng đầu tiên: BG#******XX#ZZZZZ#
    - Các dòng chi tiết: Ngaysl#Dinhkybaocao#Mact#Sbc#
    - Dòng cuối cùng: EN#******XX#ZZZZZ#sbg#

    Trong đó:

    - ******XX : Là mã đơn vị báo cáo gồm 8 ký tự
    - ZZZZZ: Là mã phân nhóm chỉ tiêu báo cáo, tối đa 5 ký tự
    - Ngaysl: Ngày tháng năm lập số liệu, định dạng YYYYMMDD
    - Dinhkybaocao: Định kỳ báo cáo
    - Mact: Mã chỉ tiêu báo cáo
    - Sbc: Giá trị chỉ tiêu báo cáo
    - Sbg: Tổng số bản ghi/phân nhóm chỉ tiêu

  10. #10
    Ngày tham gia
    Sep 2015
    Bài viết
    63
    Ðề: keycode phím # là thế nào vậy ạ?




    Trích dẫn Gửi bởi suynghidi
    a. Quy định cấu trúc file báo cáo

    Mỗi file báo cáo thống kê bao gồm một hoặc nhiều phân nhóm mã chỉ tiêu nhỏ. Dữ liệu của mỗi phân nhóm mã chỉ tiêu được tổ chức như sau:

    - Dòng đầu tiên: BG#******XX#ZZZZZ#
    - Các dòng chi tiết: Ngaysl#Dinhkybaocao#Mact#Sbc#
    - Dòng cuối cùng: EN#******XX#ZZZZZ#sbg#

    Trong đó:

    - ******XX : Là mã đơn vị báo cáo gồm 8 ký tự
    - ZZZZZ: Là mã phân nhóm chỉ tiêu báo cáo, tối đa 5 ký tự
    - Ngaysl: Ngày tháng năm lập số liệu, định dạng YYYYMMDD
    - Dinhkybaocao: Định kỳ báo cáo
    - Mact: Mã chỉ tiêu báo cáo
    - Sbc: Giá trị chỉ tiêu báo cáo
    - Sbg: Tổng số bản ghi/phân nhóm chỉ tiêu
    Quả đúng là vào hệ của SND rồi, nên giải thích thế là quá ổn.
    Vậy nếu muốn chuyển dữ liệu từ một table kết quả sang một file text thì chúng ta phải xử lý File thôi.
    Đoạn code xử lý này hiện thời tôi chưa có điều kiện để viết ra cho các bạn. Vậy nhờ các cao thủ đã có sẵn hoặc rảnh thì giúp trước. Còn không thì chờ một vài buổi nhé.

 

 
Trang 1 của 2 12 CuốiCuối

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •