Foxtable(狐表)用户栏目专家坐堂 → 想得到一个字字符串,这个字符串里有引号,即“,如何写


  共有3544人关注过本帖树形打印复制链接

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

帅哥哟,离线,有人找我吗?
whyfoxtable
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
想得到一个字字符串,这个字符串里有引号,即“,如何写  发帖心情 Post By:2014/11/24 11:15:00 [显示全部帖子]

想得到一个字字符串,这个字符串里有引号,即“,如何写
例如想得到如此字样的字符串: abc是 “abcdef”的前三个字符 
请帮忙写下面的语句

Dim Str1 As String
Str1 = 
outputshow.(str1)

 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
  发帖心情 Post By:2014/11/24 11:38:00 [显示全部帖子]

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

难题:字符串合并时,因为引号本身不能作为字符合并进去,想找到一个别的方法。

例如想生成如下字样的字符串:

重点是"一定要早上8点前到集合地点"

用以下表达式写不出来上面的字符。
Dim Str1 As String
Str1 = "重点是" & """ & "一定要早上8点前到集合地点" & """
OutPutShow(Str1)


 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
[求助]这里Str1 是编译的时候,就出错,不知道错在哪里,请协助。。。。。  发帖心情 Post By:2014/11/24 21:31:00 [显示全部帖子]

先谢过。

试过,上述代码成功了。

 

又有新难题了。。。

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

 

例如:窗体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 是编译的时候,就出错,不知道错在哪里,请协助。。。。。

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
或者说,以下字符串无法生成  发帖心情 Post By:2014/11/24 21:35:00 [显示全部帖子]

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

 

 

一到命令窗就出错。(只要新建一个项目,相应的表都存在)

[此贴子已经被作者于2014-11-24 21:59:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
我马上试一下。。。。  发帖心情 Post By:2014/11/24 22:01:00 [显示全部帖子]

我先看看高手的代码,有点晕呢。。。确实可以。。。我再看看奥炒在哪。。。。
[此贴子已经被作者于2014-11-24 22:03:19编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
?DataTables 有此方法,Tables 怎么没?  发帖心情 Post By:2014/11/24 22:17:00 [显示全部帖子]

DataTables 有 此方法(GetCombolistString),我再看看Tables.... ..实际上,我想操作的是Tables类型中的表,不是DataTables类型中的表。。。。难道实现不了?

 

[此贴子已经被作者于2014-11-24 23:02:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
您的思路是正确的。不过还想问表达式的问题。。  发帖心情 Post By:2014/11/24 22:35:00 [显示全部帖子]

字符串中有 VB 里的保留字 怎么处理?

 

比如:

Dim Str1 As String

Str1 = "Tables("表A").cols("第一列").Name 是取得表A第一列列名的标准写法"

OutPut.Show(Str1)

 

 

想要输出 Tables("表A").cols("第一列").Name 是取得表A第一列列名的标准写法

 

怎么实现?


 回到顶部
帅哥哟,离线,有人找我吗?
whyfoxtable
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
您的写法试验成功~闭门思过去了。。。  发帖心情 Post By:2014/11/24 22:45:00 [显示全部帖子]

感谢感谢,今夜无眠。。。。。反思一下我自已的概念混乱去了。。。连续双引号就转为本义了。。。。

[此贴子已经被作者于2014-11-24 22:47:15编辑过]

 回到顶部