Tham khảo tài liệu 'tự học thiết kế chương trình cho học sinh làm toán bằng visual basic tập 2 part 6', công nghệ thông tin, cơ sở dữ liệu phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | 50 TextBox Name BackColor Font Name Font Size Font Style Text Txt13 Màu trắng MS Sans Serif 24 Bold để trống 51 TextBox Name BackColor Font Name Font Size Font Style Text Txt14 Màu trắng MS Sans Serif 24 Bold để trống 52 TextBox Name BackColor Font Name Font Size Font Style Text Txt1 5 Màu trắng MS Sans Serif 24 Bold dể trống 53 TextBox Name BackColor Font Name Font Size Font Style Text Txtl6 Màu tráng MS Sans Serif 24 Bold dể trống 54 TextBox Name BackColor Font Name Font Size Font Style Text Txt17 Màu trắng MS Sans Serif 24 Bold dể trống 55 TextBox Name BackColor Font Name Txt18 Màu trắng MS Sans Serif 340 Font Size Font Style Text 24 Bold dể trống 56 TextBox Name BackColor Font Name Font Size Font Style Text Txt19 Màu trắng MS Sans Serif 24 Bold để trống 57 TextBox Name BackColor Font Name Font Size Font Style Text Txt20 Màu trắng MS Sans Serif 24 Bold dể trống 58 Command Button Name Caption Font Name Font Size Font Style CmdKetquaORbit Xem kết quả OR bit VNI - Helve Condense 16 Normal 59 Command Button Name Caption Font Name Font Size Font Style CmdketquaANDbit Xem kết qưâ AND bit VNI - Helve Condense 16 Normal 60 Command Button Name Caption Font Name Font Size Font Style CmdKetquaXORbit Xem kết quả XOR bit VNI - Helve Condense 16 Normal 61 Command Button Name Caption Font Name Font Size Font Style CmdExit Exit VNI - Helve Condense 18 Normal 341 Bước 1 THIẾT KẾ FORM CỦA CHƯƠNG TRÌNH Bạn lần lượt lây các điều kiểm từ hộp công cụ để dưa vào Form của chương trình sau đó xác lập các thuộc tính cho tâ t cả các điều kiểm theo như bảng dã cho ở trên. Bạn thiết kế các TextBox dể nhập theo hàng ngang từ trái qua phải từ trên xuống để dược 20 TextBox. Bước 2 VIẾT CODE CHO CHƯƠNG TRÌNH Option Explicit 1 Viết Code cho điều kiểm CmdExit Private Sub CmdExit ClickO End End Sub 2 Viết Code cho điều kiểm CmdketquaANDbit Private Sub CmdKetquaANDbit_Click If Txt10 1 And Txt20 - 1 Then Lbl20 1 Else Lbl20 O End If If Txt9 1 And Txtl 9 1 Then Lbll9 1 Else .
