编写适当事件过程。选中一个单选按钮,并单击“确定”按钮,按照表3-1在文本框中显示相应的内容。
提供Command1对象的Click事件源代码如下,请补充完整。
Private Sub Command1_Click()
If ? Then
Text1.Text="需要1小时"
End If
If ? Then
Text1. Text="需要10小时"
End If
If ? Then
Text1. Text="需要20小时"
End If
If ? Then
Text1. Text="需要100小时"
End If
If ? Then
Text1.Text ="需要500小时"
End If
End Sub
注意:不得修改已经给出的程序。在结束程序运行之前,必须选择进行上面的一种操作.退出程序时必须通过单击窗体右上角的关闭按钮.存盘时必须存放在考生丈件夹下,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm.
第1题
以下语句的输出结果【 】。
S$= "China"
S$= "Shanghai"。
Print S$
第4题
您的密码”。在标签的下方画一个文本框,名称为“密码框”,其高度和宽度分别为2000和500。要求在输入密码时,文本框中显示“*”字符。以上这些设置必须在设计过程中进行,运行时的窗体如图1所示。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为ylcl.vbp,窗体文件名为ylcl.frm。
第5题
在窗体上画一个文本框和一个图片框,然后编写下列两个事件过程:
Private Sub Form_C1ick()
Textl.Text="VB Programming"
End Sub
Private SubText1_change()
Picture1.Print"VB程序设计"
End SUb
程序运行后,单击窗体,则在文本框中显示的内容是______,而在图片框中显示的内容是______。
第7题
设当前日期为2008年4月28日,星期一,则执行下面语句后的输出结果为______。
Print Day(Now)
Print Month(Now)
Print Year(Now)
Print Weekday(Now)
第8题
设有如下程序段:
a$="BeujingShanghai"
b$=Mid(a$,Instr(a$,"g")+1)。
执行上面的程序段后,变量b$的值为______。
第10题
片框中填充不同的图案,请填写程序的空白处,使程序完整。Private Sub Optionl_Click() Dim H,W Picture1.Cls Picturel.FillStyle=________ W=Picturel.ScaleWidth/2 H=Picturel.ScaleHeight/2 Picture1.Circle(W,H),W/2 End Sub
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!