听力原文：M: Your sister Pauline didn't recognize me at first.
W: I'm not surprised. Why on earth don't you lose some weight？
Q: What does the woman suggest the man to do？
(15)
A. Go on a diet.
B. Talk to her sister.
C. Look at a map.
D. Try to win first prize.
查看答案
下列程序运行时输出的结果是()。 Option Base 1 Private Sub Form_Click() Dimx(10)As Integer,y(5) As Integer ForI=1 to 10 x(i)=10-I+1 NextI ForI=1 to 5 y(i)cx(2*-1)+x(2*I) NextI ForI=1 to 5 Printy(i)； NextI
A. 3 7 11 45 19
B. 17 13 9 5 1
C. 1 3 5 7 9
D. 不确定的值
Counseling programs have helped in preventing children from re sorting to violence.
A. Y
B. N
C. NG
在窗体上添加一个命令按钮，然后编写如下事件过程： Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程
A. 35
B. 33
C. 31
D. 29
在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时，打开一个保存文件的通用对话框。该窗口的标题为“Save”，缺省文件名为“SaveFile”；在“文件类型”栏中显示*.txt。则能够满足上述要求的程序是()
A. Private Sub Command_Cilck() CommonDialOR1.P11eName="SaveFile" CommonDialOg1.Filter="AllFiles|*.*|(*.txt)|(*.doc)|*.doc" CommonDialOg1.P11terlndex=2 CommonDialOg1.DialogTitle="Save" CommonDialOg1.Action=2 End Sub
B. Private Sub Commandl_Click() CommonDial021.FileName："SaveFile" CommonDialog1.Pnter二”AllFlleS卜刮(*．txt)陡txtHdOc卜doc” CommonDialog1.FilterIndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1.Action=2 End Sub
C. Private Sub Commandl_Cilck() CommonDialog1.FileName="Save" CommonDialog1.Filter="AllFileS|*.*|(*.txt)|*.txt|(*.doc)|*.doc" CommonDialog1.Filterlndex=2 C0mmonDialoZ1.DialogTitle="SaveFlle" CommonDialog1.Action=2 End Sub
D. Private Sub Commandl_Click() CommonOialoR1.FlleName="SaveFile" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doc)|*.doc" CommonDialog1.Filterlndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1.Action=1 End Sub
微信支付 
支付宝支付