ngochuong279 > 01-07-17, 12:24 PM
tranthanhan1962 > 01-07-17, 01:57 PM
ngochuong279 > 03-07-17, 04:16 PM
ongke0711 > 03-07-17, 04:40 PM
ngochuong279 > 03-07-17, 04:47 PM
(03-07-17, 04:16 PM)ngochuong279 Đã viết:(01-07-17, 01:57 PM)tranthanhan1962 Đã viết: Nếu mình không nhầm bạn đang tạo một report dạng phiếu nhập xuất kho hay hóa đơn có 10 dòng thì phải. Nếu có 1 record thì còn 9 dòng, 2 record thì còn 8 dòng. v.v...
Đúng rồi bạn, bạn có cách nào không giúp mình cái
ongke0711 > 03-07-17, 09:47 PM
(03-07-17, 04:47 PM)ngochuong279 Đã viết: Mình muốn dùng code tren report không dùng quyr được không
tranthanhan1962 > 03-07-17, 11:33 PM
ongke0711 > 04-07-17, 02:47 AM
Option Explicit
Public TotCount As Integer
Const TotRowsPrint = 15 'Khai báo tong so dong trong hoa don'
Function KeThemDong(R As Report, RealTotRows As Integer)
TotCount = TotCount + 1
If TotCount = RealTotRows Then
R.NextRecord = False
ElseIf TotCount > RealTotRows And TotCount < TotRowsPrint Then
R.NextRecord = False
R![MaHang].Visible = False
R![TenHang].Visible = False
R![DonViTinh].Visible = False
R![SoLuong].Visible = False
R![DonGiaVND].Visible = False
R![TyLeChietKhau].Visible = False
R![ThanhTien].Visible = False
End If
End Function
ongke0711 > 04-07-17, 09:56 AM
hungacc > 09-09-17, 10:44 AM