当前位置:首页 » 编程软件 » vb清除编程

vb清除编程

发布时间: 2024-07-14 19:06:32

Ⅰ VB缂栫▼涓,链夊瓧镄勬椂鍊欐竻闄,娌″瓧镄勬椂鍊欐庢牱鎶婃寜阍鍙樻秷澶憋纻

VB缂栫▼涓,涓轰简鍦ㄦ湁瀛楃殑镞跺欐竻闄,娌″瓧镄勬椂鍊欐庢牱鎶婃寜阍鍙樻秷澶憋纴鍙浠ラ氲繃妫娴嬫ゆ带浠剁殑灞炴э纴鑻ヤ负绌轰覆镞讹纴灏变护瀹幂殑Visible灞炴у彉涓篎alse

Ⅱ VB大小写转化及清除编程编程

Private Sub Command1_Click()
Text2 = UCase(Text1)
End Sub

Private Sub Command2_Click()
Text2 = LCase(Text1)
End Sub

Private Sub Command3_Click()
Text1 = ""
Text2 = ""
End Sub

Private Sub Form_Load()
Command1.Caption = "大写"
Command2.Caption = "小写"
Command3.Caption = "清除"
End Sub

Ⅲ 杩欎釜VB绋嫔簭甯鎴戞寚镣逛竴涓嬭ユ庝箞缂栫▼锛屾竻闄ゅ氨鏄娓呯┖锛岀Щ铡诲氨鏄鍒犻櫎锛岀粨𨱒熷氨鏄鍏抽棴绐楀彛銆

form涓婃坊锷爈ist1锛宭ist2锛屽洓涓鎸夐挳锛屽悕绉板瑰簲镙囬桡纴浠g爜濡备笅

Private Sub Form_Load()

Me.ScaleMode = 3
' 娣诲姞婕旂ず凿滃崟100涓锛岃彍璋辫嚜宸辨坊锷狅纴杩欓噷鍙鏄婕旂ず
For i = 1 To 100
List1.AddItem "凿滃悕" & i
Next i

List1.Columns = 3 '璁剧疆凿滆氨鍙浠ユ樉绀轰笁鍒
List1.Height = 100 '璁惧畾楂桦害
End Sub

Private Sub List1_DblClick() '鍙屽嚮凿滆氨椤硅嚜锷ㄦ坊锷
List2.AddItem List1.Text
List2.SetFocus
List2.ListIndex = List2.ListCount - 1
End Sub

Private Sub 娣诲姞_Click()
List2.AddItem List1.Text
End Sub

Private Sub 绉诲幓_Click()
List2.RemoveItem List2.ListIndex
List2.SetFocus
End Sub

Private Sub 娓呴櫎_Click()
List2.Clear
End Sub

Private Sub 缁撴潫_Click()
Me.Hide '鎴杣nload ME
End Sub

热点内容
华为Ul编程 发布:2024-11-26 04:27:15 浏览:147
oppor9s软件加密 发布:2024-11-26 04:27:13 浏览:678
连接数据库的服务器 发布:2024-11-26 04:17:51 浏览:492
java字符串编程 发布:2024-11-26 04:14:39 浏览:896
数据库修复破解 发布:2024-11-26 04:04:52 浏览:653
在线解压百度云 发布:2024-11-26 03:58:02 浏览:272
密码万能钥匙的密码怎么看密码 发布:2024-11-26 03:46:12 浏览:998
wds桥接后副路由器如何改无线密码 发布:2024-11-26 03:41:54 浏览:474
编程要求电脑什么配置高 发布:2024-11-26 03:41:09 浏览:467
抗解压模拟器软件下载 发布:2024-11-26 03:27:33 浏览:933