更新时间2022-03-17 16:41:29
2、对form1的标题设为“窗体学习”,背景设为图片背景,对窗体单击时在窗体中部显示红色“成功!”两个大字。
3、在窗体的左上部添加一个Label(标签)控件和在右下部添加一个commandbutton(按钮)控件,当连续不断地单击按钮时,标签中的文字也不断地变大并向右移动。
4、在窗体上建立一个文本框,在文本框中输入一个单词(如2021级学生),在窗体上双击时,文本框消失,同时在窗体上显示出此单词,效果如下图
'第二:
private sub form_load()
form1.caption="窗体学习"
end sub
private sub form_click()
show '使输出可视
print"成功!" 'print输出到窗体.
'待会调一下窗体的字体颜色属性。
end sub
'背景为窗体的属性,推荐用image,cls和clear无法清除。
'要清除就cls
'3:
private sub command1_click()
label1.left=label1.left +100 '可以自己调
Label1.Height = Label1.Height + 100
label1.width=label1.width+100
end sub
'4:说实话,太简单了。
Private Sub Form_DblClick()
show '使输出可视
a=text1.text
text1.visible=false
print a
End Sub
'采纳!采纳!
'这个符号是注释。(')