老师,动态增加的pic,怎么让它显示找到的这一行的数据呢?
Dim pal1 As WinForm.Panel
pal1 =frm.CreateControl("Panel1",ControlTypeEnum.Panel)
pal1.dock = 1 '锚定
pal1.Height= 150 '页面高度
frm.AddControl(pal1) '增加Panel1
Dim pic As WinForm.PictureBox
pic = e.Form.CreateControl("PictureBox1", ControlTypeEnum.PictureBox)
pic.SetBounds(35, 5, 50, 70) '(x, y, Width, Height)
e.Form.Controls("Panel1").AddControl(pic)
pic.BindingField = "账号密码.头像"
pic.SizeMode = ImageSizeMode.Zoom '头像缩放方式
Dim piv As WinForm.PictureBox = e.Form.Controls("PictureBox1")
Dim ftp As New FTPClient
ftp.host="120.**.**.0"
ftp.Account = "ft"
ftp.password = "1****"
piv.FTPclient = ftp
Dim drs As DataRow = DataTables("账号密码").sqlFind("[姓名] = '" & _UserXingMing & "'")
需要pic控件显示:姓名=_UserXingMing 这一行的头像
[此贴子已经被作者于2019/10/12 12:26:20编辑过]