如何在VBA中使用输入字符串中的引号？

Question

我想输入ColumnWidths MS-Access2007 VBA中的列表框，我有问题得到它采取十进制数字。

代码：

ResultList.ColumnWidths = "1;0.65;0.7;0.7;0.8;0.4" 
Debug.Print ResultList.ColumnWidths 

什么被放在了列宽：

1;1;1;1;1;0 

我想它看起来进入后的方式（基于现在有什么）：

1";0.65";0.7";0.7";0.8";0.4" 

问：

我如何得到它认识到我想要的小数有那么它停止四舍五入？有没有办法在你想输入的字符串里面加引号？

Answer 1

ResultList.ColumnWidths = "1 cm;0.65 cm;0.7 cm;0.7 cm;0.8 cm;0.4 cm" 

查看ColumnWidths的文档。它说

ColumnWidths属性保持一个值，指定以英寸或厘米每列的宽度，这取决于在该测量系统中选定的区域选项对话框的数目标签上的测量系统（美国或公制）上的Windows控制面板。默认设置是1英寸或2.54厘米。 ColumnWidths属性设置必须是列表框或组合框中每列的0到22英寸（55.87厘米）的值。

编辑：你也可以指定以英寸为单位的宽度。

ResultList.ColumnWidths = "1 in;0.65 in;0.7 in;0.7 in;0.8 in;0.4 in" 

Answer 2

Shahkalpesh给你解决你的问题，但回答您的实际问题是字符串中加倍每个引号。

sWidths = "1"";0.65"";0.7"";0.7"";0.8"";0.4""" 
Debug.Print sWidths 

-> 1";0.65";0.7";0.7";0.8";0.4" 

这是非常不美观的！这是你如何在一个普通的VB字符串变量中做到这一点，但它不是该属性的正确语法。