在表单FORM1中有一个文本框TEXT1,TEXT1的INIT事件代码如下:THIS.VALUE=0TEXT1的VALID事件代码如下:S=0FORi=1TOTHIS.VALUEIFi%5=0S=S+iENDIFENDFORTHIS.VALUE=S在TEXT1中输入22,然后按回车键,TEXT1中将显示()。
A.0
B. 22
C. 50
D. 100
A.0
B. 22
C. 50
D. 100
A.T+32
B. T32
C. t
D. 97
A.333.00
B.456123
C.123456
D.333.00
A. 333.00
B. B.456123
C. C.123456
D. D.-333.00
A.579
B.456123
C.123456
D.321654
A.{^2006/11/6}4
B. 2006/11/2
C. 2006/11/64
D. {^2006/11/2}
A.111222
B. -111
C. 222
D. 111-222
工程中有Form1和Form2两个窗体。程序运行时,在Form1中名称为Text1的文本框中输入一个数值(圆的半径),然后单击命令按钮“计算并显示”(其名称为Command1),则显示Form2窗体,且根据输入的圆的半径计算圆的面积,并在Form2的窗体上显示出来。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示“请输入数值数据!”,请填空。 Private Sub Command1_Click() If Text1.Text = "" Then MsgBox "请输入半径!" ElseIf Not IsNumeric() Then MsgBox "请输入数值数据!" Else r = Val(Text1.Text) Form2.Show __________.Print "圆的面积是" & 3.14 * r * r End If End Sub
工程中有Form1、Form2两个窗体(Form1中有文本框Text1;Form2中有Text1文本框和Command1命令按钮)。
Forml是启动窗体。在这些模块中编写下面的程序代码:
下面关于程序的叙述中错误的是
A.双击Form1的Text1后,Text1中显示“VisualBa.sic”,弹出Form2
B.双击Form1的Text1后,Form2成为当前窗体
C.单击Form2的命令按钮,Form1成为当前窗体
D.Form2的Text1=Form1.Text1语句不能正确执行
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!