... - 30 To 30 Step CurrentX = Form2.Width / - CurrentY = (i + 30) * Form2.Height / 60 Print i Next ' ve thi khoang -3 den doi voi gia tri cua x va - 30 den 30 doi voi gia tri cau y i =0 For i = To 500 ... - 30 To 30 Step CurrentX = Form2.Width / - CurrentY = (i + 30) * Form2.Height / 60 Print i Next ' ve thi khoang -3 den doi voi gia tri cua x va - 30 den 30 doi voi gia tri cau y i =0 For i = To 500 ... 500 x = -3 + i * / 500 y=a*b*x^2+a*x Form2.Line -((x + 3) * Form2.Width / 6, Form2.Height - (y + 30) * Form2.Height / 60) Next 'tinh cuc tri ' y' = 2abx + a If a * b = Then Form1.Text3 = "k0...
... tượng ta ghép ba mẫu tự alphabet lại với nhau: ABC, memory Text String nầy biểu diễn số 01 000 001 0 100 001 001 000 011 (trong binary) hay 414243 (trong Hex, nhóm bits tương đuơng với Hex digit) VB6 cho ... String biểu diễn memory số 00 1 100 0 100 1 100 100 01 100 11 Binary hay 313233 Hex Như có cách biểu diễn số 123 mà không dùng Text String không? Dĩ nhiên Con số 123 7B Hex hay 01 11 101 1 Binary, ta chứa số ... cho tất keys bàn phím đuợc gọi ASCII Theo quy ước nầy digit "1" biểu diễn số 48 (00 1 100 01) nút Enter số 13 (00 0 100 11) Chắc có lẽ bạn đoán theo quy ước ASCII, pattern (dạng) bits (1 byte) biểu diễn...
... Kết cấu khác 40d 40d 45d 30d 30d 35d Vùng chịu nén Đầu cốtthép có móc 20d 20d Đầu cốtthép móc 30d 20d 30d HD-CL-16 PHỤ LỤC B Trình tự, yêu cầu phương pháp kiểm tra công tác cốtthép thực theo ... lắp dựng nghiệm thu Cốtthép Hàn cốtthép Lắp dựngcốtthép HD-CL-16 Thay đổi cốtthép Kiểm tra tính toán Cốtthép thay đổt phù hợp với quy định thiết ké Trước gia công cốtthép ... Lắp dựng Nối thép dọc vào thép chờ; Lồng thép đai vào (cột); đặt thép ngang vào thép dọc (vách) Dùng dây kẽm buộc thép đai vào thép chủ Con kê Trong trường hợp, góc đai thép với thép...
... lienhe@docs.vn Tel : 09 18.775.368 If So >= 100 0 Then Exit Function SoTram = So \ 100 ' Số trăm ? So = So Mod 100 ' Còn lại số hàng chục ? SoChuc = So \ 10 ' Số chục ? SoDv = So Mod 10 ' Số đơn vị ? ... Visual basic 6 .0, Nhà xuất thống kê 200 1 Giáo trình Cơ sở liệu Access, Nhà xuất thống kê 200 0 MDSN Library Visual Studio 6 .0 Giáo trình điện tử IBT Lập trình hớng đối tợng Visual Basic 6 .0 42 ... String Dim TG As Long ChiSo = str = "" My_Str = "" Do While MySo SoBaSo = MySo Mod 100 0 MySo = MySo \ 100 0 My_Str = Doc(SoBaSo) If ChiSo = Then str = My_Str ElseIf Len(My_Str) Then TG = (ChiSo...
... tượng ta ghép ba mẫu tự alphabet lại với nhau: ABC, memory Text String nầy biểu diễn số 01 000 001 0 100 001 001 000 011 (trong binary) hay 414243 (trong Hex, nhóm bits tương đuơng với Hex digit) VB6 cho ... String biểu diễn memory số 00 1 100 0 100 1 100 100 01 100 11 Binary hay 313233 Hex Như có cách biểu diễn số 123 mà không dùng Text String không? Dĩ nhiên Con số 123 7B Hex hay 01 11 101 1 Binary, ta chứa số ... cho tất keys bàn phím đuợc gọi ASCII Theo quy ước nầy digit "1" biểu diễn số 48 (00 1 100 01) nút Enter số 13 (00 0 100 11) Chắc có lẽ bạn đoán theo quy ước ASCII, pattern (dạng) bits (1 byte) biểu diễn...
... số nầy thành 10 Nếu không thận trọng ta thay đổi số dùng cho chuyện khác, cho số xe, thành 10 - ta vô tình tạo bug Ðể tránh vấn đề nầy ta dùng Constant sau: Const NUMBER_OF_CARS = 10 For ICar = ... lần chữ MyEmployee cách dùng keyword With sau: With MyEmployee Firstname = "David" Surname = "Smith" Salary = 2 500 0 DateOfBirth = #14/6/1963# End With Mặc dầu định nghĩa dùng Structured Data Type ... biết bạn muốn dùng Dynamic Array dimension thay đổi tương lai Khi muốn thay đổi dimension Dynamic Array bạn dùng ReDim keyword: ReDim myStudentMarks( 10) ReDim Preserve myStudentMarks( 10) Cả hai statements...
... cứu hiệu ức chế ăn mòn Cốtthép canxi nitrít Bê tông 4.1 Nghiên cứu khả ức chế ăn mòn thép NCXM: 0. 06 Tốc độ ăn mòn (mm/năm) 0. 05 0. 04 0. 03 0. 02 0. 01 Thời gian (tháng) 0 H0: Nớc chiết (NC) H8: ... H19:NC+[Cl/NO2=2 ,0] H 20: NC+[Cl/NO2=1,8] H21:NC+[Cl/NO2=1,6] Tốc độ ăn mòn (mm/năm) 0. 05 0. 04 0. 03 Thời gian (tháng) 0. 02 0. 01 H15 H16 H17 0 Hình 4.3 Tốc độ ăn mòn thép NCXM có CN 6 ,0 kg ion Cl- H18 H19 H 20 ... điện ăn mòn 20 500 Đ iện th ế - E (m V) Đ iện th ế - E (m V) 500 3 50 200 50 tháng tháng 24 tháng tháng 12 tháng 18 tháng 3 50 200 50 20 tháng 12 tháng tháng 24 tháng tháng 18 tháng 40 20 Phần A Chiều...
... ứng với 10% lực căng thiết kế cho bó cáp Sau đánh dấu vị trí bó cáp để đo độ giãn dài + Lần lượt tăng lực lên theo cấp 0. 2P; 0. 4P; 0. 6P; 0. 8P; 1P; 1 .05 P với P lực căng thiết kế (P = 303 . 105 T) Đo ... xây dựng, 200 8 + Hướng dẫn thi công DƯL cầu, tài liệu VSL Việt Nam, 200 7 +Nghiên cứu điều chỉnh tốc độ căng kéo bó cáp cường độ cao phù hợp với tốc độ gia tải thi công kết cấu bê tông cốtthép ... mảnh lắp đặt vào vị trí 2.2.5 Buộc cốtthép ống ghen tạo lỗ: Cốtthép khối đặt vào vị trí theo vẽ thiết kế theo trình tự: đáy, hai bên thành, mặt Đặc biệt ý cốtthép tăng cường cục đầu neo Các ống...
... IAnumber = End If If (sPersonalWorth > 100 000 0) Then IBnumber = Else IBnumber = End If If (IAnumber = 1) And (IBnumber = 1) Then StandForTheElection ... IAge As Integer Dim sPersonalWorth As Single bAdult = (IAge >= 18) bRich = (sPersonalWorth > 100 000 0) If bAdult And bRich Then StandForTheElection End If Trong thí dụ trên, ta lập trình để người ... số nầy thành 10 Nếu không thận trọng ta thay đổi số dùng cho chuyện khác, cho số xe, thành 10 - ta vô tình tạo bug Ðể tránh vấn đề nầy ta dùng Constant sau: Const NUMBER_OF_CARS = 10 For ICar =...