当前位置: 代码迷 >> dim的解决方案
 
  • VB.net 读取文本文件,该怎么解决

    VB.net读取文本文件比如CSV文件上有如下数据,假设文件路径为D:\test.csv15,50,100,20020,60,120,20040,70,130,20060,80,150,20090,90,180,200第一列(不是一行)存为数组1,第二列存为数组2,第三列存为数组3······方便调用里面数据且把第一列的数据放入到ListBox1控件中,希望高人指点,万分感谢~~~~color='...

    273
    热度
  • 问个asp变量的有关问题

    问个asp变量的问题<scriptlanguage="vbscript">dima1subaa()msgbox("欢迎!")a1=window.settimeout("aa()",2000,"vbscript")endsubsubbb()window.cleartimeout(a1)endsub</s...

    140
    热度
  • [紧急] 编码转换

    [紧急求救]编码转换问题说明:1,我们用的是ASP2,数据库是MSSQL3,数据库字段Data存放的是短信内容,因为是短信猫发送,此字段需存的是UCS2格式的编码字符A比如我想向数据库里面Data字段(信息内容)写入汉字测试需要把“测试”转换成UCS2码“6D4B8BD5”B比如我想读出数据库里面Data字段(信息内容)“6D4B8BD5”需要把UCS2码“6D4B8BD5”转换成“测试”这两个汉...

    498
    热度
  • 变量定义出错~奇怪的有关问题

    变量定义出错~~奇怪的问题<%DimtestStringAsStringtestString="helleworld!"response.writetestString%>运行出错:MicrosoftVBScript编译器错误错误'800a0401'语句未结束/test.asp,行11DimtestStringAsString------------...

    300
    热度
  • VB 程序连VFP数据库不支持聚合函数?解决思路

    VB程序连VFP数据库不支持聚合函数???PrivateSubCommand1_Click()Dimsql1AsStringDimsql2AsStringDimrsResultAsNewADODB.Recordset'OpenconnectiontoTempFolderDimcndbfAsADODB.ConnectionSetcndbf=NewADODB.Connectioncndbf.Conne...

    4523
    热度
  • 求教 -Application.Evaluate()提示类型不匹配有关问题

    求教--Application.Evaluate()提示类型不匹配问题EXCEL表中有姓名身份证号性别出生日期....Sub查询()DimAdoConnAsNewADODB.ConnectionDimAdoRstAsNewADODB.RecordsetDimstrConnAsStringDimstrSQLAsStringDimstrFNameAsStringDimIAsinteger'设置连接字符...

    8128
    热度
  • Access中VBA代码在自己的机器上运行时正常,但在别人的机器上运行出现430的异常

    Access中VBA代码在自己的机器上运行时正常,但在别人的机器上运行出现430的错误在Access中对一个按钮写了一段很简单的VBA代码,在我自己的机器上运行得很好,可换了别人的机器就出现“运行时错误430类不支持自动化或不支持期望的接口”的对话框,点击“调试”,发现错误标记在“Setcn=NewADODB.Connection”这句话,是不是哪里设置有问题?我的机器安装的操作系统是window...

    1553
    热度
  • vba代码,大家看看这段代码有什么有关问题怎么修正

    vba代码,大家看看这段代码有什么问题如何修正PrivateSubcompare_Click()Dimfile_nameAsStringDimwbAsWorkbookDimrow_numAsIntegerDimcol_numAsIntegerDimori_cellAsRangeDimlist_cellAsRangefile_name="test_compare.xls"Setw...

    7493
    热度
  • 打开word后,不能进行操作。解决办法

    打开word后,不能进行操作。本来在word中使用vba编写,后来由于需要关闭word程序,所以将代码移到vb6中。问题:循环第一次时,一切正常,文档可以打开、可以移动光标、输入文字、也能正常保存退出;循环第二次时,问题就出现了,位置在Selection.TypeText"Hello",不能移动光标、也不能输入文字。错误提示为:Run-timeerror'462':Therem...

    6164
    热度
  • 请问Datagrid里面两个Dropdownlist连动!

    请教Datagrid里面两个Dropdownlist连动!!!!我在两个绑定列里分别放一个DropdownlistPrivateSubTMTDataGrid1_TMTableDataGridItemDataBound(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesTMTDataGrid1.TMTableDataGridItemDataBou...

    7764
    热度
  • 水印上的文字怎么实现 从左下到右上的倾斜?

    水印上的文字如何实现从左下到右上的倾斜?急。PublicSubBuildWater(ByValsourcepathAsString,ByValoutpathAsString)DimimageAsImage=image.FromFile(sourcepath)DimbitWaterMarkAsNewBitmap(image.Width,image.Height)DimgAsGraphics=Grap...

    2383
    热度
  • 请教这段c#代码用vb如何写

    请问这段c#代码用vb怎么写?privatestaticstringsqlEncode(stringsqlString) { stringResult=""; for(inti=0;i<sqlString.Length;i++) Result+=(sqlString[i]=='\''?"\'\'"...

    4595
    热度
  • FileUpload 好像有有关问题啊

    FileUpload好像有问题啊。。。。。。。。。。。Dimlineasstring=""while(true)line+=NewStreamReader(FileUpload.FileContent).ReadLineIf(IsNothing(Line))ThenExitWhileEndIfEndWhile‘然后我获得了一个line字符串啊。因为我需要用这个字符串啊。‘接着我...

    4811
    热度
  • 代理在调试的模式下可顺利执行,普通执行却报错解决思路

    代理在调试的模式下可顺利执行,普通执行却报错我添加了一个手工触发的代理,打印选中的业务中的内容。可是只能在调试打开的时候才能执行,并且一点错都没有;把调试关了,正常执行缺报“Objectvariablenotset”的错误.代码贴出来,请高手指教。SubInitialize DimwsAsNewNotesUIWorkspace DimssAsNewNotesSession DimuivwAsNot...

    159
    热度
  • 请问:有关一个表单代码有关问题

    请教:有关一个表单代码问题有TESTA表单和TESTB表单,1:定义一个按钮2:在TESTA中建立两个域,一个AA,文本域,另外一个为FILELINK是RTF域3:在TESTB中建立一个BB域4:运行TESTA窗体中的按钮,用对话框显示出TESTB窗体,在TESTB窗体中填写完毕后按确定返回TESTA窗体,代码如下:SubClick(SourceAsButton) DimrtAsNotesRich...

    134
    热度
  • 请问:怎么用对话框显示数据库中已经存在的文档

    请教:如何用对话框显示数据库中已经存在的文档?有一数据库:AA.NSF,已经在里面创建了一个VIEWAA的视图(使用BB的表单),有AA和BB两个表单,现在想在AA文档上设计一个按钮,然后要其显示数据库中已经保存的BB文档(不是在对话框中新建BB文档,而是查询VIEWAA的视图,找到已经建立的BB文档,查询的条件是BB文档中的文档ID=“123456”)请大家帮忙。color='#e78608'>...

    73
    热度
  • 代理创建excel后台报错"Operation is disallowed in theis session"解决方法

    代理创建excel后台报错"Operationisdisallowedintheissession"SubInitialize OnErrorGotoerr_handle DimsessionAsNotesSession DimdocNewAsNotesDocument DimExcelAppAsVariant DimExcelBookAsVariant DimExcelShe...

    232
    热度
  • 署理创建excel后台报错"Operation is disallowed in theis session"

    代理创建excel后台报错"Operationisdisallowedintheissession"SubInitialize OnErrorGotoerr_handle DimsessionAsNotesSession DimdocNewAsNotesDocument DimExcelAppAsVariant DimExcelBookAsVariant DimExcelShe...

    118
    热度
  • Windows CE下读写U盘的第一个扇区(进者有分),该怎么处理

    WindowsCE下读写U盘的第一个扇区(进者有分)在WindowsXP系统下,我通过如下代码(VB编写)可实现向U盘(映射到我的XP系统下之后,磁盘目录为“K”)的第一个扇区写入数据(这里写入的为0)这样就破坏了U盘的引导程序(或者破话了U盘的文件系统)使得U盘已经无法正常使用代码如下,我已经验证过:——————————————————————————VBcodePublicSharedFunc...

    279
    热度
  • 关于按背景颜色求和单元格的值,不知道有没有人知道?该怎么处理

    关于按背景颜色求和单元格的值,不知道有没有人知道?我有这样一个需求,假设表格如下:ABCD1125823469假设A1和C2单元格的背景是红色,我想统计a1:d2区域中背景为红色的单元格内值之和,在例子中,A1+C2=1+6=7不知道有没有办法写成公式或者函数,如何在excel中调用这个公式和函数?color='#e78608'>------解决方案------------------------...

    9397
    热度