wxsh.net
当前位置:首页>>关于急求VB作业 两个按钮单击一个按钮隐藏另一个按钮!·的资料>>

急求VB作业 两个按钮单击一个按钮隐藏另一个按钮!·

窗体中做三个命令按钮和一个标签,复制以下代码,就OK了: Private Sub Command1_Click() Label1.Caption = "欢迎使用VB6.0" End Sub Private Sub Command2_Click() Label1.Caption = "祝贺您进入VB世界!" End Sub Private Sub Command3_Click(...

你用什么控件播放的?或者使用API,肯定不同的播放方式不同的方法停止

Adodc1.ConnectionString="Driver={SQL Server};Server=192.168.1.1;UID=sa;PWD=111"Adodc1.RecordSource="select * from A where B='"+Text1+"'" Adodc1.RefreshSet DataFrid1.DataSource=Adodc1你搞什么,这么简单的问题写这么多麻烦

设置窗体属性keypreview=true 在窗体keydown 事件中添加下以代码 if keyascii=38 then command1_click '上方向键 if keyascii=40 then command2_click '下方向键

'本过程从数据库中读取学生数据,存储在相应的变量中,并在List1中显示 '代码略 '定义了一个连接到数据库的对象,它是ADODB.Connection的实例,名称是conn Dim conn As New ADODB.Connection conn.ConnectionString = "provider=Microsoft.ACE.O...

刚刚写过了类似的代码 ,算了 再写下 Private Sub Command1_Click() Static i As Integer '说明下,假设 用户名、密码 分别是 yutian8802和 123456 If i > 2 Then MsgBox "您已登录三次了。。。程序将结束!" End Else If Text1.Text = "yutian8...

帮你找了一个 扑克游戏编程关键有两点:一是扑克牌面的绘制;二是扑克游戏规则的算法实现。初学扑克游戏编程的爱好者可从一些简单的游戏、借用一些现有资源开始。本文拟借用Windows自带的Cards.dll和简单的21点游戏为例,介绍扑克游戏编程的初步...

private void button1_Click(object sender, EventArgs e) { Timer t = new Timer(); t.Interval = 50; int n = 0; int w = this.label1.Width; t.Tick += (s, ee) => { n += 10; int d = this.Width - w; this.label1.Left = n % d; }; t.Star...

就是自己编写一个子过程(sub等)来实现功能 例 s=1!+2!+3!+4!+...+10! 编程如下: Dim s As Long Private Sub Command1_Click() For i = 1 To 10 Call jc(i) '调用子过程 Sum = Sum + s Next i Print s End Sub Private Sub jc(ByVal n As Inte...

网站首页 | 网站地图
All rights reserved Powered by www.wxsh.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com