在窗体上画一个Timer1计时器控件和一个Shape1形状控件，并编写如下程序Private Sub Form_Load()Timer1．Interval=1000Timer1．Enabled=TmeEnd SubPrivate Sub Timer1_Timer()If Shape1．Shape=1 ThenShape1．Shape=3ElseShape1．Shape=1End IfEnd Sub运行程序，则看到的结果是
A. 交替显示正方形和圆形，每秒交替一次
B. 交替显示矩形和椭圆形，每秒交替一次
C. 显示正方形，每秒闪烁一次
D. 显示椭圆形，每秒移动一次
查看答案
下面关于直线控件的叙述中正确的是
A. 它的X1、X2属性值必须满足X1＜X2
B. 如果显示的是一条垂直线，直线上面端点的坐标一定是(X1，Y1)
C. 如果有2个直线控件Line1和Line2，若Line1．X1=Line2．X2，则2条线有一端相连
D. 上述都是错误的
设窗体上有2个直线控件Line1和Line2，若使两条直线相连接，需满足的条件是
A. Line1．X1=Line2．X2且Line1．Y1=Line2．Y2
B. Line1．X1=Line2．Y1且Line1．Y1=Line2．X1
C. Line1．X2=Lihe2．X1且Line1．Y1=Line2．Y2
D. Line1．X2=Line2．X1且Line1．Y2=Line2．Y2
窗体上已有1个名称为Pieture1的图片框，要求实现下面2个功能之一：①在窗体上移动鼠标时，立即将Picture1显示在鼠标位置②在窗体上单击鼠标时，立即将Pieture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
A. Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Picture1．MoveX，Y End Sub
B. Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As Single) Picture1．Move X，Y End Sub
C. Private Sub Form_MouseDown(Button As Integer， Shift As Integer，X As Single，Y As Single) Picture1．CurrentX=X Pieture1．CurrentY=Y End Sub
D. Private Sub Form_MouseMove(Button As Integer， Shift As Integer，X As Single，Y As Single) Picture1．Move X，Y End Sub
在窗体上画一个名称为List1的列表框，然后编写如下程序：Private Sub Form_Click()For i=1 To 10Item="Item"&1List1．AddItem ItemNext iEnd Sub程序运行时，单击窗体，所完成的功能是
A. 向列表框中添加10个项目
B. 向列表框中添加11个项目
C. 向列表框中添加10个数字
D. 向列表框中添加1～10的和
微信支付 
支付宝支付