vb窗体变色代码
答:Form1.ForeColor = "&H0000FF" ' 窗体字体颜色通过ForeColor属性设置,这里设置为红色Form1.BackColor = "&H00FF00" ' 窗体背景颜色通过BackColor属性设置,这里设置为绿色End Sub
答:值 颜色 0 黑色 1 兰色 2 绿色 3 青色 4 红色 5 洋红色 6 黄色 7 白色 8 灰色 9 亮兰色 10 亮绿色 11 亮青色 12 亮红色 13 亮洋红色 14 亮黄色 15 亮白色 例如:你用下面代码可以改变窗体的背景颜色为红色 Me.BackColor = ...
答:vb中的颜色 VB中 &H80000000&(16进制8位,8开头) 这种 方式表示的颜色代表系统默认的各项设置的颜色 比如按钮,窗体 其他的就是 RGB颜色值 RGB 颜色值的范围就是 &H0-&HFFFFFF &HBBGGRR BB 是蓝色,GG是绿色,RR是红色 范围都是 0-255 从颜色中分离 红绿蓝 r = (color And &HFF&)g...
答:2.在窗体中添加这个Commondialog控件,再添加一个按钮。3.双击按钮再添加如下代码:Private Sub Command1_Click()CommonDialog1.ShowColor Form1.BackColor = CommonDialog1.Color End Sub 4.按F5键启动程序,单击按钮就可以给程序界面更换颜色了!5.利用这种方法你可以更改任何控件的前景或背景色。比如...
答:dim ch ch=inputbox("请输入")select case ch case 1 BackColor = RGB(255, 0, 0) '红色 case 2 BackColor = RGB(0, 255, 0) '绿色 csae 3 BackColor = RGB(0, 0, 255) '蓝色 end select
答:Private Sub CommandButton1_Click()UserForm1.BackColor = &HC000& End Sub 这是我在EXCEL里面测试的代码 可以变通一下,如果上面的方法行不通的话 在窗体上加一个image控件 点击加上图片就可以了
答:Private Sub Text1_GotFocus()Text1.BackColor = &HC0C0FF '光标在文本框时变色 End Sub Private Sub Text1_LostFocus()Text1.BackColor = &HFFFFFF '光标不在文本框时还原白色 End Sub
答:创建一个Time控件、Label1控件,代码如下:Private Sub Form_Load()Timer1.Interval = 500End SubPrivate Sub Timer1_Timer()a = Int(Rnd * 256)b = Int(Rnd * 256)c = Int(Rnd * 256)Label1.ForeColor = RGB(a, b, c)End Sub就可以实现Label1控件的字体随机颜色变换。
答:使用Point方法,窗体判色代码:Private Sub Form1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Text1 = X Text2 = Y Text3 = Point(X, Y)Text4 = (Val(Text3) Mod 65536) Mod 256 'Red Text5 = (Val(Text3) Mod 65536) \ 256 'Green Text6 = Val...
答:1 在工具箱添加 microsoft common dialog control 部件 2 用新增的commondialog工具在窗体上添加一个commondialog控件 3 接着代码如下,如此类推就可以了 Private Sub Form_Click()c1.ShowColor Form1.BackColor = c1.Color End Sub
网友评论:
木生19425588740:
VB的窗体背景自动变色代码怎么写 -
34315籍有
: VB的窗体背景自动变色代码怎么写 Private Sub Command1_Click() Print "HELLO,VB" Form1.ForeColor = "&H0000FF" ' 窗体字体颜色通过ForeColor属性设置,这里设置为红色 Form1.BackColor = "&H00FF00" ' 窗体背景颜色通过BackColor属性设置,这里设置为绿色 End Sub
木生19425588740:
vb窗体颜色代码 -
34315籍有
: Private Sub CommandButton1_Click() UserForm1.BackColor = &HC000&End Sub这是我在EXCEL里面测试的代码可以变通一下,如果上面的方法行不通的话 在窗体上加一个image控件 点击加上图片就可以了
木生19425588740:
VB窗体颜色背景怎么弄 -
34315籍有
: 可以在属性面板里面的BackColor设置或者可以用代码比如 Form1.BackColor=vbBlack '窗体背景为黑色
木生19425588740:
vb中,如何设置窗体的颜色随时间改变的代码? -
34315籍有
: 在一个时钟过程中写入你要改变的颜色,就可以了.比如我随机改变颜色(设置interval的属性值为2000,意思是间隔2秒改变一次) Private Sub Timer1_Timer() Randomize Dim r, g, b r = 255 * Rnd g = 255 * Rnd b = 255 * Rnd Me.BackColor = RGB(r, g, b) End Sub
木生19425588740:
请问在VB中的窗体背景颜色的设置代码是怎样的啊?
34315籍有
: 设置BackColor属性 form1.BackColor = vbRed form1.BackColor = RGB(255,255,0)
木生19425588740:
VB 怎么改变窗体的颜色 怎么显示一段话 -
34315籍有
: 第一个问题:1.打开VB,在“工程”→“部件”中选择“Microsoft Common Dialog Control 6.0”单击确定.2.在窗体中添加这个Commondialog控件,再添加一个按钮.3.双击按钮再添加如下代码:Private Sub Command1_Click() ...
木生19425588740:
vb中点击窗体文本框颜色就变换的代码怎么写 -
34315籍有
: Private Sub Text1_GotFocus()Text1.BackColor = &HC0C0FF '光标在文本框时变色End SubPrivate Sub Text1_LostFocus()Text1.BackColor = &HFFFFFF '光标不在文本框时还原白色End Sub
木生19425588740:
使用VB编写程序实现,输入1时,窗体背景颜色为红色,输入2时,窗体背景颜色为绿色,输 -
34315籍有
: dim ch% ch=inputbox("请输入") select case chcase 1BackColor = RGB(255, 0, 0) '红色case 2BackColor = RGB(0, 255, 0) '绿色csae 3BackColor = RGB(0, 0, 255) '蓝色 end select
木生19425588740:
vb中如何在窗体中一行打出颜色不同的字 -
34315籍有
: 不能..普通的textbox只能设置1种文字颜色..你可以使用richtextbox控件来实现.. 方法就是: SelColor=颜色.
木生19425588740:
vb里怎么才能每次点击窗体都能使窗体的颜色变的不一样? 求代码 -
34315籍有
: Private Sub Command1_Click()Randomize TimerBackColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)End Sub