Diễn đàn giao thông
 
Trang ChínhTrang Chính  Trợ giúpTrợ giúp  Tìm kiếmTìm kiếm  Đăng kýĐăng ký  Thành viênThành viên  NhómNhóm  Đăng NhậpĐăng Nhập  
Đăng Nhập
Tên truy cập:
Mật khẩu:
Đăng nhập tự động mỗi khi truy cập: 
:: Quên mật khẩu
Top posters
Admin
 
xhung0602
 
sonmk2008
 
philipdn
 
TRANHOC2008
 
vinhtg
 
CIC.com
 
vu hien
 
moclantim
 
cd2k44
 
Latest topics
Statistics
Diễn Đàn hiện có 10069 thành viên
Chúng ta cùng chào mừng thành viên mới đăng ký: dinhngocson

Tổng số bài viết đã gửi vào diễn đàn là 18476 in 3406 subjects
Keywords
download d600 bravo SANNEN2005 crack road nova win7 group hitosoft 2016 HHMAPS topo duong toan acitt 2017 full ngang thiet geo5 civil alpha huong cack phan
Social bookmarking
Social bookmarking Digg  Social bookmarking Delicious  Social bookmarking Reddit  Social bookmarking Stumbleupon  Social bookmarking Slashdot  Social bookmarking Yahoo  Social bookmarking Google  Social bookmarking Blinklist  Social bookmarking Blogmarks  Social bookmarking Technorati  

Bookmark and share the address of ZIZU on your social bookmarking website
LIÊN KẾT




TỔNG LƯỢT TRUY CẬP

Share | 
 

 Cắt thép thi công

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
chipintel_li
Thành viên chính thức
Thành viên chính thức


Tổng số bài gửi : 18
Ngày đăng ký : 25/04/2009

Bài gửiTiêu đề: Cắt thép thi công   Wed May 05, 2010 12:45 am

Cái Steel workshop v1.7.2 này em thấy bên kết cấu . cơm, nhưng chỉ là bản demo. Nhờ các cao thủ giúp em cái key nếu có thể được ạ.
mediafire.com download.php?nym0zqwmiwt
Về Đầu Trang Go down
Xem lý lịch thành viên
xhung0602
Thành viên năng động
Thành viên năng động
avatar

Nam Tổng số bài gửi : 323
Age : 37
Đến từ: : TP Hải Dương
Nghề nghiệp: : Xây_Pá_dựng
Sở thích : Tắm biển
Ngày đăng ký : 07/04/2009

Bài gửiTiêu đề: Re: Cắt thép thi công   Wed May 05, 2010 1:10 am

chipintel_li đã viết:
Cái Steel workshop v1.7.2 này em thấy bên kết cấu . cơm, nhưng chỉ là bản demo. Nhờ các cao thủ giúp em cái key nếu có thể được ạ.
mediafire.com download.php?nym0zqwmiwt

Option Explicit
Public Function GenerateCode(strID As String, datDate As Date) As String
Dim i%
Dim strTmp As String
Dim strM As String
Dim strD As String
Dim strH As String
For i = 1 To Len(strID)
strTmp = strTmp & Asc(Mid(strID, i, 1))
Next i
If Len(strTmp) >= 14 Then strTmp = Left(strTmp, 14)
strM = CStr(Month(datDate))
strD = CStr(Day(datDate))
strH = CStr(Hour(datDate))
If Len(strM) < 2 Then strM = "0" & strM
If Len(strD) < 2 Then strM = "0" & strD
If Len(strH) < 2 Then strM = "0" & strH
Dim strCode(1 To 4) As String
strCode(1) = Mid(strTmp, 1, 3)
strCode(2) = Mid(strTmp, 4, 3)
strCode(3) = Mid(strTmp, 7, 3)
strCode(4) = Right(strTmp, 5)
GenerateCode = GenerateCode & strCode(1) & strM
GenerateCode = GenerateCode & strCode(2) & strD
GenerateCode = GenerateCode & strCode(3) & strH
GenerateCode = GenerateCode & strCode(4)
End Function
Về Đầu Trang Go down
Xem lý lịch thành viên
chipintel_li
Thành viên chính thức
Thành viên chính thức


Tổng số bài gửi : 18
Ngày đăng ký : 25/04/2009

Bài gửiTiêu đề: Re: Cắt thép thi công   Thu May 06, 2010 1:17 am

Hic. Bác xhung0602 cho em cái đoạn code đấy thì em chịu vì không biết VBA. Em ko biết cái "datDate" lấy thế nào ạ. Em paste nguyên đoạn code trên vào VBA của excel rồi dùng nhưng ko biết lấy giá trị để nhập vào cái "datDate" thế nào ạ. Bác giúp em với !
Về Đầu Trang Go down
Xem lý lịch thành viên
cd2k44
Thành viên năng động
Thành viên năng động


Nam Tổng số bài gửi : 244
Age : 32
Đến từ: : TP Hồ Chí Minh
Nghề nghiệp: : Kỹ Sư Cầu Đường
Ngày đăng ký : 24/02/2009

Bài gửiTiêu đề: Re: Cắt thép thi công   Wed Sep 15, 2010 8:00 am

chipintel_li đã viết:
Hic. Bác xhung0602 cho em cái đoạn code đấy thì em chịu vì không biết VBA. Em ko biết cái "datDate" lấy thế nào ạ. Em paste nguyên đoạn code trên vào VBA của excel rồi dùng nhưng ko biết lấy giá trị để nhập vào cái "datDate" thế nào ạ. Bác giúp em với !
http://www.cadviet.com/upfiles/3/cat_thep.rar
Chương trình này chạy tốt trên excel2007, còn excel 2003 thì chạy bị lỗi nếu số lượng thanh thép <500
Về Đầu Trang Go down
Xem lý lịch thành viên
tranhoe
Thành viên chính thức
Thành viên chính thức


Nam Tổng số bài gửi : 6
Age : 54
Đến từ: : Đà Nẵng
Nghề nghiệp: : KS Xây dựng
Sở thích : Tìm tòi và học hỏi về VBE
Ngày đăng ký : 10/12/2011

Bài gửiTiêu đề: Re: Cắt thép thi công   Sat Dec 10, 2011 9:59 pm

chipintel_li đã viết:
Hic. Bác xhung0602 cho em cái đoạn code đấy thì em chịu vì không biết VBA. Em ko biết cái "datDate" lấy thế nào ạ. Em paste nguyên đoạn code trên vào VBA của excel rồi dùng nhưng ko biết lấy giá trị để nhập vào cái "datDate" thế nào ạ. Bác giúp em với !

Nói như vậy là Bạn đã biết cách tạo Hàm người dùng trong EXCEL rồi. Nên mình chỉ nói về datDate mà thôi. Tham số này chính là ngày, giờ hiện tại trên máy tính của Bạn có được từ hàm NOW() trong EXCEL.
Tham số strID chính là UserCode còn kết quả của Hàm số GenerateCode chính là ActivateCode.
Mình không dám nói rõ vì sợ "phạm quy" khi đưa tài liệu trong lúc thi cử. Có lẽ Bạn xhung0602 cũng nghĩ như vậy.
Về Đầu Trang Go down
Xem lý lịch thành viên
Sponsored content




Bài gửiTiêu đề: Re: Cắt thép thi công   

Về Đầu Trang Go down
 
Cắt thép thi công
Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
ZIZU :: DOWNLOAD & UPLOAD PHẦN MỀN CHUYÊN NGÀNH :: Soft tiện ích-
Chuyển đến