VB Format 函数溢出
Dim x As String
Dim y As Variant
x = "20091114"
x = Format("20091114", "yyyymdd")
很简单的VB语句,我印象中是这样的格式,但是运行起来为什么报溢出错误呢?
應當是Format函數本身的原因。只要2009,11,14之間隔開,比如"2009 11 14",都是可行的。
用mid函數來轉換吧。
x = Format("20091114", "yyyymdd")
少了一个m
x = Format("20091114", "yyyymmdd")
这是你对Format函数使用错误,带入的参数错误
Format 函数
返回 Variant (String),其中含有一个表达式,它是根据格式表达式中的指令来格式化的。
语法
Format(expression[, format[, firstdayofweek[, firstweekofyear]]])
Format 函数的语法具有下面几个部分:
部分 说明
expression 必要参数。任何有效的表达式。
format 可选参数。有效的命名表达式或用户自定义格式表达式。
firstdayofweek 可选参数。常数,表示一星期的第一天。
firstweekofyear 可选参数。常数,表示一年的第一周。
设置值
firstdayofweek 参数有下面设置:
常数 值 说明
vbUseSystem 0 使用 NLS API 设置。
VbSunday 1 星期日(缺省)
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期
相关问答:
希望大家能够帮我下.感谢了..
源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html
转为VB.NET源码.
小弟完全是新手 不懂的说.麻烦各位帮忙一下
我的EMAIL是:4452 ......
在vb这编程里似乎有很多的东西是相联系的,为什么有些人对vb的编程摸不到头脑啊!并且有些事很容易的,但是却把它们的代码变成复杂,也去想一些不能实现的东西啊!
没分了,楼主多来点分!
来接点分
......
请各位指点下:程序代码如下mingchen = "C:\文件路径\"
cat = New ADOX.Catalog
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & min ......
自己采用的是Set objWMIService = GetObject("winmgmts:\\"&computername&"\root\cimv2"),其中computername是局域网一台电脑的IP或计算机名,但使用这个wmi语句对远程计算机进行操作时 ......
初学,大胆提问,请高手不吝赐教
1、滚动条点击与绘图板(屏幕,Piceure1)的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......