VB中，关于Format的用法问题 求解

Posted 2023-05-11

Print Format$(1258.6，"000，000.00") 这个题目我知道是001，258.60是按照这个
"000，000.00"形式输出的
那么
Print Format ( 12345.68，“0000，0.00”） 为什么是12，3456.68 不是应该
1234，6.68 么 求解

Format(12345612345.68, "0000\,0.00")
注意：
1、中间加的字符，是从小数点开始计算位置的
2、千分位是固定的位置
3、将“，”逗号不做千分位使用，前面加“\”转义符 参考技术A 字符 ， 千分位占位符
字符 .小数点占位符
字符 # 数字占位符
字符 0 数字占位符
字符 % 百分比符号占位符
Format ( 123.34，"0000.000"） 显示为0123.340
Format ( 123.34，"####.###"） 显示为123.34
上面两个是 0&#的区别
Format ( 123.34，"00.0"） 显示为123.3
Format ( 123.34，"##.#"） 显示为123.3
整数部分按原样显示，小数部分四舍五入 参考技术B 那个格式串里的逗号是表示输出数字串用千位符分隔. 与多少个0 无关.
千位符这玩意就是3个数一组. 第二个输出应是 12,345.68
-------
0是占位符, 当数字少于这些位时填上0. 第二个整数部分是5个0,数整数位小于5个时才置 0 参考技术C 楼上的说的挺好的 其实 format（data,dataformat） data是数据 dataformat要格式化成什么形式
而楼主 其实0000,0.00 意思是从个位开始每隔四位用逗号隔开并小数点2位 理解木 有木有追问

木理解啊。千分位是什么啊 ￥这个符号？ 这两个题目还是不明白。。。求详解12,345.68

追答

千分位，就是你000的占位符 到得位数 ￥ 代表这个数字装换为金钱格式

Format函数 返回

返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。

语法

Format(expression[, format[, firstdayofweek[, firstweekofyear]]])

Format 函数的语法具有下面几个部分：

部分 说明
expression 必要参数。任何有效的表达式。
format 可选参数。有效的命名表达式或用户自定义格式表达式。
firstdayofweek 可选参数。常数，表示一星期的第一天。
firstweekofyear 可选参数。常数，表示一年的第一周。

关于VB中CreateObject 函数

我看到VB的MSDN中，有这样一段代码
Dim ExcelSheet As Object
Set ExcelSheet = CreateObject("Excel.Sheet")
按理Excel应该是应用程序名，Sheet应该是类，但我在对象浏览器中，选择库为excel,在类中，可以看到有sheets,没有sheet,这样的话这条代码CreateObject("Excel.Sheet")岂不是有问题吗？因为excel中应该没有Sheet类，只有sheets类。但当我将这句代码Set ExcelSheet = CreateObject("Excel.Sheet")改为Set ExcelSheet = CreateObject("Excel.Sheets"),在调试时显示“实时错误429 ActiveX部件不能创建对象”

　　1、CreateObject函数简介:创建并返回一个对 ActiveX 对象的引用。
　　2、CreateObject函数语法 ：CreateObject(class,[servername]) ；
　　3、CreateObject参数简介 ：
　　class必需的；
　　Variant (String). 要创建的应用程序名称和类；
　　servername可选的；
　　Variant (String). 要在其上创建对象的网络服务器名称。
　　4、CreateObject函数应用 ：
　　每个支持自动化的应用程序都至少提供一种对象类型。例如，一个字处理应用程序可能会提供 Application 对象，Document 对象，以及 Toolbar 对象。 要创建 ActiveX 对象，只需将 CreateObject 返回的对象赋给一个对象变量： ’声明一个对象变量来存放该对象’的引用。Dim as Object 采用后期绑定方式。
　　Dim ExcelSheet As Object
　　Set ExcelSheet = CreateObject("Excel.Sheet") 参考技术A '声明一个对象变量来存放该对象
'的引用。Dim as Object 采用后期绑定方式。
Dim ExcelSheet As Object
Set ExcelSheet = CreateObject("Excel.Sheet")

是在createobject函数看到的吧，不过我怎么在对象浏览器中只能看到sheet，看不到sheets呢？本回答被提问者采纳