首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt3.vbp,窗体上有一个命令按钮Commandl(标题为”下一个”)。 要求:在窗体上建立一个单选按钮数组Optionl,含4个单选按钮,标题分别为”选项1”、”选项2”、”选项3”、”选项4”,初始状态下,”选择1”为选中
在考生目录下有一个工程文件sjt3.vbp,窗体上有一个命令按钮Commandl(标题为”下一个”)。 要求:在窗体上建立一个单选按钮数组Optionl,含4个单选按钮,标题分别为”选项1”、”选项2”、”选项3”、”选项4”,初始状态下,”选择1”为选中
admin
2019-06-11
93
问题
在考生目录下有一个工程文件sjt3.vbp,窗体上有一个命令按钮Commandl(标题为”下一个”)。
要求:在窗体上建立一个单选按钮数组Optionl,含4个单选按钮,标题分别为”选项1”、”选项2”、”选项3”、”选项4”,初始状态下,”选择1”为选中状态。如图2-97所示。窗体文件中已经给出了命令按钮的Click。事件过程,但不完整,请去掉程序中的注释符,把程序中的?改为正确的内容,使得每单击命令按钮一次,就选中下一个单选按钮,如果已经选中最后一个单选按钮,再单击命令按钮,则选中第一个单选按钮。
注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件中的本题工程文件sjt3.vbp,如表3-55在窗体中用”复制”和”粘贴”命令画出包含4个元素的单选数组并设置属性。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符”’“,将问号”?”改为正确的内容。 参考代码: Private Sub Commandl_Click( ) For k=0 To 3 If Optionl(k).Value Then n = k End If Next k Optionl(n).Value=False n=n+ 1 If n=4 Then n=0 End If Optionl(n).Value=True End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/vRUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件,如图所示。现有如下程序:PublicSubdisplay(xAsControl)IfTypeOfxisLabelThenx
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPriv
为了使文本框Text1中的文本不能被编辑,但能滚动和选择,下列正确的设置为()。
医院里有不同的科室,每名医生分属不同科室,则实体科室与实体医生间的联系是()。
编写如下程序代码:PrivateSubCommand1_Click()DimtAsIntegerDimnAsInteger,xAsIntegert=0F0rn=1To12
下列选项中属于面向对象设计方法主要特征的是
数据库设计过程不包括
下面描述中不属于数据库系统特点的是
下列关于数据库设计的叙述中,正确的是
数据库系统的核心是()。
随机试题
设备安装监理的主要工作内容包括()。
桡神经损伤,出现
女性,37岁,腹胀、腹泻与便秘交替半年,常有午后低热,夜间盗汗。体检:腹壁柔韧感,轻度压痛,肝脾未触及,腹水征(+)。腹水检查:比重1.018,蛋白25g/L,白细胞700×106/L,中性0.30,淋巴0.70,红细胞300×106/L,本例最可能诊断是
“人芝兰之室,久而不闻其香”描述的是()。
网络并不是文学经典遭遇尴尬的______,但网络______的癖性,确实将文学经典本来就脆弱的存在又推入到了一个更加感伤的历史时空。填入划横线部分最恰当的一项是()。
蛋:卤蛋:松花蛋
-3,12,77,252,()
MozartwasborninwhatisnowcalledAustri,but,atthattime,itwaspartoftheHolyRomanEmpire.Hewasbaptizedthedaya
如果在C盘当前文件夹下已存在名为StuData.dat的顺序文件,则执行语句Open"C:StuData.dat"ForAppendAs#1.的结果是()。
RickSnyder,thegovernorofMichigan,thinksofhimselfasacan-dokindofguy.Hewasasuccessfulbusinessman,overseeingex
最新回复
(
0
)