主题：想得到一个字字符串，这个字符串里有引号，即“，如何写

Dim Str1 As String = "abcdefg"
Str1 = str1.SubString(0, 3)
output.show(str1)

是我没表达清楚。我再重新求助如下：

Dim Str1 As String
Str1 = "重点是""一定要早上8点前到集合地点"""
OutPut.Show(Str1)

先谢过。

试过，上述代码成功了。

 

又有新难题了。。。

即：接下来是加入窗体和表后，上述想法就不能实现。

 

例如：窗体1中的表A和窗体2中表B,做模拟关联表。

        要求表A根据表B进行筛选。

        其中表A第一列的内容，要是在表B第二列的范围

 

具体表的内容是：

  表A 第一列 ：1 ， 2， 3 ，4 ，5

        第二列：上，明，海，天，市

  表B 第二列：1，3，5

 

写代码(仅是表意)如下：

 

Dim form1 As WinForm

Dim form2 As WinForm

Dim Str1 As String

Dim tab1 As table

Dim tab2 As table

 

Str1 = ”tab1.cols("第一列") In tab2.cols("第一列")“

Tab1.Filter = Str1

 

这里Str1 是编译的时候，就出错，不知道错在哪里，请协助。。。。。

 

 

Dim Str1 As String
Str1 = "Tables("表A").cols("第一列") In Tables(”表B“).cols("第一列")"
OutPut.Show(Str1)

 

 

一到命令窗就出错。（只要新建一个项目，相应的表都存在）

Tables("表A").Filter = "第一列 in ('" & DataTables("表B").GetComboListString("第一列").Replace("|", "','") & "')"

我先看看高手的代码，有点晕呢。。。确实可以。。。我再看看奥炒在哪。。。。

知识点

 

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

 

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