首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有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
67
问题
在窗体上有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,包含了所有控件和部分程序,如图1-23所示。要求如下:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;②请编写适当的程序完成以下功能:在Text1中输入40(度数)
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
已知图片框Picture1中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是( )。
内聚性是对模块功能强度的衡量,下列选项中,内聚性较弱的是()。
以下关于文件的叙述中,错误的是( )。
以下关于文件的叙述中,错误的是( )。
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
以下关于VB文件的叙述中,正确的是
在软件开发中,需求分析阶段产生的主要文档是( )。
对下列二叉树进行前序遍历的结果为
随机试题
Itisquitenecessaryforaqualifiedteachertohavegoodmannersand______(extension)knowledge.
急性腹膜炎最可靠的诊断依据是
丹毒的临床表现是( )疖的临床表现是( )
主要用于钢筋混凝土结构和预应力钢筋混凝土结构配筋的是()。
某企业去年的销售净利率为5.73%,资产周转率为2.17;今年的销售净利率为4.88%,资产周转率为2.88。若两年的资产负债率相同,今年的权益净利率比去年的变化趋势为( )。
运用存货模式确定现金最佳持有量时,其中的转换成本相当于存货管理中的()。
《中华人民共和国教师法》是由国家最高行政机关为提高教师队伍的素质而制定的。()
《劳动合同法》第96条规定:事业单位与实行聘用制的工作人员订立、履行、变更、解除或者终止劳动合同,法律、行政法规或者国务院另有规定的,依照其规定,未作规定的,依照本法有关规定执行。这一规则属于()。
科学发展观的核心是()。
Thechild’sabnormalbehaviorpuzzledthedoctor.
最新回复
(
0
)