Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Điều kiện nút option button
#1
Em muốn tạo 2 nút option button, khi nhấn 1 nút thì nút kia sẽ bị ẩn đi và không thể click vào được. Có ai biết xin chỉ giáo giùm em.
Chữ ký của maixuanthu Kiên trì và bình tĩnh sẽ giúp bạn thành công!
Reply
Những người đã cảm ơn
#2
(02-06-13, 12:38 PM)maixuanthu Đã viết: Em muốn tạo 2 nút option button, khi nhấn 1 nút thì nút kia sẽ bị ẩn đi và không thể click vào được. Có ai biết xin chỉ giáo giùm em.

Bạn có thể nói rõ hơn không? Hoặc cụ thể chụp hình post lên. Hỏi vầy thì Bợm cũng potay.
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
(02-06-13, 12:38 PM)maixuanthu Đã viết: Em muốn tạo 2 nút option button, khi nhấn 1 nút thì nút kia sẽ bị ẩn đi và không thể click vào được. Có ai biết xin chỉ giáo giùm em.

Làm được nhưng khi nút thứ 2 bị ẩn đi thì làm sao mà click khi có yêu cầu? Yêu cầu của bạn có lẽ không khả thi. Chỉ có thể là khi click cái thứ nhất thì ẩn đi một control nào đó(ví dụ commandbuton, textbox, combobox....), tương tự như cái thứ hai
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn khải nguyên
#4
Đồng chí Maixuanthu này diễn đạt câu hỏi SAI rồi , chỉ có khi kích vào nút này thì nó mờ đi còn nút kia thôi ,nhưng tham khảo phần dưới đây chắc là đúng ý đó .
Thử làm cách sau xem sao:
Tạo Hai Nút Option Buton Theo thứ tự : Nhân Viên +Lương

Private Sub Form_Load()
‘Phần này của Form Nhan Vien
‘Có Option Value =1
‘Khi mờ Form Nhân Viên này thì nút Nhân Viên chìm xuống không thể nhấn đc còn nút Lương nổi lên Form Nhân Viên hiển thị vì có
Menu = 1
End Sub

Private Sub Form_Load()
‘ Phần này của Form Lương
‘Có Option Value =2
‘Khi mờ Form Lương này thì nút Lương chìm xuống không thể nhấn đc còn nút Nhân Viên nổi lên Form Nhân Viên hiển thị vì có
Menu = 2
End Sub

Private Sub Menu_AfterUpdate()
‘ Phần này có Defaul Value =1
Select Case Menu
Case 1
DoCmd.OpenForm "nhanvien"
DoCmd.GoToRecord , , acNewRec
DoCmd.Close acForm, "Luong"
End Select
End Sub
Không hiểu sao bây giờ kg tải đc File lên Midia File...toàn báo Thất Bại khi chạy hết 100/100
Nghiên Cứu ,Chúc Thành Công
Khải Nguyên .
Chữ ký của khải nguyên Khải Nguyên Xin Gửi lời chào tới Tất cả các bạn trên Diễn Đàn Thủ Thuật Access
Chúc cả nhà may mắn và  thành đạt ! Lightbulb
Reply
Những người đã cảm ơn
#5
Hi bạn! maixuanthu

Vấn đề bạn hỏi thì cách giải quyết không nằm ở bản thân 2 cái "hột đậu" (radian option) đó, mà nằm ở ngoài cái khung bao 2 đứa nó ấy (Frame).

Hạt ALL bạn đặt giá trị Option Value là 1 và thằng kia là 2 đúng không! Khi người nhấn vào 1 trong 2 thằng nó thì hạt đen đen sẽ chuyển sang và thằng cha nó (Frame) sẽ mang giá trị (Value) 1 hoặc 2. Lợi dụng điều này bạn hãy xử lý sự kiện <khi giá trị của thằng cha thay đổi> (OnClick hoặc AfterUpdate đều được).

Khi AfterUpdate bạn xét xem giá trị thằng cha (Frame) là 1 hay 2 mà Enable thằng combobox bên dưới. Đơn giản vậy thôi.

Còn khi nút XEM được click, bạn cũng đi xét giá trị thằng cha frCHON.Value là 1 hay là 2 mà truyền điều kiện đó vào report lúc open là được.

code:
Mã PHP:
Private Sub cmdXEM_Click()
    
Dim dk As String
    
    Select 
Case frChon.Value
        
Case 1
            dk 
""
        
Case 2
            
If IsNull(cmbTinhTrangThen
                dk 
""
            
Else
                
dk "tinhtrang='" cmbTinhTrang.Value "'"
            
End If
    
End Select
    DoCmd
.OpenReport "thongkeslhvtheotinhtrang"acViewPreview, , dk
End Sub

Private Sub frChon_AfterUpdate()
    
Select Case frChon.Value
        
Case 1
            cmbTinhTrang
.Enabled False
        
Case 2
            cmbTinhTrang
.Enabled True
    End Select
End Sub 
ღღღღღTài sản của bomnhauag (View All Items) ღღღღღ
Reply
Những người đã cảm ơn maixuanthu
#6
Vấn đề của Maixuanthu không rõ ràng. Tốt nhất bạn up file lên và đưa ra yêu cầu cụ thể.
Chữ ký của haquocquan Guest, you are welcome!
ღღღღღTài sản của haquocquan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Lọc có điều kiện ở listbox phiacuoiconduong 2 97 18-11-16, 06:40 PM
Bài mới nhất: ongke0711
  Lọc theo điều kiện trong listbox Ranju 3 183 06-10-16, 05:26 PM
Bài mới nhất: Ranju
  Thay đổi màu nền các dòng theo điều kiện trên form Continuous tranthanhan1962 9 1,701 27-09-16, 11:01 PM
Bài mới nhất: ongke0711
  Không cho phép điều chỉnh kích thước của Form ChiMai 1 129 18-09-16, 01:27 PM
Bài mới nhất: ongke0711
  Thắc mắc về nút lựa chọn Option box nam8384 14 837 20-08-16, 08:58 PM
Bài mới nhất: maidinhdan

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ