- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
随机背景色与卷轴控制背景色
05.隨機背景色與捲軸控制背景色
1. 繼續拉出一個 「按鈕」物件
2. 將按鈕屬性caption改為 「紅色背景色」
3. 點擊按鈕(紅色背景)二下 ,進入程式編輯模式 ,輸入下圖的程式碼 :RGB()為顏色函數 ,三
個參數各別是放入R(紅色) ,G(綠色) ,B(藍色) ,三個顏色的量 ,255為最大值 ,0為最小值
,以下圖為例 ,紅色全放 ,綠色、藍色為0 ,出來的顏色就只有紅色。如果三個顏色都不放
,那出來的就是黑色、三個都放滿255 ,就是白色。你也可以設定form表單的底色 ,物件名
稱改為Form1即可。
05.隨機背景色與捲軸控制背景色 Page.1
4. 再拉一個按鈕 ,將按鈕屬性caption改為 「隨機背景色」
5. 點擊按鈕(隨機背景色)二下 ,進入程式編輯模式 ,輸入下圖的程式碼 :下列程式碼中,r,g,b
三個為變數 ,負責接收亂數產出後的數字 ,因為一次要取三個亂數 ,所以使用三個變數
r,g,b ,分別接收三個亂數 ,最後一行再將取得的亂數 ,以變數名稱 ,放入RGB()函數。你也
可同時呈現你取得的亂數在text1物件中,再加一行Text1.Text r vbCrLf g vbCrLf b
。程式碼中,其中為連結符號 ,可以連接二個不同的字串或變數 ,vbCrLf為VB程式語言
中的換行符號。但是Text物件預設是不可以換行 ,所以還必需把Text物件的MultiLine多行的
屬性 ,改為True。
6. 接下來你可能必需把Form1的畫面再拉大一點 ,因為要其他的一些物件 ,請點HScrollBar物
件 ,如下圖:
05.隨機背景色與捲軸控制背景色 Page.2
7. 在Fomr1拉出一條水平捲軸 ,如下圖所示 :
8. 接下來 ,再拉二個水平捲軸物件 ,也可以使用複製現在物件 ,再貼上。但是在貼上時 ,請
不要產生陣列物件 ,如下圖所示 :請選 「否」。
9. 先調整三個水平捲軸的屬性 :把Max(最大值)屬性改為255
10.點選Label(標籤)物件 ,拉出一文字標籤物件 :
05.隨機背景色與捲軸控制背景色 Page.3
11.點選Label1物件 ,在Caption屬性 ,改為
您可能关注的文档
最近下载
- 电动汽车充电站服务规范.docx VIP
- 地下停车场结构防水工程施工技术要点与质量控制体系研究.docx VIP
- 第一单元 混合运算与数量关系(单元解读讲义) 2025苏教版三年级数学上册.docx
- 轻钢结构装配式建筑技术要点与质量控制体系研究.docx VIP
- 电动汽车充电站运营管理制度.docx VIP
- 绿化隔离带工程精细化施工技术要点与质量控制体系研究.docx VIP
- 电动汽车充电站运营管理制度.doc VIP
- 新能源汽车充电站运营与维护手册.doc VIP
- 人教版高中物理必修一高一上学期期中试卷【解析版】(4).docx VIP
- 2025年新能源汽车充电站运营安全管理制度.pdf VIP
原创力文档


文档评论(0)