... For i = 1 To Len(Ckt)
kti = Mid(Ckt, i, 1)
vt1 = InStr(Cgoc1, kti)
If vt1 <> 0 Then
kq = kq & Mid(Cma1, 1 + ((vt1 - 1) \ 6) * 2, 2)
xd = xd & Mid(Cma1, 25 + ((4 + vt1) Mod ...
án trên là Module1 và Module2.
Lập trìnhVisualBasic 6.0
Trang 45 -
Bài tập chương 1
Bài tập 1:
Xây dựng thủ tục tìm ước số chung lớn nhất của 2 số nguyên a và b.
Bài tập 2:
Xây dựng ...
Lập trìnhVisualBasic 6.0
Trang 5 -
Tuy nhiên, ngôn ngữ Basic trong VB đã được cải thiện rất nhiều để phù hợp với
phong cách lậptrình hiện đại.
Visual Basic còn có hai dạng khác là Visual...
... c a các tr ng Visual Basic. ả đặ ư à ủ ườ
Các ki u tr ng c s d li u c a VisualBasic ể ườ ơ ở ữ ệ ủ
Visual Basic l u các giá tr c a b ng trong các tr ng. VisualBasic công nh n 14 ư ị ủ ả ườ ậ
ki ... để ữ ế ả ủ ộ
ch l u 1 (True) ho c 0 ( False ). Cho ví d , n u b n nh p 13 v o inputbox, Visual ư ặ ụ ế ạ ậ à
Basic l u 1 trong tr ng d li u. l m các vi c r c r i, VisualBasic không thông báoư ... dung mã hoáữ à Đố ớ ụ ề ộ
Visual Basic. n u b n l ng i m i n v i Visual Basic, b n có th c n xem l i quy nế ạ à ườ ớ đế ớ ạ ể ầ ạ ể
sách Teach Yourself VisualBasic in 21 Days. ây l m t b c u l...
... dụ 1: Gọi CTC giải phương trình bậc 2 (với 3 tham số là A, B, C kiểu thực)
đã lậptrìnhtừ trước.
Call GPTB2(3, 4, 1)
Hoặc truyền tham số gián tiếp qua tên các biến
Lập trìnhVisualBasic ... thang = "May"
Lập trìnhVisualBasic 6.0
Trang 45 -
Bài tập chương 1
Bài tập 1:
Xây dựng thủ tục tìm ước số chung lớn nhất của 2 số nguyên a và b.
Bài tập 2:
Xây dựng thủ tục ...
góp ý, phê bình để giáotrình ngày càng hoàn thiện hơn, phục v
ụ tốt cho việc
dạy -học trong nhà truờng và các bạn đọc.
Hà nội, ngày 20 tháng 10 năm 2005
Lập trìnhVisualBasic 6.0
Trang 9...
... học nhất.
Giáo trình này viết ra phục vụ nhu cầu học môn Lậptrình ứng dụng hoặc Lập
trình VisualBasic cho các sinh viên, họ
c sinh trường THCN hệ chuyên CNTT.
Sau những nội dung về lậptrình ... For i = 1 To Len(Ckt)
kti = Mid(Ckt, i, 1)
vt1 = InStr(Cgoc1, kti)
If vt1 <> 0 Then
kq = kq & Mid(Cma1, 1 + ((vt1 - 1) \ 6) * 2, 2)
xd = xd & Mid(Cma1, 25 + ((4 + vt1) Mod ...
i = 1
While i <= 50
If i Mod 3 = 0 Then
tong = tong + i
End If
j = i + 1
Wend
Msgbox tong
Lập trìnhVisualBasic 6.0
Trang 12 -
1. Kiểu dữ liệu - biến và hằng
1.1 Kiểu...
... hình 11 nhưng bây giờ
ta chọn Ruler. Nếu thành công bạn sẽ
thấy xuất hiện hai dòng thông tin như
hình 14
1
2
1
3
1
4
Sắp xong rồi, hãy cố
gắng lên nhé. Bây
giờ thì bấm “Đồng
ý” (hình 14 ). ... DẪN TỰHỌC
LẬP TRÌNH MÔ PHỎNG
VIOLET SCRIPT
BÀI 2
VẼ ĐƯỜNG THẲNG
Nguyễn Tuấn Cường
THCS Thái Sơn – An Lão - Hải Phòng
tuancuonghp@gmail.com
Bài 2: Vẽ đường thẳng: tất cả các bước gần như bài 1, ... nhập
đề mục, nhập tiêu đề màn hình ( hình 1) sau đó ấn
nút “tiếp tục”. Trong trang soạn thảo chọn nút “Công
cụ” rồi chọn Lậptrình mô phỏng” (hình 2)
1
2
Trong trang soạn thảo mã lệnh script,...
... Link Table: phần này xin trình bày trong phần Cơ sở dữ liệu đa người
dùng.
1. 2. Table và DataType.
1. 2 .1. FieldName là tên một trường trong bảng, tên có thể dài 64 ký tự và có
thể có khoảng trắng ... chấp nhận giá trị rỗng.
- Index: lập chỉ mục:
No : Không lập chỉ mục.
Yes Duplicate OK : Có lập và cho phép trùng.
Yes No Duplicate : Có lập, không cho phép trùng.
1. 3. PrimaryKey
Một Table bắt ... trong quá trình thao tác”,32,”Thông báo”
Resume Exit_Open ‘trở về mục Exit_Open
End Function ‘Kết thúc
Hoặc chương trình xử lý lỗi từng phần trong quá trình thực thi chương
trình. Chương trình thực...
... xóa đoạn mã hiện có, viết đoạn mã thử nghiệm khác như
sau:
arr =
new
Array();
1
Dãy nhiều chiều – Tựhọclậptrình Flash
Bạn đã thấy rằng ta có thể đặt các số hoặc các chuỗi nào đó vào dãy. ... tương tự như ví dụ trước: gọi hàm join của
dãy arr[i] để nối các phần tử của dãy thành một chuỗi duy nhất. Lần này ta làm
khác một chút: dùng ký tự trắng
‖ ‖
làm mối nối. Thử chạy chương trình, ... (2D array). Để làm quen với dãy hai chiều,
bạn hãy mở tập tin Flash mới và gõ đoạn mã như sau trong bảng
Actions – Frame (ứng với khung 1) :
1
arr =
new
Array();
2
3
for(i = 0; i < 3; i++)...
... 3
4
arr.splice (1, 1); trace(arr);
5
6
arr.splice (1, 0,"cam"); trace(arr);
7
8
arr.splice(0,2,"bưởi"); trace(arr);
9
10
arr.splice( -1, 1); trace(arr);
Trong đoạn ... viết đoạn mã mới như sau:
1
arr = ["mãng cầu", "dừa", "đu đủ",
"xoài"];</p>
2
trace(arr);
Vui đùa với dãy – Tựhọclậptrình
Flash
-
-
-
-
-
-
-
-
-
-
-
-
Bạn ... phần
tử với dãy gốc.
Khi viết arr.slice(0, 1) , bạn
―
x
ắn‖
vào dãy arr,
―tr
ước
mặt‖ phần
tử thứ nhất ở vị trí 0 và
―tr
ước
mặt‖ phần tử thứ hai ở vị trí 1.
xem Flash
―su
y
nghĩ‖ có giống mình...