Đề cương Lập trình trực quan là:Tập hợp các câu hỏi trắc nghiệm, đã có đáp án được in đậm; Các câu hỏi đều nằm trong chương trình học và bám sát đề thi. Chúc các bạn ôn tập tốt và đạt kết quả cao. ♥♥♥♥♥♥♥♥♥
Trang 1Câu 17: Hãy cho biết kết quả của S bằng bao nhiêu?
Câu 76: Chọn phát biểu đúng về thuộc tính multiline của điều khiển textbox:
1:Số dòng cho phép nhập phụ thuộc vào thuộc tính Maxlength của diều khiển textbox đó
*2:Cho phép có nhiều dòng trong điều khiển textbox
3:Sử dụng tổ hợp phím control + tab để di chuyển con nhy sang điều khiển kế
4:Sử dụng phím tab để di chuyển con nhy sang điều khiển kế
Câu 24: Để thay đổi màu chữ của Textbox ta sử dụng thuộc tính nào của Textbox
Trang 21:In ra câu thông báo: Tong 2 so A va B la 11
2:In ra câu thông báo: Tong 2 so A va B la 0
*3:In ra câu thông báo: Tong 2 so A va B la 56
4:In ra câu thông báo: Tong 2 so A va B la 65
Câu 74: Định nghĩa một thủ tục dạng public trong một module thì có thể sử dụng nó trong phạm vi
1:Trong các module định nghĩa
Trang 32:Không có câu nào đúng
*3:Xuất hiện thông báo lỗi khi tham chiếu đến Cn.state
Câu 26: Để khai báo mảng A có 10 phần tử có kiểu nguyên ta sử dụng lệnh nào sau đây?
1:Dim A(1 To 10) As Double
2:Dim A(1 To 10) As String
*3:Dim A(1 To 10) As Integer
4:Dim A As Integer
Câu 19: Hãy cho biết kết quả của XL bằng bao nhiêu?Nếu nhập vào điểm bằng 7
Sub Xeploai()
Trang 4Câu 77: Lệnh nào sau đây dùng để tắt bẫy lỗi đã bật:
1:option error off
*2:on error goto 0
3:option on error off
4:on error off
Trang 5Câu 31: Cho mảng A có 10 phần tử là các số nguyên Đoạn lệnh sau, dùng để làm gì?For i = 1 To 9
2:Không có câu lênh nào đúng
*3:Xuất hiện thông báo lỗi
Trang 6Câu 27: Đoạn lệnh sau dùng để làm gì?
Dim a(1 To 10) As Integer
For i = 1 To 10
a(i: InputBox(Nhap vao phan tu thu & i)
Next
1:Khai báo mảng A gồm 10 phần tử kiểu số nguyên và in mảng mảng
*2:Khai báo mảng A gồm 10 phần tử kiểu số nguyên và nhập các giá trị cho mảng
3:Khai báo mảng A gồm 10 phần tử kiểu số nguyên và sắp xếp mảng
4:Khai báo mảng A gồm 10 phần tử kiểu số nguyên và tính tổng các giá trị của mảng
Câu 10: Hãy chọn phát biểu đúng của cấu trúc lệnh Do Loop
4:Chừng nào ĐK còn đúng thì thực hiện <Nhóm lệnh>
Câu 20: Để khai báo biến a kiểu nguyên ta sử dụng lệnh nào sau đây:
1:Dim a As String
2:Dim a As Double
3:Dim a As Varial
*4:Dim a As Integer
Trang 7Câu 13: Hãy cho biết kết quả của S bằng bao nhiêu?
Public Sub NhapCauHoi()
Private Sub Command1_Click()
Trang 8Câu 32: Để ẩn Textbox ta sử dụng thuộc tính nào sau đây?
Trang 9*3:Rst.Movenext và Rst.AbsolutePosition = Rst AbsolutePosition +1
4:Rst.Move 1
Câu 81: Sắp xếp thứ tự các câu lệnh sau để thực hiện mở kết nối thành công
Dim cn= New ADODB.Connection
4:tât cả đều sai
Câu 86: Câu lệnh nào sau đây có thể được dùng để di chuyển vị trí hiện hành trên Recordset về mẩu tin đâu tiên Giả sử recordset Không rỗng và vị trí hiện hành Không ở adPosBOF
Trang 10<Nhóm lệnh 1 >
Else
<Nhóm lệnh 2 >
End If
1:Nếu ĐK đúng thì thực hiện <Nhóm lệnh 1>,nếu ĐK sai thì Không thực hiện lệnh If
2:Nếu ĐK sai thì thực hiện <Nhóm lệnh 1>, nếu ĐK đúng thì thực hiện <Nhóm lệnh 2>
*3:Nếu ĐK đúng thì thực hiện <Nhóm lệnh 1>, nếu ĐK sai thì thực hiện <Nhóm lệnh 2>.4:Nếu ĐK đúng thì thực hiện <Nhóm lệnh 1>, nếu ĐK sai thì Không thực hiện <Nhóm lệnh 2>
Câu 90: Xóa một mẩu tin bạn sử dụng phương thức nào của Recordset
Trang 11Câu 7: Hãy cho biết kết quả của S bằng bao nhiêu?Sub Tinh_Tong() [CRs=1
Câu 1: Sự kiện DblClick() xảy ra khi nào?
1:Người sử dụng dùng chuột Click lên đối tượng2:Người sử dụng kéo lê một đối tượng sang nơi khác3:Người sử dụng ấn một phím bất kỳ trên bàn phím
*4:Người sử dụng dùng chuột Click đúp lên đối tượng
Câu 33: Để khai báo biến ta dùng lệnh?
1:Dim (Tên biến,Kiểu dữ liệu)
2:Dim [As (Kiểu dữ liệu)] (Tên biến)
*3:Dim (Tên biến) [As (Kiểu dữ liệu)]
4:Redim (tên biến)
Trang 12Câu 127: Giả sử có bảng dữ liệu Sinhvien gồm (Hoten,Masv,Diachi,Diemtb) trong cơ sở dữ liệu db1.mdb Access, db1.mdb được mở kết nối bằng đối tượng Connection có tên là con từ trong vb.Đối tượng recordset để mở bảng có tên là rst, khi đó đoạn lệnh sau sẽ thực hiện việc gì?
Rst.open select * from sinhvien ,con
Rst.movefirst
1:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi sau bản ghi đầu tiên
2:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi trước bản ghi cuối cùng
*3:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi đầu tiên
4:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi cuối cùng
Câu 83: Đoạn mã sau sẽ hiện Kết quả nào?
Private Sub Form_Load()
Câu 53: Thuộc tính Caption của một điều khiển
1:Có thể thay thế cho thuộc tính Name
2:Dùng như là phụ đề cho điền khiển đó và Có thể thay thế cho thuộc tính Name
*3:Không thể thay thế cho thuộc tính Name và Dùng như là phụ đề cho điền khiển đó
4:Không thể thay thế cho thuộc tính Name
Câu 133: Một Form có tính chất Name là B Hãy xem các cách viết sau cách nào đúng?1:B.Bold == True
Trang 13Câu 2: Sự kiện KeyPress() xảy ra khi nào?
1:Người sử dụng dùng chuột kích đúp lên đối tượng
2:Người sử dụng kéo lê một đối tượng sang nơi khác
3:Người sử dụng dùng chuột Click lên đối tượng
*4:Người sử dụng ấn một phím bất kỳ trên bàn phím
Câu 128: Giả sử có bảng dữ liệu Sinhvien gồm (Hoten,Masv,Diachi,Diemtb) trong cơ sở dữ liệu db1.mdb Access, db1.mdb được mở kết nối bằng đối tượng Connection có tên là con từ trong vb.Đối tượng recordset để mở bảng có tên là rst, sau khi đó đoạn lệnh sau thì trạng thái các thuộc tính BOF và EOF lần lượt sẽ là?
Rst.open select * from sinhvien ,con
Trang 14Câu 69: Trong FormLoad, có câu lệnh CommonDialog.showOpen, khi chạy Form, hiện tượng
gì xảy ra?
1:Hiển thị bảng màu
2:Không hiện gì
3:Hiển thị hộp thoại Save
*4:Hiển thị hộp thoại Open
Câu 64: Phương thức ShowColor của đối tượng Common Dialog dùng để:
1:Đặt màu cho đối tượng
Trang 15Câu 72: Đoạn chương trình sau khi kich vào command1 thì nội dung của text1 là:
Private Sub Command1_Click()
Dim TextStr
TextStr = bau oi thuong lay bi cung & vbCrLf & tuy rang khac giong nhung chung mot gianText1.Text = TextStr
End Sub
1:Chỉ hiện câu thơ thứ hai
2:Chỉ Hiện câu thơ thứ nhất
*3:Hiện nội dung của hai câu thơ trên hai dòng
4:Hiện nội dung của hai câu thơ trên cùng một dòng
Câu 99: Private Function a(m As Byte, Optional n As Byte) As Byte
a = m + n
End Function
Cơ chế truyền tham số của Function a là:
*1:m truyền bằng tham biến, n truyền bằng giá trị
2:m và n đều truyền bằng tham biến
3:m và n đều truyền bằng giá trị
4:n truyền bằng tham biến, m truyền bằng giá trị
Câu 147: Những tên biến nào là sai?
Câu 100: Thuộc tính Listindex của đối tượng listbox cho ta biết:
1:Giá trị listbox được chọn
2:Luôn có giá trị là 0
3:Tổng số phần tử trong listbox
*4:Số chỉ mục của giá trị trong listbox
Câu 10: Chạy ứng dụng VB6.0 thì thủ tục nào sẽ được kích hoạt khi đóng Form?
1:Form_Resize()
2:Form_Active()
*3:Form_QueryUnload()
4:Form_Load()
Trang 16Câu 93: Cho biết chương trình sau sẽ in ra kết quả gì? :
Function ppp(Optional x As Integer = 4, y As Integer = 6)
Rst.open select * from sinhvien where Diemtb>=5 ,con
Sẽ thực hiện công việc:
*1:Chọn sinh viên trong bảng có Diemtb>=5 và đặt vào biến rst
2:Chọn sinh viên trong bảng có Diemtb<=5 và đặt vào biến con
3:Chọn sinh viên trong bảng có Diemtb>=5 và đặt vào biến con
4:Chọn sinh viên trong bảng có Diemtb<=5 và đặt vào biến rst
Câu 40: Đoạn chương trình sau :
Public Sub Inso() (1)
Dim x As Integer, y As Integer (2)
4:Kết quả in ra không thay đổi
Câu 26: Điều khiển Label thường đi kèm nới hộp văn bản vì?
1:Trong VB bắt buộc các điều khiển này phải đồng thời xuất hiện khi thiết kế (2)
2:Cả 2 đáp án (1) và (2) đều đúng
3:Cả 2 đáp án (1) và (2) đều sai
*4:Hộp văn bản không có thuộc tính Caption như nút lệnh nên nhãn làm việc đó (1)
Trang 17Câu 135: Một hộp văn bản có thuộc tính đặt là Name là txtQ Hỏi: trong các cách viết sau cách nào đúng?
1:txtQ.MaxLength=54000
2:txtQ.MaxLength=-10
3:txtQ.MaxLength=90000
*4:txtQ.MaxLength=32000
Câu 3: Thủ tục Form_KeyDown( ) được thực hiện khi nào?
1:Người sử dụng kéo lê một đối tượng sang nơi khác
*2:Khi người sử dụng đã ấn một phím và nhả ra
3:Người sử dụng ấn một phím bất kỳ trên bàn phím
4:Người sử dụng dùng chuột Click lên đối tượng
Câu 73: Chương trình sau cho kết quả bao nhiêu khi txt1=3
Private Sub CmdtongBP_Click()
Câu 44: Kiểu dữ liệu String được sử dụng để:
1:Khai báo kiểu số nguyên
2:Khai báo kiểu logic
3:Khai báo kiểu số thực
*4:Khai báo kiểu số chuỗi
Câu 118: Đối tượng Drivelistbox quản lý các ổ đĩa trong máy tính với thứ tự lần lượt là C:, D:, E: Khi đó, câu lệnh Drivelistbox.Drive(3) sẽ xác định
1:xác định ổ đĩa số 3
*2:Lỗi
3:xác định ổ đĩa số 2
4:xác định ổ đĩa số 0
Câu 66: Các sự kiện nào sau đây là sự kiện của nút lệnh?
1:Click, Drag, Load
Trang 182:Click, DragDrop, KeyUp
3:Click, Drag, Load
Câu 42: Kiểu dữ liệu Single được sử dụng để:
1:Khai báo kiểu logic
*2:Khai báo kiểu số thực
3:Khai báo kiểu chuỗi
4:Khai báo kiểu số nguyên
Câu 71: Khi chạy đoạn mã sau, nếu kích vào Form trên màn hình 2 lần thì sẽ sinh ra Form mới
Private Sub Form_Click()
Dim a As New Form1
Trang 19Rst.open select * from sinhvien ,con
Câu 29: VB mặc định các phần tử được sắp xếp theo thứ tự mà chúng được nhập vào từ
Listbox Muốn sắp xếp theo thứ tự ABC ta đổi thuộc tính Sorted thành?
1:Enable
2:Disable
3:False
*4:True
Câu 52: Phương thức LoadPicture dùng để làm gì?
1:Dùng để đưa một bức ảnh vào trong đối tượng Picture trên Form
*2:Dùng để mở một tệp ảnh
3:Dùng để chèn một picture
4:Không tồn tại đối tượng này trong VB
Câu 85: Chương trình sau cho kết quả bằng bao nhiêu?
Private Sub Form_Load()
Trang 20Câu 27: Đôi khi ta phải sử dụng phím Tab để tạo ra thứ tự điều khiển thay vì dùng chuột, thuộc tính nào sau đây thực hiện điều này?
*1:Enable
2:TabIndex
3:Visible
4:Focus
Câu 35: Để khai báo tất cả các biến cục bộ trong một thủ tục Static, thì ta?
*1:Đặt từ khoá Static vào tên thủ tục: Function RunningTotal(Num)
2:Đặt từ khoá Static vào tên thủ tục: Static RunningTotal(Num)
3:Không thể thực hiện được
4:Đặt từ khoá Static vào tên thủ tục: Static Function RunningTotal(Num)
Câu 81: Đoạn chương trình sau in kết quả là gì khi kích vào nút lệnh cmdchiahet và Text1=15?Private Sub Cmdchiahet_Click()
Dim ch As String
ch = Txt1.Text
If Val(Right(ch, 1)) Mod 2 = 0 Then
Txtketqua text=so&ch& là số đặc biệt
Câu 16: Điều khiển CheckBox có tác dụng?
*1:Cho phép người sử dụng chọn nhiều khả năng trong tập các lựa chọn
2:Cho phép người sử dụng chọn một từ danh sách các lựa chọn
3:Cho phép người sử dụng cuộn ngang qua một điều khiển chứa dữ liệu khác
4:Cho phép người sử dụng chọn hoặc không chọn một khả năng nào đó
Câu 91: Cho biết chương trình sau sẽ in ra kết quả gì?
Public Sub mmm(x As Long)
Trang 214:VB báo chương trình có lỗi
Câu 97: Hãy cho biết cú pháp không hợp lệ của lệnh Exit trong VB: (1đ)
Câu 115: Đối tượng DriveListbox được dùng để
*1:Hiển thị các ổ đĩa trong máy tính
2:Hiển thị các file trong một thư mục
3:Hiển thị các file trong ổ đĩa
4:Hiển thị các thư mục trong một ổ đĩa
Câu 24: Sự kiện nào được thực thi trước khi người sử dụng gõ vào hộp văn bản?
1:Sự kiện KeyUp
2:Sự kiện PressKey
*3:Sự kiện KeyPress
4:Sự kiện Change
Câu 17: Điều khiển OptionBox có tác dụng
1:Cho phép người sử dụng chọn nhiều từ danh sách các lựa chọn
2:Cho phép người sử dụng chọn hoặc không chọn một khả năng nào đó
*3:Cho phép người sử dụng chọn một từ danh sách các lựa chọn
4:Cho phép người sử dụng cuộn ngang qua một điều khiển chứa dữ liệu khác
Câu 106: Với thanh cuộn Hscroll thì giá trị lớn nhất khi cài đặt được là
*1:32767
2:255
3:65535
4:0
Trang 22Câu 55: Khi muốn tạo ra một ứng dụng thông thương một cách tự động sử dụng công cụ nào?1:ActiveX control
Rst.open select * from sinhvien ,con
Rst.movelast
1:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi đầu tiên
2:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi sau bản ghi đầu tiên
*3:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi cuối cùng
4:Mở toàn bộ bảng dữ liệu và chuyển đến bản ghi trước bản ghi cuối cùng
Câu 88: Tính chất nào là không đúng đối với Procedure:
1:Dễ quản lý
*2:Chạy được ở cấp hệ điều hành
3:Sử dụng lại được (reusable)
4:Được gọi để thi hành
Câu 98: Đọan chương trình sau dùng cho 3 câu hỏi tiếp sau:
Private Function a(m As Byte, Optional n As Byte) As Byte (1)
a = m + n(2)
End Function (3)
Private Sub thutuc(ByVal d As Byte, ByVal e As Byte) (4)
Dim x As Byte, y As Byte (5)
Câu 82: Đọc Đoạn chương trình sau cho kết quả là gì khi chọn OK :
Private Sub CmdP_Click()
Dim ReturnValue As Integer
ReturnValue = MsgBox( Close the program down , vbQuestion + vbOKCancel, Exit
Program )
Trang 23Select Case ReturnValue
1:Ket thuc chuong trinh
2:Hen gap lai
*3:Chao ban
4:Không hiện gì
Câu 124: Giả sử có bảng dữ liệu Sinhvien gồm (Hoten,Masv,Diachi,Diemtb) trong cơ sở dữ liệu db1.mdb Access, db1.mdb được mở kết nối bằng đối tượng Connection có tên là con từ trong vb.Đối tượng recordset để mở bảng có tên là rst, khi đó câu lệnh
Rst.open select * from sinhvien ,con
Sẽ thực hiện công việc:
1:Không thực hiện việc gì
2:Câu lệnh sai
*3:Mở toàn bộ bảng Sinhvien và đặt vào biến rst
4:Mở toàn bộ bảng Sinhvien và đặt vào biến con
Câu 67: Load là sự kiện của đối tượng nào sau đây
Trang 24Câu 59: Thuộc tính nào của đối tượng checkbox cho phép máy nhận biết nút đó có được check hay không?
Câu 20: Điều khiển FileListBox cho phép người sử dụng?
1:Chọn một tập tin trên máy tính
2:Chọn một kết nối đến dữ liệu
*3:Chọn tệp tin trên ổ đĩa hoặc trong thư mục
4:Chọn lựa ổ đĩa trên máy tính
Câu 86: Chương trình sau hiện kết quả thế nào?
Private Sub Form_Load()
Trang 25Câu 4: Khi người sử dụng ấn một phím bất kỳ thì thủ tục nào sau đây của Form sẽ thực hiện trước?
1:Form_MouseDown( )
2:Form_KeyUp( )
3:Form_KeyPress( )
*4:Form_KeyDown( )
Câu 39: Đọan chương trình sau :
Public Sub Inso() (1)
Dim x As Integer, y As Integer (2)
*2:FileListBox.Pattern= Khuôn mẫu
3:FileListBox.Filename= Khuôn mẫu
4:FileListBox.PatternFile= Khuôn mẫu
Câu 57: Các câu lệnh nằm trong thủ tục nào sẽ được kích hoạt đầu tiên ngay sau khi chạy Form:
*1:Form_load()
2:Form_Drag()
3:Form_click()
4:Form_MouseUp()
Câu 84: Chương trình sau thực hiện công việc gì?
Private Sub Form_Click()
Trang 261:Không in gì
*2:In ra 4 số ngẫu nhiên từ [0,1)
3:In ra các số ngẫu nhiên bất kỳ
4:In ra các số 1, 2, 3, 4
Câu 119: Thuộc tính listcount của đối tượng Drivelistbox sẽ xác định
*1:Tổng số ổ đĩa trong máy tính
2:Xác định các file trong một ổ đĩa
3:Không xác định gì
4:Tổng số thư mục trong một ổ đĩa
Câu 60: Đối tượng Frame dùng để làm gì?
1:Không dùng để làm gì cả
2:Dùng để tạo viền cho Form
3:Dùng để tạo một khung ảnh trên Form
*4:Dùng để tạo một nhóm các đối tượng
Câu 102: Trong một listbox lst1 có 10 phần tử giá trị, câu lệnh x=lst1.listcount thì x sẽ có giá trịlà
1:9
2:11
*3:10
4:0
Câu 90: Cho biết chương trình sau sẽ in ra kết quả gì?
Public Sub mmm(x As Long)
Trang 27Câu 109: Để hiển thị các file trong một thư mục vào đối tượng FileListbox Flst ta dùng lệnh1:Flst.Folder= Đường dẫn
2:Xóa bỏ phần tử cuối cùng của listbox
*3:Xóa bỏ mọi phần tử của listbox
4:Xóa bỏ phần tử đầu tiên của listbox
Câu 56: Đối tượng Class trong 1 Project dùng để:
1:Để khai báo các biến toàn cục (1)
Câu 92: Cho biết chương trình sau sẽ in ra kết quả gì?
Public Function nnn(ByValx As Long)
Dim y As Long
y = x
For i = 2 To y - 1
x = x * i
Trang 284:VB báo chương trình có lỗi.
Câu 50: Tập hợp các đối tượng trong một Form có tên là:
*1:Objects
2:Các đáp án khác đều đúng
3:Project
4:Controls
Câu 76: Kết quả của chương trình sau:
Sub thu(num As Integer)
Câu 43: Kiểu dữ liệu Double được sử dụng để:
1:Khai báo kiểu chuỗi
2:Khai báo kiểu số nguyên
3:Khai báo kiểu logic
*4:Khai báo kiểu số thực
Câu 138: Một Form có thuộc tính Name đăt là B Hãy xem các cách viết sau cách nào đúng1:B.Italic == True
2:B.Italic=I
*3:B.FontItalic=True
4:B.Italic=True
Trang 29Câu 19: Điều khiển DirListBox cho phép người sử dụng?
1:Chọn lựa ổ đĩa trên máy tính
*2:Chọn thư mục trên ổ đĩa hoặc trong thư mục
3:Chọn một kết nối đến dữ liệu
4:Chọn một tập tin trên máy tính
Câu 30: Để thêm một phần tử vào danh sách ta sử dụng lệnh?
Trang 303:Chuyển đến bản ghi kế tiếp
*4:Xoá bản ghi và chuyển đến bản ghi tiếp theo
Câu 13: Để làm một biểu mẫu frmMyForm ẩn đi, ta sử dụng đoạn mã nào dưới đây?
1:frmMyForm.Visible =False
2:frmMyForm.Hide
3:frmMyForm.Show
*4:frmMyForm.Hide hoặc frmMyForm.Visible =False
Câu 8: Chạy ứng dụng VB6.0 thì thủ tục nào sẽ được kích hoạt trước tiên khi Load một form vào bộ nhớ?
2:Form_Load(), Form_Active(), Form_Initialize()
3:Form_Load(), Form_Initialize(), Form_Active()
*4:Form_Initialize(), Form_Load(), Form_Active()
Câu 5: Khi người sử dụng kích chuột vào một vùng trống bất kỳ trên form nào đó thì thủ tục nào sẽ được thực hiện trước?
Trang 31Câu 34: Khi khai báo biến cục bộ với từ khóa Static nghĩa là?
1:Biến đó tồn tại vào có tầm hoạt động của toàn ứng dụng
*2:Mặc dù biến đó biến mất khi thủ tục chấm dứt nhưng giá trị của nó vẫn được giữ lại để tiếp tục hoạt động khi thủ tục được gọi lại trong lần sau
3:Không có ý nghĩa gì cả
4:Biến đó tồn tại vào có tầm hoạt động trong một Module nhất định
Câu 75: Hãy cho biết kết quả của HB bằng bao nhiêu?Nếu nhập vào điểm(D) bằng 8 và hạnh kiểm(HK) bằng C:
Sub Xeploai()
Dim HB As Long
Dim d As Double
Dim HK As String
d = InputBox( Nhap diem )
HK = InputBox( Nhap hanh kiem )
Trang 324:List.RemoveItem (Tên phần tử,Index)
Câu 95: Cho biết chương trình sau phạm lỗi cú pháp ở dòng nào?
Sub qqq(x as Byte, y as Byte) as Byte (1)
Dim Sum as integer (2)
Trang 33Câu 12: Để làm một biểu mẫu frmMyForm xuất hiện trên màn hình, ta sử dụng đoạn mã nào dưới đây?
1:frmMyform.Show
2:frmMyForm.Visible =True
3:frmMyForm.Hide
*4:frmMyForm.Show hoặc frmMyForm.Visible =True
Câu 38: Đọan chương trình sau :
Public Sub Inso() (1) Dim x As Integer, y As Integer (2)
Câu 89: Cho biết phát biểu nào sai trong các phát biểu sau:
*1:Trong VB, Procedure được phân làm 2 loại là Sub và Function
2:Không có phát biểu nào sai
3:Các thuộc tính Get, Set, Let của đối tượng không phải là procedure
4:Các từ khóa Public, private dùng để xác định phạm vi của procedure
Câu 96: Cho đoạn chương trình sau:
Trang 34Câu 114: Khi chọn một thư mục trong đối tượng DirListBox thì sự kiện nào sẽ được thực thi
*1:Change
2:List
3:Click
4:Mouse up
Câu 63: Giao diện làm việc của VB là gì?
1:Project & form
*2:GUI(Graphichcal user interface)
3:IDE(Intergrated deverlopment environment)
4:MDI(Multilple document interface)
Câu 48: Khi làm việc với Project có nhiều Form, ta dùng phương thức nào để hiển thị Form?1:Open
*2:Show
3:ShowForm
4:OpenForm
Câu 21: Hai thuộc tính Caption và Text khác nhau ở điểm nào?
1:Cả 2 phương án (1) và (2) đều sai
*2:Caption dùng cho các đối tượng như biểu mẫu, khung, nút lệnh, thường để hiển thị tiêu đề cho đối tượng Text dùng cho những điều khiển thuộc loại nhận dữ liệu do người dùng nhập vào như hộp văn bản, hộp kết hợp (2)
3:Text dùng cho các đối tượng như biểu mẫu, khung, nút lệnh, thường để hiển thị tiêu đề cho đối tượng Caption dùng cho những điều khiển thuộc loại nhận dữ liệu do người dùng nhập vào như hộp văn bản, hộp kết hợp (1)
4:Cả 2 phương án (1) và (2) đều đúng
Câu 77: Kết quả của chương trình sau:
Sub thu(ByVal num As Integer)
Trang 35Câu 18: Điều khiển DriveListBox cho phép người sử dụng?
1:Chọn thư mục trên ổ đĩa hoặc trong thư mục
*2:Chọn một kết nối đến dữ liệu
3:Chọn một tập tin trên máy tính
4:Chọn lựa ổ đĩa trên máy tính
Câu 31: Điều khiển OLE là tên gọi viết tắt của từ?
*1:Object Linking and Embedding
2:Option Linking and Embedding
3:Object List and Embedding
4:Object List and Empty
Câu 123: Công cụ Datagrid được dùng để:
1:Không hiển thị gì cả
2:Hiển thị dữ liệu trong dòng sau khi đã mở
*3:Hiển thị dữ liệu trong bảng sau khi đã mở
4:Hiển thị dữ liệu trong cột sau khi đã mở
Câu 130: Giả sử có bảng dữ liệu Sinhvien gồm (Hoten,Masv,Diachi,Diemtb) trong cơ sở dữ liệu db1.mdb Access, db1.mdb được mở kết nối bằng đối tượng Connection có tên là con từ trong vb.Đối tượng recordset để mở bảng có tên là rst, sau khi đó đoạn lệnh sau thì trạng thái các thuộc tính BOF và EOF lần lượt sẽ là?
Rst.open select * from sinhvien ,con
Câu 51: Để gán giá trị cho biến đối tượng a ta dùng cú pháp nào?
*1:Set a = tên đối tượng
2:a= Tên đối tượng
3:Dim a= tên đối tượng
4:Private a= tên đối tượng
Câu 14: Một dự án thông thường gồm có?
1:Một tệp tin dự án (.vbp) theo dõi toàn bộ các thành phần và nhiều tệp tin cho biểu mẫu (.frm)2:Một tệp tin cho từng module lớp (.cls) và một tệp tin cho từng module chuẩn (.bas)
3:Một tệp tin dự án (.vbp) theo dõi toàn bộ các thành phần và một tệp tin cho biểu mẫu (.frm)
*4:Tất cả các đáp án đều đúng
Trang 36Câu 80: Đoạn chương trình sau in kết quả là gì khi kích vào nút lệnh cmdchiahet và Text1=12?Private Sub Cmdchiahet_Click()
Dim ch As String
ch = Txt1.Text
If Val(Right(ch, 1)) Mod 2 = 0 Then
Txtketqua text=so&ch& la so đặc biệt
Câu 87: Cho biết chương trình sau sẽ in ra kết quả gì?
Public Sub yyy(x As Long, y As Long, z As Long)
Câu 11: Thủ tục Form_Active() được kích hoạt khi nào
1:Mỗi khi người sử dụng di chuyển chuột trên Form
*2:Mỗi khi người sử dụng kích hoạt Form
3:Khi người sử dụng đóng Form
4:Khi người sử dụng kích chuột lên Form
Câu 94: Cho biết chương trình sau sẽ in ra kết quả gì? :
Function www(Optional x As Byte = 2, Optional y As Byte = 4, Optional z As Byte = 6)
Trang 37*2:11 14
3:13 14
4:VB báo chương trình có lỗi
Câu 104: Giả sử một listbox lst có 5 phần tử, câu lệnh lst.RemoveItem 5 sẽ thực hiện như thế nào
1:Xóa bỏ phần tử thứ 4 ra khỏi danh sách
2:Xóa bỏ phần tử thứ 5 ra khỏi danh sách
*3:Lỗi cú pháp
4:Xóa bỏ phần tử đầu tiên ra khỏi danh sách
Câu 140: Một Form có tính chất Name là FrmB Hãy xem các cách viết sau cách nào đúng?
*1:Tên file được chọn trong thư mục
2:Tên file kèm thư mục được chọn
3:Tên thư mục được chọn
4:Tên file kèm đường dẫn
Câu 47: VB phát triển một chương trình dựa trên
1:Hệ thống menu và các tuỳ chọn thuộc tính bằng công cụ
*2:Tất cả các đáp án khác đều đúng
3:Form và các điều khiển
4:Các cửa sổ điều khiển thuộc tính và cửa sổ soạn thảo mã lệnh
Câu 144: Một Form có thuộc tính Name là B Hãy xem các cách viết sau cách nào đúng?1:B.Font=Bold
Trang 38Câu 142: Một nút lệnh có thuộc tính Name đặt là CmdQ Cách nào sau đây viết đúng
Câu 70: Chương trình sau, khi chạy sẽ in kết quả nào?
Private Sub Form_Load()
Rst.open select * from sinhvien ,con
Câu 42: Thủ tục Form_Active() được kích hoạt khi nào?
1:Mỗi khi người sử dụng di chuyển chuột trên Form
2:Khi người sử dụng kích chuột lên Form
*3:Mỗi khi người sử dụng kích hoạt Form
4:Khi người sử dụng đóng Form
Trang 39Câu 49: Trong một listbox lst1 có 10 phần tử giá trị, câu lệnh x=lst1.list(0) sẽ xác định phần tử thứ:
*1:1
2:10
3:lỗi cú pháp
4:0
Câu 18: chương trình sau thực hiện công việc gì?
Private Sub Form_Load()
Text1.BackColor = RGB(VRed.Value, VGreen.Value, VBlue.Value)
Else If CmdFrColor.Value Then
Text1.ForeColor = RGB(VRed.Value, VGreen.Value, VBlue.Value)
Text1.Text =
Text1.Text = Màu chữ đây
End If
End Sub
1:Chức năng hoà màu cho chữ trong text1
2:Chức năng hoà màu cho nền và chữ trong text1
*3:Chức năng hoà màu cho nền text1
4:Hoà màu cho nền hoặc chữ trong text1*
Câu 55: Để in một thông báo lên trên nền của form ta dùng lệnh
1:Cls <TB>;
2:Echo <TB>;
3:Msgbox <TB>;
*4:Print <TB>;
Trang 40Câu 73: Một hàm được viết như sau:
Public Function tinh(x As Integer, y As Integer, z As Integer)
Câu 7: Kiểu dữ liệu Variant được dùng để làm gì?
1:Thay thế cho kiểu dữ liệu chuỗi
*2:Lưu mọi dữ liệu khác nhau của VB
3:Lưu dữ liệu dạng số nguyên
4:Tạo kiểu dữ liệu tự do
Câu 67: Khi kích lên đối tượng DirListbox có tên là Dir1 để chọn thư mục trong cây thư mục thì sự kiện nào của nó sẽ được thực thi
1:Không có sự kiện nào được thực hiện
*2:Dir1_change()
3:Dir1_click()
4:Dir1_dblclick()
Câu 12: Hàm CDbl được dùng để thực hiện việc gì?
1:Chuyển đổi biến thành số thực theo dấu phẩy động
2:Chuyển đổi biến thành số thực đơn
3:Chuyển đổi biến thành số nguyên
*4:Chuyển đổi biến thành một số thực đôi
Câu 10: chương trình sau khi chạy hiện kết quả bằng bao nhiêu?
Private Sub Form_Load()
3:Không hiện kết quả gì
4:chương trình báo lỗi