问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

VB有没有让选择年月的控件(日期不用出来)

发布网友 发布时间:2023-04-27 05:50

我来回答

1个回答

热心网友 时间:2023-10-13 23:58

自己用两个COMBO写一个不就行了吗
何必用控件呢
##################################
Private Sub Form_Load()
For n = 1949 To 2008
Combo1.AddItem n
Next
Combo1.ListIndex = 0
For n = 1 To 12
Combo2.AddItem n
Next
Combo2.ListIndex = 0
End Sub
‘以如下的方式获取时间
Private Sub Command1_Click()
MsgBox "当前选择的是" & Combo1.Text & "年" & Combo2.Text & "月", vbInformation, "年月"
End Sub

希望对你有帮助
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
mrna转录试剂盒 windows7应用程序损坏或丢失怎么办? 联想windows7怎么恢复不小心删除的应用 Win7电脑图标不见了如何恢复解决Win7电脑图标丢失问题的有效方法_百 ... 美女主播软件有哪些 什么软件看美女直播? 什么视频直播软件可以免费看女神直播? 钣金工业设计 钣金灰本段用途 关于刮胡子的相关问题 306千卡等于多少食物 2014年福建福州市区学校招考教师及工作人员公告 2020年上半年福建福州市晋安区教师资格认定工作的公告 写作文怎么描写小动物? 描写小动物的作文怎么写? 入团申请书600字5篇 入团申请书600字左右10篇 好听的单身狗网名 单身个性网名 家长给高三的孩子写信应该怎么写 阿胶是大部分女性都喜欢吃的一种补品该如何分辨阿胶的真假呢 优秀高中毕业生自我鉴定500字五篇 女生超拽冷酷霸气网名,女生超拽冷酷霸气网名 逋堕的引证解释逋堕的引证解释是什么 沦堕的引证解释沦堕的引证解释是什么 励志演讲稿500字左右8篇 有道理的哲理个性签名大全 爸爸写给大脾气女儿十岁成长礼一封信? 谁帮忙想4个名字适合四个人游戏开黑用的英雄联盟的不要奇怪的符号 2312轴承极限转速 轴承2312比1312的有什么不同 微信哪里查看事故责任书 交通事故对方加微信怎么聊 袒裸的读音袒裸的读音是什么 袒裸的网络解释袒裸的网络解释是什么 裸裼的读音裸裼的读音是什么 带锦的古风名字女孩女孩带锦字好听的名字锦字取名女孩寓意好的 锦字的女孩名字 家常手擀面最正宗的做法 我怎么上前程无忧网总上不去说我网络有问题上其他网页也可以啊 为什么前程无忧显示的进度页面进不去 广州成人自考大专的报考条件有哪些? 广东省成人高考在哪里报名?报名时间,报名条件是什么 韩彭的引证解释韩彭的引证解释是什么 彭聃的引证解释彭聃的引证解释是什么 _彭的引证解释_彭的引证解释是什么 彭考的引证解释彭考的引证解释是什么 潘阳湖在哪里个省份 低保员是什么职位 0.6安100瓦的风机应使用多少平方的线 8寸排风扇是几平方的电线