在窗体上有一个命令按钮Commandl，编写事件代码如下：Private SuB commandl_Click（)Dim d1 As Date

在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private SuB cormmandl_Cli

在窗体上有一个命令按钮Commandl，编写事件代码如下：Private SuB cormmandl_Click（)Dim y As Inte

在窗体上有一个命令按钮Commandl，编写事件代码如下：Private SuB commandl_Click（)Dim x As Integ

（25）在窗体上有一个命令按钮Commandl，编写下列程序： Private Sub Command1_Click（) Print ppl（3,

（27）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer P

（30）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer P