www问答网
所有问题
当前搜索:
vb中改变窗体背景颜色的程序设计
怎么在
vb窗体
上直接显示内容(汉字),可以
改变
它出现
的
位置,大小,
颜色
等...
答:
1、打开
VB
软件,在
窗体
上添加一个标签。2、点击标签,在属性
窗口
设置标签的属性和名称,将其Caption设置为“快乐学习”。3、再在窗体上面,添加一个列表框控件。4、双击列表框,开始编辑代码。5、运行
程序
,点击列表框中不同的数值,观察标签中字体的大小变化。注意事项:VB拥有图形用户界面(GUI)和快速...
vb
在
窗体
中添加
背景
图片
答:
可以用image呀 这个控件有个stretch属性 设置其值为true 将其image的width及height分别等于form1的scalewidth及scaleheight 把图片加入到image中即可 这样又能看到全部图片 而且此图片又和
窗体的
大小相当
VB
如何获得
窗体
指定地点
颜色
?
答:
要获取指定点
的颜色
,还是要调用WIN的API来实现Private Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long 如获取当前
窗口
指定座标点的(x=100,y=100),这里的x,y是指像素点,不是
VB
默认的度量单位(缇)颜色值=Get...
如何
修改VB程序
的Command控件字体
颜色
?
答:
Visual Basic允许
程序
员
改变
一个CommandButton
的背景色
--简单的将样式设为Graphical然后改变BackColor就行了。但却没有提供一个简单的方法去改变CommandButton的文字
的颜色
。本文将告诉你怎样根据你的意愿改变CommandButton的文本颜色,而且如果按钮上有图片的话,还可以将文本显示在按钮的底部。 在工程中添加以下模块(Modul...
VB窗口的
功能是什么,如何打开属性窗口
答:
VB窗口的
功能主要是进行界面
的设计
,通过不同控件来完成界面的设计。一、打开属性窗口的方法。1、“视图”菜单下的“属性窗口”项。2、直接在控件或
窗体
上右键单击弹出的菜单中选择“属性窗口”。3、在工程资源管理器中右键点击窗体、模块、类模块等弹出的菜单中选择“属性窗口”。
VB
如何
改变
所编
程序的
菜单栏
的颜色
?
答:
.hbrBack = CreateSolidBrush(
vb
Yellow)End With SetMenuInfo GetMenu(Me.hWnd), mi 'main menu bar DrawMenuBar Me.hWnd '其实上面
的程序
就可以满足你的要求了,不过,加上下面的语句,显得更有意思一些 For i = 0 To itemnum - 1 With mi .cbSize = Len(mi).fMask = MIM_BACKGROUND Or...
VB中
怎么
改变
单击按键的
颜色
?
答:
1、打开Visual Basic 6.0软件,新建一个标准exe工程;2、在
设计窗体
上添加一个Command控件;3、点击选中Command1控件,在属性
窗口
中设置其Style属性为1;4、接着在属性窗口中设置Command1的Backcolor属性,设置自己需要
的颜色
;5、即可以看到所使用的Command1控件的颜色为自己需要的颜色;...
在
vb中
使用listview控件时,如何能
改变
其中某一行的
颜色
,求助了 望高 ...
答:
For i = 1 To ListView1.ColumnHeaders.Count - 1 ListView1.SelectedItem.ListSubItems(i).ForeColor =
vb
RedNext i 第二个问题:当双击(其实就是选中)某一行时,ListView.SelectedItem.Index 这个属性会
改变
,只要根据这个不同的值来判断打开哪个
窗口
就可以了。Private Sub ListView1_DblClick...
VB程序
标题栏和主
窗体的的
界面怎么
修改
答:
这种情况一般是标题栏文字为动态生成的情况,比如说在Form1_Load过程中有一行:Form1.Caption="Test"这种情况下标题栏文字就变为“Test”了。一般情况下为了防止恶意
修改
,
窗体的
属性即便已通过属性
窗口
设置好,还是会用代码设置一遍的。
VB
编写
程序
:
设计
一个程序,当单击
窗体
时,在窗体上显示任意一幅图片。怎样...
答:
首先添加一个
窗体
,在这个窗体上加一个文本框的控件,在这个文本框的单击事件中写如下
的程序
:Dim num, sum, it(1), n, t, hPrivate Sub Form_Click()File1.Refreshsum = 0List1.ClearFor i = 0 To File1.ListCount - 1t = Split(File1.List(i), ".")(UBound(Split(File1.List(i...
棣栭〉
<涓婁竴椤
5
6
7
8
10
11
12
9
13
14
涓嬩竴椤
灏鹃〉
其他人还搜