A.Print 25
B.Picture1.Print 25
C.Text1. Print 25
D.Debug. Print 25
[单选题]假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是()A . Print25B . Picture1.Print25C . Text1.Print25D . Text1.text=25
[单选题]假定Picture1和Text1分别为图片框和文本框的名称,则下列错误的语句是( )。A.Print25B.Picture1.Print25C.Te
[单选题]假定Picturel和Textl分别为图片框和文本框的名称,下列不正确的语句是( )。A. Print 25B. Picturel.Print 25C. Text.Print 25D. Debug.Print 25
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文本框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是。Private Sub Text1_LostFocus()C.all CheckInput(Text1,500)E.nd SubPrivate Sub Text2_LostFocus()C.all CheckInput(Text2,1000)E.nd SubSub CheckInput(
[单选题]在窗体上有2个图片框,名称分别为Picture1和Picture2,Picture2中添加了香蕉图片(见图3),且将Picture2.DragMode属性设置为1。要求程序运行时,可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现此功能的事件过程是( )。
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文卒框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是______。 Private Sub Text1 LostFocus() Call CheckInput(Text1,500) End Sub Private Sub Text2 LostFocus() Call CheCkInput(Text2,1000) End Sub Sub Ch
[单选题]窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是( )。A.AB.aC.CD.c
[单选题]( 28 ) 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 , 要求文本框 Text1 中输入的数据小于 500 , 文本框 Text2 中输入的数据小于 1000 ,否则重新输入。为了实现以上功能,在下列程序中问号( ? )处应填入的内容是( )。Private Sub Text1_LostFocus( )C.all CheckInput(Text1,500)E.nd SubPrivate Sub Text2_LostFocus( )C.all CheckInput(Tex
[单选题]在窗体上先后画2个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片(见图1),且将banana.DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖拽到Picture1中(见图2)。能实现此功能的事件过程是()A.Priate Sub Form_DragDrop(Source As Control,X As Single,Y As Single banana.Move Picture1.Left+X,Picture1.Top+Y)E.nd Sub
[单选题]( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程:Private Sub Command1_Click()x = 0D.o While x < 50x = (x + 2) * (x + 3)n = n + 1Looptext1.Text = Str(n)text2.Text = Str(x)E.nd Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为A. ) 1 和 0B. ) 2