单项选择题
单击命令按钮,下列事件过程的执行结果为( )。 Private Sub Command1_Click( ) Dim x As Integer, y As Integer x=40:y=72 Call PtoP(x, y) Print x; y End Sub Public Sub PtoP(Byval n AS Integer, ByVal m Aa Integer) n = n \ 10+2 m = m \ 10+2 End Sub
A.[Page]/,总[Pages]
B.=[Page]/,总[Pages]
C.[Page]&“//,总”& [Pages]
D.=[Page]&“/,总”&[Pages]
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1 的计时器控件,并把其Interval属性设置为500,如图所示: 编写如下程序:Private Sub Form_Load( )Timer1.Enabled=falseEnd SubPrivate Sub Command1 Click( )Timer1.Enabled=TrueEnd SubPrivate Sub Timer1_Timer( )If Label1.Left<Width ThenLabel1.Left=label1.Left+20ElseLabel1.Left=0End IfEnd Sub程序运行后单击“开始”按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是( )。
A.标签的移动方向为自右向左
B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动
C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动
D.标签按指定的时间间隔移动
点击查看答案
单项选择题
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:Private Type Personname As String*8major As String*20End TypeDim p As Person设文本框中的数据已正确地赋值给Person类型的变量P,当单击“保存”按钮时,能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是
A.Open "c:\Test2.dat" For Output As #1 Put #1,1,P Close #1
B.Open "c:\Test2.dat" For Random As #1 Get #1,1,P Close #1
C.Open "c:\Test2.dat" For Random As #1 Len=Len(p) Put #1,1,P Close #1
D.Open "c:\Test2.dat" For Random As #1 Len=Len(p) Get #1,1,P Close #1
点击查看答案&解析
相关试题
有如下的程序:Private Sub Command1_C...
窗体上有名称分别为Text1、Text2的2个文...