vb如何直接用代码创建一个text到指定位置?
vb吧
全部回复
仅看楼主
level 1
vb入门,也就信息课的水平
想试一下编一个贪吃蛇,用text的框当地图,就想知道能不能直接在开始时批量生成text的框,顺便赋个值
2021年04月18日 05点04分 1
吧务
level 14
你可以用createwindow和sendmessage函数,具体的用法可以到msdn上查看
2021年04月19日 02点04分 2
level 11
这个问题是不是你问过一次了?
2021年04月19日 07点04分 3
楼主发了两遍帖子
2021年04月19日 08点04分
@初音✨七奈 哦,原来如此
2021年04月19日 09点04分
level 7
学绘图吧,画一个正方形比动态创建text的框简单.
2021年04月19日 09点04分 4
吧务
level 13
' 用代码创建一个文本框
' X:左边距离;Y:顶部距离
' 控件 T 的第一个参数是要添加的控件,第二个是控件名
Public Sub Create_Text(ByVal X As Integer, ByVal Y As Integer)
Dim T As Object
Static Num As Long
Set T = Me.Controls.Add("VB.textbox", "Text" & Num, Me)
T.Left = X
T.Top = Y
T.Text = "Text" & Num ' 指定控件文本内容
Num = Num + 1 ' 防止下一个控件名重复
T.Visible = True ' 设置控件可见
End Sub
2021年04月19日 09点04分 5
1