首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有4个文本框,名称分别为Text1、Text2、Text3、Text4,和1个名称为Command1的命令按钮,然后编写如下程序代码: Private Sub Command1_Click() Dim year%, month%, days
在窗体上有4个文本框,名称分别为Text1、Text2、Text3、Text4,和1个名称为Command1的命令按钮,然后编写如下程序代码: Private Sub Command1_Click() Dim year%, month%, days
admin
2020-06-30
62
问题
在窗体上有4个文本框,名称分别为Text1、Text2、Text3、Text4,和1个名称为Command1的命令按钮,然后编写如下程序代码:
Private Sub Command1_Click()
Dim year%, month%, days%
year = Val(Text1)
month = Val(Text3)
For k = 1 To month - 1
Select Case k
Case 1, 3, 5, 7, 8, 10:
days = days + 1
Case 4, 6, 9, 11:
days = days + 30
Case 2:
days = days +______________
End Select
Next k
Text4 = days
End Sub
Function LeapYear(x As Integer) As Integer
If x Mod 400 = 0 Or x Mod 4 = 0 And x Mod 100 <> 0 Then
LeapYear = 1
Else
LeapYear = 0
End If
End Function
程序的功能是在Text1、Text2、Text3中分别输入年、月、日,然后单击命令按钮,则可在Text4中显示该天是当年的第几天,如图所示。程序不完整,在横线上应填写的是
选项
A、28
B、29
C、28 + LeapYear(year)
D、LeapYear(year)
答案
C
解析
通过Val函数,将输入的三个字符串,转化成数字,分别赋值给year,month,days。 For循环用于累加从1第个月到第month-1个月的天数,Case根据月份k判断该月份的天数,空白处需要填写的是2月份的总天数。函数LeapYear,当为闰年时,返回值LeapYear为1,否则返回值为0,故28 + LeapYear(year)是2月份的总天数,当闰年时,2月份为29天,否则,为28天,故C项正确,其他选项错误。
转载请注明原文地址:https://kaotiyun.com/show/IIHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生目录下有一个工程文件sjt3.vbp,窗体文件中已给出所有控件和部分程序,如图3-119所示。要求:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;②请编写适当的程序完成以下功能:在Text1中输入40(
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Label1和Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Text1和Text2、初
(1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则把它的大写形式显示在标签Label1中;若是大写字母,则把它的小写形式显示在Label1中;若是其他字符,则把该字
在考生文件夹下有一个工程文件sjt5.vbp,在该工程中为考生提供了一个通用过程,考生可以直接调用。请在窗体上画一个名称为Text1的文本框;画一个名称为C1、标题为“计算”的命令按钮;再画两个单选按钮,名称分别为Op1、Op2,标题分别为“求500到
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框,名称为Text1,字体为“黑体”,文本框中的初始内容为“程序设计”;再画一个命令按钮,名称为C1,标题为“改变字体”(如
在考生文件夹下有一个工程文件sjl5.vbp,窗体上有2个标题分别是“读数据”和“查找质数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图3-36所示。程序功能:(1)考生文件
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
下面正确使用动态数组的是()。
以下关于文件的叙述中,错误的是( )。
软件设计中模块划分应遵循的准则是( )。
随机试题
最常引起肝、脾、淋巴结肿大及中枢神经系统白血病的是()
患者,男性,15岁,癫痫大发作入院,医生请各科会诊该病例。该行为符合医德的哪项原则
猩红热的临床特点应除外
经纬仪有四条主要轴线,如果视准轴不垂直于横轴,此时望远镜绕横轴旋转时,则视准轴的轨迹是()。[2016年真题]
根据规定,下列有关各单位会计机构和会计业务设置的说法中,正确的有()。
按照投资基础的不同,下列选项中不属于现金流量表的是()。
提出“最近发展区”的教育家是()。
海伦.凯勒是举世______的作家和教育家。尽管命运之神夺走了她的视力和听力,这位女子却用勤奋和坚韧不拔的精神紧紧扼住了命运的喉咙。她的名字已经成为坚韧不拔意志的象征,传奇般的一生成为鼓舞人们战胜______的巨大精神力量。填入划横线部分最
国际经营战略[上海财经大学2015国际商务硕士]
Intheclassicmarriagevow(誓约),couplespromisetostaytogetherinsicknessandinhealth.Butanewstudyfindsthattheris
最新回复
(
0
)