• 所有问题

    • 编写一个VB事件程序：运行后（在运行后连续完成）第一次单击窗体使背景颜色为红色，二次黄色，三次为绿色

    要完整的编写代码，用到static和case非常谢谢！！！

    举报该问题
    推荐答案   2010-01-04

    复制下边的代码就OK了：

    Private Sub Form_Click()

    Static Times As Integer

    Times = Times + 1

    Select Case Times

       Case 1

           Me.BackColor = vbRed

       Case 2

           Me.BackColor = vbYellow

       Case 3

           Me.BackColor = vbGreen

    End Select

    End Sub 

    运行效果可以看图，完全OK！！

    温馨提示：答案为网友推荐，仅供参考
    其他回答
    第1个回答  2010-01-17
    我来晚了
    相似回答
    ...使得当单击窗体时,将窗体的背景颜色改为红色(&HFF&).答：Private Sub Form_Load()Me.Caption = "改变颜色"
    全国计算机二级vb考试内容全国计算机二级考试VB操作试题及答案_百度知 ...答：(2)在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把Textl中的内容复制到Text2...
    VB程序设计:在窗体上有一个命令按钮Command1和一个标签框Label1,编写...答：注意:如果是改变字体大小的话，要设置label 的autosize 属性为 true Private Sub Command1_Click()' Label1.Height = Label1.Height * 4 '改变控件高度 Label1.Font.Size = Label1.Font.Size * 4 '改变字体大小End Sub
    vb期末考试试题谁有啊答：13、在VB 中,数值型变量的初值为 (16) ,Varant型变量的初值为 (17) ,布尔型变量的初值为 (18) 。14、设置窗体的 (19) 属性,可在窗体上显示图片。15、程序运行工程中,清除MP图片框中的图片应使用语句 (20) 。二、选择题1、菜单控件只包括一个事件,即 (1) ,当用鼠标单击或键盘选中后按“回车”键时...
    VB 编写适当的事件过程,程序运行后,如果单击窗体可使文本框移到左上角...答：Private Sub Form_Click()Text1.Top = 0 Text1.Left = 0 End Sub Private Sub Form_DblClick()Text1.Width = Text1.Width - 200 End Sub 不过当运行双击窗体时，会先运行单击窗体事件。
    VB题:在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程...答：第一次单击按钮，x=0,开始执行for 循环，i=1 时，执行y=y+x=0+0=0，x=x+2=0+2=2 i=2时，执行y=y+x=0+2=2，x=x+2=2+2=4 i=3时，循环结束。第二次单击按钮，x=4,开始执行for 循环，i=1 时，执行y=y+x=0+4=4，x=x+2=4+2=6 i=2时，执行y=y+x=4+6=10，x...
    在VB中,程序运行后,单击窗体,输出结果是? 求过程~答：点击控件，会显示相应的结果。完整程序如下：Private Sub Command1_Click()Print Str(m)End Sub Private Sub Form_Click()m = 1 For i = 1 To 4 Step 1 Print Str(m)m = m + 1 For j = 1 To i Print " * "Next j Print Next i End Sub 显示的结果会在左上角。
    求:vb如何让第一个程序运行后第2个程序自动运行啊?答：在第一个程序的窗体上放一个timer代码如下 Private Sub Form_Load()Timer1.Interval = 3000 Timer1.Enabled = True End Sub Private Sub Timer1_Timer()Shell "c:\asdf.exe" '你第二程序的路径 Timer1.Enabled =False End Sub 这样你第一个程序运行3秒后,启动第二个程序 ...
    VB,运行下面程序,当单击窗体时,窗体上显示的内容的第一行是( ),第二...答：x的值变为23，接着执行form1.print x语句，在窗体上输出x，即23（所以第一行显示23）第二次调用的子过程结束，回到第一次调用的子程序，继续执行end if 后的语句，即x=x*2+1,x的值变为47，接着执行form1.print x语句，在窗体上输出x，即47（所以第二行显示47）第一次调用的子程序结束 ...
    大家正在搜
    关闭后后运行程序软件编写一个程序用高级程序设计语言编写的程序程序运行后程序运行后的结果是下列程序运行后一个c程序的执行是从汇编语言编写的程序通常程序编程软件
    相关问题
    建立一个窗体，运行窗体后，第一次点击窗体，窗体的背景颜色变红...
    使用VB编写程序实现,输入1时,窗体背景颜色为红色,输入2时...
    新建工程,再窗体上依次添加3个文本框和三个标签,编写事件过程...
    如何编写一个程序,让2个数求和..还有如何编写连续单击窗体,...
    VB程序运行后，如果单击窗体，如何编写代码可是标签移至窗体的...
    vb编写代码单击命令按钮改变窗体颜色
    怎样在vb中command1上发生单击将窗体的背景变成红色
    VB,运行下面程序，当单击窗体时，窗体上显示的内容的第一行是...