看到C#那边出了一个打印本月月历的题目,VB版也来玩下吧
要求就是打印出本月的月历,具体参考:
http://topic.csdn.net/u/20110630/19/743bdaf7-ed26-47c3-a02d-6ed9fa58f0f4.html
vb里没有什么linq,也不懂什么linq,所以就用纯字符串操作了
输出结果:
http://topic.csdn.net/u/20110630/19/743bdaf7-ed26-47c3-a02d-6ed9fa58f0f4.html
vb里没有什么linq,也不懂什么linq,所以就用纯字符串操作了
Private Sub Form_Load()
Dim s$, i%, strDatePre$, d1 As Date
strDatePre = DatePart("yyyy", Now) & "-" & DatePart("m", Now) & "-"
s = "SU MO TU WE TH FR SA" & vbCrLf
Do
i = i + 1
d1 = strDatePre & i
If i = 1 Then s = s & Space((DatePart("w", d1) - 1) * 3)
s = s & Space(2 - Len(CStr(i))) & i & " "
If DatePart("w", d1) = 7 Then s = s & vbCrLf
If DatePart("d", d1 + 1) = 1 Then Exit Do
Loop
MsgBox s
End Sub输出结果:
SU MO TU WE TH FR SA
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31
...全文
相关推荐
免费DataGridView打印及.NET轻松打印控件5.6版(VB打印,C#打印)
本文展示了如何在WPF应用程序中使用VB2008Print组件进行打印预览和打印操作。内容包括了打印控件的使用示例和代码,以及.NET4.0的支持。介绍了控件5.6版的新特性,如SimpleRepor
免费DataGridView打印及.NET轻松打印控件5.5版(VB打印,C#打印)
本文展示了如何在WPF应用程序中使用VB2008Print组件进行打印预览和打印操作。内容包括了打印控件的使用示例和代码,以及控件5.5版相较于5.4版的改进和新增功能。新版控件提升了打印预览速度,增
免费DataGridView打印及.NET轻松打印控件6.01版(VB打印,C#打印,图表打印,Excel导入导出,多表头显示与打印)
本文介绍了如何在WPF应用中使用VB2008Print组件实现打印预览与打印功能,包含多控件示例及帮助文档。重点解决6.01版本对XP和Windows Server 2008系统下的打印问题。
免费DataGridView打印及.NET轻松打印控件5.7版(VB打印,C#打印,Excel导入导出,多表头显示与打印)
本文介绍了在WPF应用中使用VB2008Print组件实现打印预览和打印的功能,包含多个打印控件的示例及.NET4.0专用控件的源码和文档。版本5.7改进了Excel导出功能,并增加了多项实用特性。
免费DataGridView打印及.NET轻松打印控件5.0版
本文详细介绍了在窗口程序和网页中使用打印控件的方法,并提供了C#和VB语言的示例源代码。控件5.0版相较于前一版本进行了多项改进,如打印预览页码显示、打印DataGridView选定内容、绘图函数增强


VB基础类
