王朝知道

分享

 

01.VB中如何使Asc转换TXTE中的N个字符？
asc返回的是long型如果你同时转换N个的话，那返回的就是N个long型数据要用到数组或Variant型了所以还不如自己编一个函数Private Sub Command1_Click()Dim aa As Variantaa = allasc(Text1.Text)For i = 1 To UBound(...查看完整版>>VB中如何使Asc转换TXTE中的N个字符？02.vb中,如何查看文件属性中的时间?
VB 6.0用法:'先引用Microsoft Scripting RuntimePublic ObjFso As New FileSystemObjectSet ObjFile = ObjFso.GetFile("包含路径的文件全名")Me.Txt1.Text = ObjFile.DateLastModified '最后修改日期网页VBS用法:set...查看完整版>>vb中,如何查看文件属性中的时间?03.vb 6.0 中如何禁用Toolbar 中的某个按钮
Toolbar1.Buttons(index).Enabled = FalseToolbar1.Buttons("key").Enabled = False用key（关键字）或index（序号）...查看完整版>>vb 6.0 中如何禁用Toolbar 中的某个按钮04.如何将EXCEL中的某行或某列数据读入VB中并且要对这些数据进行某些运算，
很简单vb操作Excel*************一个标准的Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkbookDim xlSheet As Excel.WorksheetSet xlApp = CreateObject("Excel.Application") '创建EXCEL对象Set xlBook =...查看完整版>>如何将EXCEL中的某行或某列数据读入VB中并且要对这些数据进行某些运算，05.vb中，转换函数Lcase$，chr$,str$中的$是不是可以省略？
yes!$代表string类型...查看完整版>>vb中，转换函数Lcase$，chr$,str$中的$是不是可以省略？06.VB编程中2个窗口数据如何来转换。
Private Sub Command1_Click()Form2.Label1.Caption = Val(Form1.Text1) + Val(Form1.Text2)Form2.ShowEnd SubPrivate Sub Form_Load()Text1 = "": Text2 = ""End Sub...查看完整版>>VB编程中2个窗口数据如何来转换。07.VB中如何将字符串转换成数值来运算
'使用下面提供给你的函数可以做到这点！'先定义2个结构Parent和Plus，把这2个定义放在代码段最前面Private Type Parent s As String value As DoubleEnd TypePrivate Type Plus s As String value As DoubleEnd ...查看完整版>>VB中如何将字符串转换成数值来运算08.VB中如何将字符串转换成数值
或者可以借用脚本来实现表达式的计算，它可以进行较复杂的计算：'// 表达式计算Public Function ExpressionsEvaluate(ByVal strExpressions As String) As Currency Dim objEvaluate As Object ...查看完整版>>VB中如何将字符串转换成数值09.请问vb中如何将日期类型转换为字符类型？
楼主的做法没错，manthirty的做法有问题如果使用Format, 应这样使用bb = format(aa,"YYYY-MM-DD HH:mm:ss")注意 YYYY-MM-DD HH:mm:ss 的大小写。...查看完整版>>请问vb中如何将日期类型转换为字符类型？10.access数据库中的字段大小最都能容纳255个字符,有没有办法在使他大一点能,能达到10K就好了.
你可以用备注类型,来改变字段类型,这个方式 ,可以放心的用,这样不会对你原来的程序,有任何影响, 并且备注类型是足够你使用的数据类型了....把原来的只能容纳255字符的类型,改成备注类型!...查看完整版>>access数据库中的字段大小最都能容纳255个字符,有没有办法在使他大一点能,能达到10K就好了.

 

 

免责声明：本文为网络用户发布，其观点仅代表作者个人观点，与本站无关，本站仅提供信息存储服务。文中陈述内容未经本站证实，其真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。