主题：请教一个关于显示员工照片的问题

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目290.table

For i As Integer = 1 To 3
    Dim p As WinForm.PictureBox = e.form.Controls("PictureBox" & i)
    p.image = Nothing
    Dim lbl As WinForm.label = e.form.Controls("label" & i)
    lbl.text = Nothing
Next
Dim bm As String = e.Form.Controls("ComboBox1").Value
Dim ks As String = e.Form.Controls("ComboBox2").Value
Dim drs As List(of DataRow) = DataTables("表A").Select("部门 = '" & bm & "' And 科室 = '" & ks & "'")
Dim cnt As Integer = math.Min(3,drs.count)
For i As Integer = 1 To cnt
    Dim p As WinForm.PictureBox = e.form.Controls("PictureBox" & i)
    p.Image = getImage(drs(i-1)("照片"))
    Dim lbl As WinForm.label = e.form.Controls("label" & i)
    lbl.text = GetComboListString(drs(i-1)("姓名"))
Next

 

照片和姓名一起显示是不是这个代码？

是的，插入三个标签，名称分别是 nm1, nm2,nm3，用于显示姓名。

其实处理方式和图片是一样的

 

 

是的

可是执行上述代码出现错误窗口啊，搞不懂
此主题相关图片如下：cuowu.jpg

哪里错了，麻烦指点一哈

语法错了，错得非常离谱，短短一行代码：

lbl.text = getcomboliststring(drs(i-1)("姓名"))

就有5、6个错误，而且几乎都是原则性的错误。

 

你看看GHetComboListString的说明：

http://www.foxtable.com/help/topics/1435.htm

 

 

你应该先看帮助，系统学习一下，才动手，先看《使用指南》，看三遍，使用熟悉了，再按顺序看《开发指南》。

foxtable虽然简单，但毕竟是一个开发工具，需要系统学习，瞎摸索不可能掌握的。

你只有掌握了基本的原理和方法，别人对你的帮助才有意义，否则帮你写再多的代码，也只是浪费时间而已。

学习中。。。。。。

哎呀，学了半天没弄懂，看来得需要好长时间啊，能不能把上述错误代码改正一下，狐狸爸爸