Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
下载信息 [文件大小: 下载次数: ] | |
![]() |
这里应该用ComboBox,而不是DropDownBox。
Dim v As string = e.Form.Cotrols("ComboBox1").Value
Select Case v
case "1"
打开模板1
case "2"
打开模板2
case "3"
打开模板3
End Select
呵呵,你都没半成品,我怎么做成品? 其实2楼就几乎就是成品了。
如果是初学,建议先系统看看帮助,从使用指南开始看,使用是基础,会使用才谈得上开发,而且很多基础知识,例如表达式、外部数据源,都只在使用部分讲述的。
会用了,再看开发指南,看法部分的重点是编程基础和foxtable编程这两章,这两张要反复看,细致看。
应该是:
Dim v As string = e.Form.Controls("ComboBox1").Value
Dim v As String = e.Form.Controls("DropBox1").Value
Select Case v
Case "1"
End Select
你要是看过帮助就不会打不开了:
Dim v As String = e.Form.Controls("DropBox1").Value
Select Case v
Case "1"
Dim Proc As New Process
Proc.File = "c:\1.doc"
Proc.Start()
End Select