我有几个看起来非常相似的类成员函数:
Public Function ProcessSomething(ByVal X as Currency, ByVal Y as Long) As Boolean
然而,其中一些功能IDE强迫我使用call语句而不是其他功能.
有人能在这里给我一些理解吗？
我试图做到这一点无处可去,到目前为止,我有这个,
Private Sub Timeperpart_Timer()
secs = secs + 1
If secs = 60 Then
mins = mins + 1
secs = 0
End If
If mins = 60 Then
hrs = hrs + 1
mins = 0
End If
If secs < 10 Then
Lbltime.Caption = CStr(hrs & ":" & mins & ":" & 0 & CStr(secs))
End If
If mins < 10 Then
ElseIf secs < 10 Then
Lbltime.Caption = CStr(hrs & ":" & 0 & CStr(mins) & ":" …我们正在处理VB6和.NET项目,需要计算类的数量.
对于vb6,我们总结了标准和类模块的总数,它们给出了项目中的类总数.
对于.NET,我们计算文件后面的代码总数,在独立的.vb或.cs文件中,我们计算内部定义的类的数量.该总数被视为最终计数.
它是否正确？或者在.NET中是独立的.vb或.cs文件,应该被认为是1类,而不是计算这个文件中的类？
到目前为止我还没有另外一台PC可以对它进行测试,其他没有VB6系统的用户(没有dll注册或运行时文件)可以运行我的应用程序,只需将activeX文件,DLL和运行时文件包含在应用程序的文件夹??? 不需要注册DLL？如果是这样,无论如何都要注册它们而不通过安装程序执行此操作？
我想知道如何在Visual Basic 6中嵌入IE浏览器.我已经尝试过ieframe.dllactive-x网络控制,但是它不支持最新的浏览器,我想,我只支持IE 8这样的东西.
此外,我试图替换互联网控制组件DLL文件,但它无法注册.
那么,在Visual Basic 6中嵌入最新的Internet Explorer浏览器的任何可能的方法？
提前致谢.
问候.
我有一个ASCII十进制,我想转换为vb 6中的字符.有可能吗？如果是的话,我该怎么做？换句话说,我如何将vb 6 ASCII十进制转换为vb 6字符？
Dim myChar As Char
Dim myBtye As byte
myChar = ? myByte
在VB6中,你可以很容易地进入下一工序按CTRL+ Page Down按还前面的过程CTRL+ Page Up.
但是我找不到任何方法使用Visual Studio 2010编程VB.NET; 我想向下或向上滚动以使用键盘快捷键转到上一个或下一个过程.
我正在尝试从遗留应用程序的文件中读取数据库字符串.为此,我将文件放在每个用户的AppData文件夹中.现在,我需要告诉应用程序文件的位置.但是,我似乎无法在模块中声明一个字符串(原始字符串在此模块中声明为常量).我怎么能克服这个？任何帮助,将不胜感激.
这是我试过的:
Dim loc As String
loc = Environ$("APPDATA")
Public Const CnnSTR = ReadIniValue(loc & "\PensionMaster\PM-Strings.ini", "DB", "DBSQL")
但是我收到了"无效的外部程序"错误.
在我的VB6代码中,我有声明
Open CommonDialog.FileName For Input As #intFileNum
问题是CommonDialog.FileName返回一个完整的路径,而VB6 Open命令只需要一个文件名.例如,如果路径是C:\ temp\file_name.csv,则CommonDialog.FileName将返回C:\ temp\file_name.csv,但VB6中的此Open语句仅适用于file_name.csv
我可以把
Dim Path As String
Path = CommonDialog.FileName
Open Path For Input As #intFileNem
我只需要知道如何在最后一个反斜杠"\"之前删除Path中的所有内容.VB6库中有什么东西可以做到这一点吗？
路径是从常用的对话框和代码中提取的
CommonDialog.DialogTitle = "Browse. . ."
CommonDialog.Filter = "CSV File (*.csv)|*.csv"
CommonDialog.ShowOpen
所以我想如果有人知道,我应该要求使用ShowOpen来获取公共子路径,然后在后面的函数中使用Open命令路径中的文件名并不是它本身的任何问题,对吧？
为了便于阅读,我必须在这里展示Ghost.我使用intFileNum作为long
Dim intFileNum As Long
Open Path1 For Input As #intFileNum
Do Until EOF(intFileNum)
Line Input #intFileNum, LineEnd
希望这些信息可以使情况更有意义