-
05-26-2009, 04:50 PM #1Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
cách hiển thị theo từng dòng và cột trong textbox
em có 1 bài tập làm tính chu kì trả nợ 1 khoản vay,về phần công thức thì làm được nhưng phần hiển thị thì pó tay,bác nào biết giúp giùm em 1 cái nha.
View more random threads:
- Hàm tự tạo trả về mảng các giá trị
- Anh nào có giáo trình hay Ebook excel nâng cao không ?
- Theo dõi hồ sơ vay vốn, thế chấp, cầm cố
- Tài liệu Macro
- VBA Copy file và đổi tên file từ thư mục này qua thư mục khác
- Cần hỗ trợ code VBA
- Viết code trong excel
- Dùng hàm cơ sở dữ liệu để thống kê nhân sự theo độ tuổi, thâm niên & học vấn (hỗ trợ bỡi VBA)
- Rút trích dữ liệu theo điều kiện !!
- Cần các bạn giúp về tải bảng kê vào HTKK 3.1.1
-
05-26-2009, 05:14 PM #2Silver member
- Ngày tham gia
- Mar 2016
- Bài viết
- 0
Ðề: cách hiển thị theo từng dòng và cột trong textbox
Có rất nhiều cách để đáp ứng yêu cầu của bạn. VD như dùng listview, subform, dataform,..
Bạn thử cách này xem nhé:
Đặt thuộc tính Defalt view của form là Continuous Forms, thuộc tính Record Souce của form là tên bảng hoặc tên query, hoặc câu lệnh chứa kết quả của bạn.
Tạo các textbox trong phần detail của form rồi buộc (bound) nó vào tên trường của dữ liệu nguồn.
Chúc thành công!
-
05-29-2009, 12:19 AM #3Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: cách hiển thị theo từng dòng và cột trong textbox
trình độ vb của em gà lắm , bác có thể chỉ rõ cách sử dụng listbox trong excel ko,nếu được có thể làm cho em 1 ví dụ dùng listbox ,thanks trước
-
05-29-2009, 06:22 AM #4Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: cách hiển thị theo từng dòng và cột trong textbox
Bạn mở VBA lên, tạo 1 cái Form rồi chèn 1 listbox vào form.
Bên cửa sổ Properties bạn chọn:
Column Count: Số cột
Rowsource: nguồn dữ liệu, ở Excel có thể chọn 1 vùng ví dụ A1:H12
Columns With: liệt kê bề rộng từng cột.
Trong file kèm theo có hình minh họa.
-
05-30-2009, 03:51 AM #5Silver member
- Ngày tham gia
- Dec 2015
- Bài viết
- 0
Ðề: cách hiển thị theo từng dòng và cột trong textbox
cám ơn bác nhiều ,cho em hỏi là nếu em ko có dữ liệu nguồn thì có cách nào hiển thị trưc tiếp trong listbox ko,tai bài tập của em ko cho dữ liệu sẵn trong excel,đây là bài tập của em,năm ở trang cuối cùng
http://www.mediafire.com/download.php?mtzz2nott2g
-
05-30-2009, 07:26 AM #6Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: cách hiển thị theo từng dòng và cột trong textbox
Nếu không lấy ngùôn dữ liệu có sẵn thì để trống RowSource.
Sau đó dùng AddItems để thêm 1 dòng vào listbox. Phát 10 lệnh AddItem thì được 10 dòng.
Kế đến là gán giá trị cho từng ô bằng:
object.List( row, column ) = biếnsố
Trong đó row và column bắt đầu từ 0 để chỉ dòng, cột đầu tiên.
Bài tập của bạn:
Sub nn()
Dim Nobandau, Laisuat, Soky, Duno, Tienlai, TraNoGoc, C11 As Double
Nobandau = 6000
Laisuat = 0.08
Soky = 10
UserForm1.ListBox1.AddItem
UserForm1.ListBox1.AddItem
UserForm1.ListBox1.List(0, 0) = "n"
UserForm1.ListBox1.List(1, 0) = " "
UserForm1.ListBox1.List(0, 1) = "Periodic"
UserForm1.ListBox1.List(1, 1) = "Payment "
UserForm1.ListBox1.List(0, 2) = "Payment "
UserForm1.ListBox1.List(1, 2) = "Interest"
UserForm1.ListBox1.List(0, 3) = "Payment "
UserForm1.ListBox1.List(1, 3) = "Principal"
UserForm1.ListBox1.List(0, 4) = "Balance"
UserForm1.ListBox1.List(1, 4) = " "
C11 = Pmt(Laisuat, Soky, Nobandau)
Duno = Nobandau
For m = 1 To Soky
Tienlai = Laisuat * Duno
TraNoGoc = -C11 - Tienlai
UserForm1.ListBox1.AddItem
UserForm1.ListBox1.List(m+1, 0) = m
UserForm1.ListBox1.List(m+1, 1) = Round(-C11, 2)
UserForm1.ListBox1.List(m+1, 2) = Round(Tienlai, 2)
UserForm1.ListBox1.List(m+1, 3) = Round(TraNoGoc, 2)
Duno = Duno - TraNoGoc
UserForm1.ListBox1.List(m+1, 4) = Round(Duno, 2)
Next
UserForm1.Show
End Sub
Ở Hải Phòng, không quá khó để bạn tìm được shop Đồ chơi tình dục nữ, nơi bán các sản phẩm hỗ trợ cho các chị em. Trứng rung ái tình cũng là một trong số những sản phẩm giúp giải tỏa sinh lý cực kỳ...
Chày rung tình yêu Bắc Giang - Phân phối dụng cụ tình yêu cho nữ