kwrl.net
当前位置:首页 >> VB编程题 在窗体花两个命令按钮,标题分别设置为"... >>

VB编程题 在窗体花两个命令按钮,标题分别设置为"...

创建标准exe 粘贴下面代码就可以了 Private Sub Command1_Click() Text1.Visible = True End Sub Private Sub Command2_Click() Text1.Visible = False End Sub Private Sub Form_Load() Command1.Caption = "显示文本框" Command2.Caption = "...

(1) Private Sub Command1_Click()Print "AAAAAAA"Text1.Text = "BBBBBB"End Sub(2) Private Sub Command1_Click()Text1.Move 0, 0Text1.Text = "欢迎使用"End Sub(3) Private Sub Form_Load()Me.Move 1000, 2000, 6000, 3000End Sub

VB6 Me.Caption = ""VB.net Me.Text = ""

Private Sub Form_Load() Command1.Visible = False End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Command1.Visible = True End Sub 能用的话就请采纳!

1添加控件 Text1 2在窗体单击事件中加入代码Text1.Visible = False

If a Mod b = 0 Then Exit For End If Next b If a = b Then sum = sum + a End If Next a Else For a = 200 To 400 For b = 2 To a - 1 If a Mod b = 0 Then Exit For End If Next b If a = b Then sum = sum + a End If Next a End If Text1.T...

代码及注释如下: Private Sub C1_Click() x = Text1.Text'先用一个变量x暂存text1中的文本 Text1.Text = C2.Caption'然后将C2的内容,赋予text1中 C2.Caption = x'将x的值,也就是原来text1中的内容,赋予C2 End Sub

1-4:在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2,标题为“按钮一”、“按钮二”的命令按钮(如图1所示)。要求程序运行后,如果单击“按钮一”,则把“按钮二”移到“按钮一”上(如图2所示),使两个按钮重合。 private sub cmd1_click() cmd2....

1、设计一个应用程序,在运行中当用鼠标单击窗体form1上的命令按钮(显示)时,在窗体form2上显示出“欢迎您来到VB世界! ” sub command1_click() form2.show form2.print "欢迎您来到VB世界! " end sub 2、设计一个应用程序,由用户输入长方形的...

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