資料庫列印

1. 如何列印資料庫表

在數據表中點下按鈕，自動填入數據，可以在代碼里加入每張表格的標題和方框，這樣下次使用只需要輸入數據，就可以自動生成了。
Sub text()
Dim k As Integer
k = 0
For i = 3 To Range("A65536").End(xlUp).Row
If i Mod 2 = 1 Then
Sheets("列印").Cells(3 + k, 2) = Cells(i, 1)
Sheets("列印").Cells(5 + k, 3) = Cells(i, 2)
Sheets("列印").Cells(8 + k, 4) = Cells(i, 4)

Else
Sheets("列印").Cells(3 + k, 7) = Cells(i, 1)
Sheets("列印").Cells(5 + k, 8) = Cells(i, 2)
Sheets("列印").Cells(8 + k, 9) = Cells(i, 4)
k = k + 11
End If
Next
End Sub

輸出到列印機的代碼是：
printer.print "數據"

2. 怎麼把資料庫連接中的ip地址列印出來

在電腦桌面，點擊菜單按鈕。然後點擊設置選項。然後點擊設備進入。然後點擊列印機和掃描儀選項。然後點擊管理按鈕。然後點擊列印機屬性按鈕。然後點擊埠選項。然後選擇一個列印機埠，點擊配置埠按鈕。最後輸入ip地址，就可以在列印機上列印IP地址了。