以下是引用t_fs在2008-10-8 6:20:00的发言：
用下列代码可以实现一半的功能了，剩下的选择的文件名及路径如何保存在当前行的”评价报告“中了。求问一下将 dlg.ShowDialog 结果保存在当前行的单元格中的公式，如何写？直接赋值不知可否？有了类似易表中的SetCellText函数就可以了。谢谢各位帮忙！
Dim dlg As New OpenFileDialog '定一个新的OpenFileDialog
dlg.Filter= "Excel文件|*.xls|Word文件|*.doc|Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
MessageBox.Show("你选择的是:" & dlg.FileName,"提示") '提示用户选择的文件
End If
其实不是foxtable难学，而是你根本没有学，否则接触foxtable一个月了，不会提出这样的问题的。
tables("表名")(r,c) = "内容"
tables(“表名").Rows(r)(c) = "内容"
r是整数，表示行号，c可以是整数(列位置)，也可以是字符(列名称)
再说一次：磨刀不误砍材工，心急吃不得热豆腐。
[此贴子已经被作者于2008-10-8 8:53:15编辑过]
加好友 
发短信
Post By：2008/10/8 8:53:00 [显示全部帖子]
