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 = "...

Private Sub Command1_Click() Dim a As Integer, b As Integer a = Text1 b = Text2 Text3 = a + b End Sub Private Sub Form_Load() Text1 = "" Text2 = "" Text3 = "" End Sub

(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

Private Sub Form_Click()Text1.Visible = FalseText2.Visible = TrueEnd SubPrivate Sub Form_DblClick()Text1.Visible = TrueText2.Visible = FalseEnd Sub

计时器的interval属性值设为1000

问题是单击命令按钮,清除文本框内容吧 如果是,可以用下边代码。 sub command1_click() text1.text="" end sub

答案选择A。因为把窗体的KeyPreview属性设置为True后,优先激活键盘的KeyPress事件。注意哦,SaveAll的初始值是一个空字符串。

练习1-12: Private Sub Form_Click() Text1.Move 0, 0 End Sub Private Sub Text1_Change() Text1.Move Me.Width - Text1.Width, 0 End Sub 练习1-13: Private Sub C1_Click() Text1.Text = LCase(Text1.Text) Text2.Text = UCase(Text1.Text) E...

第一轮:X=1;N=0 while x

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