VB实例 —万年历 (1)
1、创建控件:lbl1、txt1、lbl2、cmd1
2、lbl1.caption=输入日期(任一种正确格式):
设置lbl1、txt1、lbl2、cmd1的字体大小及颜色;
3、双击按钮“确认”,添加代码,效果为:
Option Explicit
Private Sub cmd1_Click()
Dim a, b
b = txt1.Text
a = Weekday(b)
Select Case a
Case 1
lbl2.Caption = "星期日"
Case 2
lbl2.Caption = "星期一"
Case 3
lbl2.Caption = "星期二"
Case 4
lbl2.Caption = "星期三"
Case 5
lbl2.Caption = "星期四"
Case 6
lbl2.Caption = "星期五"
Case 7
&nb
相关文档:
做毕业论文的时候遇到的一个问题,请教豆瓣上的网友才有了答案。谢谢这位叫“异彩”的朋友。拿出来与大家分享。
用VB做图像处理软件的毕业论文,遇到一个问题。加载一幅图片,用多个滤镜分别处理,想一步一步UNDO到最原始的图像,多次UNDO怎么实现?
参考方案:
如果想做到多次UND ......
昨天下午我和小胖被米老师传唤到市医院去,米老师想听听他周六上的课对我的影响有多大,我回答的基本内容和《10年 VB 1》里面的内容差不多,但米老师感觉很空洞,感觉我在泛泛而谈,其实我也有感觉。
为了将米老师说的总结方法应用于实践,我这两天敲代码发现MsgBox,InputBox,Print的用法差不多,然后就将其总结如下:
......
第一次正式去上米老师的课,这次是寒假来后的第一节课,内容主要是交流一下寒假的学习情况。
首先是言行问题:去机房上课时,带胸牌、笔记本、笔、《Visual Basic 程序设计》、鞋套、眼镜,手机能不带就不带;别人发言时,显示器关掉,面向对方以示尊敬。
......
最近在学习windows API的时候发现在个叫句柄的概念搞不清楚,于是查了一下现在把自己的理解写出来,后面再贴网上的介绍。句柄是一个代表窗口的正整数,当然窗口的概念在这里包含了桌面、按钮、滚动条等,这就是我最简单的理解了。
以下是网上的介绍:
了解句柄
在调用 ......