Vb.net ';Sybase ASE OLE DB提供程序';提供程序未在本地计算机上注册

我在尝试从visual studio.net 2005使用oledb连接连接到sybase数据库时遇到此错误 The 'Sybase ASE OLE DB Provider' provider is not registered on the local machine. 您是否检查过机器上是否安装了驱动程序 检查的一种方法是尝试从运行ODBCAD32.exe的计算机创建DSN并创建新连接。它显示已安装的驱动程序。对于Sybase ASE 12.5,至少有2个OLEDB驱动程序 最新的:

Vb.net 鼠标滚轮在面板中滚动,并动态添加picturebox控件?

我已经向一个面板动态添加了20个图片框,希望在使用鼠标滚轮时看到面板滚动。为了实现这一点,我尝试在panel控件上将autoscroll设置为true。这是代码。 对于i作为整数=1到20: Dim b As New PictureBox() b.Image = Nothing b.BorderStyle = BorderStyle.FixedSingle b.Text = i.ToString() b.Size =

Vb.net net遍历

这是visual basic中的编码 我使用access作为我的后端 我需要在vb.net中使用相同的函数 Am使用相同的4个命令按钮(移动第一、上一、下一和最后) Wat是我可以使用的代码?您有几个选项。在.Net世界中,我们已经从使用ADO记录集对象转向使用数据集或数据读取器 要读取单个行,可以签出SQLDataReader类: 或者,您可以将整个数据集加载到DataSet对象中,并在其Rows集合上迭代: 下面的链接显示了ADO和ADO.Net之间的区别,以供参考: 您应该接受问题的答案

Vb.net 匿名类型集合

你将如何解决这个问题?我想退回此收藏: Public Function GetShippingMethodsByCarrier(ByVal Carrier As ShippingCarrier) As List(of ?) Return Carrier.ShippingMethods.Select(Function(x) New With {.ID = x.ID, .Name = String.Format("{0} {1}", Carrier.Name, x.Description)

Vb.net 将对象数组与.NET COM互操作DLL一起使用时出错

我在谷歌上找到了很多关于这个错误的其他参考资料,但我很难理解它们是如何应用到我正在做的事情上的 下面是我在编译时遇到的VBA错误:“函数或接口标记为受限,或者函数使用Visual Basic不支持的自动化类型。” 导致错误的VBA代码: 'ftp is also a com object created in code not posted here Dim f() As wooxter.FTPFile f = ftp.GetFileList 'Returns an object array o

Vb.net 数据表报告

这里有新的报道。使用VB.NET,我的应用程序使用它从postgresql数据库创建的数据表 这些数据表是在运行时定义的,而不是在设计时定义的,我也希望在运行时从这些数据表生成报告 我应该在设计时创建报表模板,然后在运行时将datatable绑定到它吗 非常感谢您的澄清 Joe假设数据表遵循DAO格式,并且报告将由您自己的代码创建,这是一种很好的方法 然而,通常情况下,最好至少了解一些关于数据表的知识,仅出于安全原因。注意恶意代码/数据库条目引起的错误

Vb.net Visual Basic中文本文件的迭代

好的,我正在制作一个程序,它将从一个文本文件中读取,将每一行转换成一个数组。每打勾一行发送一行。这是2010年的Visual Basic。 我得到的最接近的结果是一次发送所有信息,我花了一整夜的时间来处理它,并且正在慢慢地销毁它。 理想情况下,我希望按钮1单击以从LocationTB处的文件填充阵列,然后启动计时器。计时器应在GapTB间隔的某个时间发送一条线路 Public Class Form1 Public TextLine As String Public MyFileName As S

如何在vb.net中从web文件夹下载文件

我有一个网络文件夹,例如。http://www.myhost.com/software/ 如果我在IE中打开此地址,它将显示此文件夹中的所有文件。 我想下载所有文件,但我不想硬编码文件名。我知道我可以通过webclient获取文件。DownloadFiles@address,@filename。是否可以下载所有文件或至少从web文件夹中获取文件名?您至少可以下载相同的文件,IE显示请注意,此文件由您的web服务器提供-没有标准并自行解析文件的HTML,例如使用webclient.Download

如何使VB.NET文本框字段具有按钮等平面外观效果?

首先,我希望我能正确地陈述我的问题。 我正在使用VB.NET创建一个数据库桌面应用程序。我希望我的UI与Microsoft Money具有相似性。这样,现在我想让我所有的文本框都这样: 平坦的 将没有边框,或者如果鼠标悬停在边框上,边框将被强调 就这些。 我认识到在TextButton中,我们有平面外观,所以我们可以调整所有按钮,使其表现为这样。但对于TextField,情况并非如此 有没有解决这个问题的简单方法 谢谢 Eko你可以试试这样的东西 Private Sub Form1_Load

Vb.net 如何插入字母";";并后跟4位数字。用户在文本框中输入4位数字

注意:我尝试使用concat()方法、join方法,甚至尝试 只插入文本(结果是可编辑的),但没有一个可以作为 我想要。我在想,如果子字符串方法将工作,但我只有 子字符串如何工作的基本概念。我希望字母“N”是 加载表单和用户输入时插入文本框 4数字(OrderNo2.text),应将其合并以便保存 当我点击“保存”按钮时,他们在一起 请帮帮我。谢谢 Private Sub btnAddOrder_单击(ByVal发送方作为System.Object,ByVal e 作为System.EventA

Vb.net 执行运行时代码参数

以下是一些在运行时执行代码的代码: Dim SourceCode As String = txtCode.Text Dim Dlls() As String = {"System.dll", "System.Core.dll", "System.Data.dll", "System.Windows.Forms.dll"} 'Any referenced dll's Dim Compiler As New VbCompiler(SourceCode, Dlls)

VB.Net MenuStrip-所有子菜单一次可见

奇怪的问题: 我有一个VB.NETWindows窗体中的菜单,我的大学老师说,如果我能让菜单的所有下拉列表立即可见,他会让我从考试中解脱出来:D 这可能吗?怎么可能 我知道我可以.ShowDropDown()一个条目,但是当我调用下一个条目时,第一个条目就隐藏了 提前谢谢 也许这有助于: CType(MenuStrip1.Items(0),ToolStripDropDownItem.DropDown.AutoClose=False CType(MenuStrip1.Items(1),ToolSt

Vb.Net和CSV文件

我有一个VB.Net应用程序,它应该允许用户将CSV文件导入datagrid(它会这样做),然后将这些行更新到Oracle中的表中 这是我到目前为止所做的,但它似乎不起作用,也没有抛出一个错误 Private Sub Update_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Update.Click MsgBox("Saving...") Dim table As N

Vb.net 如何在vb中声明olFormatHtml

我试图发送格式化为HTML的邮件,但我收到一个错误,显示未声明olFormatHtml。如何申报 将olFormatHtml替换为Outlook.OlBodyFormat.olFormatHtml我正在使用Excel 2007中的VBA将工作簿附加到电子邮件并格式化该电子邮件的正文。我刚刚尝试了这个建议,但得到了一个运行时错误438:对象不支持这个属性或方法 相反,我将.bodyformat=2设置为将电子邮件文本显示为html,这样做很有效。例如 Set Outlook = CreateObj

VB.net在游戏中截图

我正在开发一个程序,允许用户拍摄全屏游戏的截图,如《使命召唤》、《战场3》等 然而,我的代码有两个问题 首先,我必须按两次快捷键,而不是像其他快捷键一样按一次。只有当下面的代码实际位于处理子模块中时,才会出现这种情况。如果按下快捷方式时,我只显示一个消息框,则每次都会起作用 第二,每当我拍摄屏幕截图时,它要么完全变黑,要么拍摄我的桌面,即使前台正在运行游戏 我环顾四周,似乎printscreen是通过vb.net获取游戏截图的唯一方法 我的代码如下。感谢您的帮助 Private Sub

Vb.net 保存和加载数据结构项

我是VB.NET的新手,我正在尝试创建一个控制台应用程序,可以编写、保存、加载和编辑数据集 假设我有这样的东西: Imports System Module Module1 Public Structure EMPLOYEE Dim Firstname As String Dim Middlename As String Dim Lastname As String Dim ID As String End Str

Vb.net 多个OpenTK控件:为什么最初只渲染一个?

我正在尝试实现2+个独立的OpenTK控件。在表单加载时,我希望它们都在加载时正确呈现和显示。在下图中,您将看到我的问题。一个渲染正确,但另一个未渲染 鼠标拖动前的GL屏幕截图 在出错控件上执行鼠标拖动操作将使其正确渲染 鼠标拖动后的GL屏幕截图 这是我的主窗体的代码。它创建并添加GLControl对象: 以下是扩展GLControl类的GLControlTask类的代码: 在我正在做的一个项目中,我遇到了一个类似的错误,问题是windows7 openTK的兼容性。 首先,在使用openTK时

Vb.net 选中复选框选项后,为什么我的复选框选项文本更改为选中?

我正在用VB做一个测验,所以我有带问题和复选框选项的问题表单。选中复选框选项后,为什么我的复选框选项文本更改为选中?如果我回到上一个问题 这是我的一个选项的代码: Private Sub Option1CheckBox_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Option1CheckBox.CheckedChanged If Option1CheckBo

Vb.net WebClient下载不完整的文件

我在一周前编写的这个方法运行良好,但现在它下载了一个不完整的文件。原始文件接近10mb,但正在下载的文件是2k。我的代码基本上是这样的 Dim URL as string = "http://www.cqc.org.uk/sites/default/files/cqc_locations_export.csv" Dim path as string = "C:\temp" Dim webClient As New WebClient webClient.Headers.Add("

VB.net-查找字符串中第n个字符的最短最快方法?

实现这一目标的专业方法是什么 谢谢。我已经无耻地从C#中删除了这个示例,并将其转换为VB.net Public Function GetNthIndex(s As String, t As Char, n As Integer) As Integer Dim count As Integer = 0 For i As Integer = 0 To s.Length - 1 If s(i) = t Then count += 1

Vb.net 更改鼠标滚轮滚动线?

我有一个带有自动滚动的面板,我需要更改鼠标滚动线的编号 我的意思是: (对不起,西班牙语中的鼠标属性) 但我会在我的程序中更改它,对于我的面板,obvius,而不是SO PS:例如,Winamp媒体播放器有一个选项 我到处都找不到信息,请帮忙 更新 我的滚动条是一个具有“AutoScroll”属性的面板 我的活动是: Private Sub Panel1_MouseScroll(sender As Object, e As MouseEventArgs) Handles Panel1.

Vb.net WPF通过组合框选择在主窗口上加载不同的动画

我试图在Visual Basic 2010 WPF主窗口中上载不同路径的动画,选择组合框中列出的动画名称。 因此,在WPF中,我的主窗口包含一个组合框,在这里有两个名称,还有Window1和Window2,每个都有不同的PathAnimation。 我不知道程序运行时如何在主窗口中加载动画1或动画2。 我有点不知所措这里有一个简单的例子,我把它放在一起,它使用一个ViewBox作为一个容器。看看这对你有用吗 MainWindow.xmal 基本上,默认情况下,我的主窗口是空白的,里面只有一个组合

等待0.5秒,然后继续代码VB.net 我有一个代码,我希望它在中间的某个地方等待前进。 在WebBrowser1.Document.Window.DomWindow.execscript(“checkPasswordConfirm();”,“JavaScript”)之后 我想让它等5秒钟,然后完成剩下的代码 WebBrowser1.Document.Window.DomWindow.execscript("checkPasswordConfirm();","JavaScript") Dim allelements As HtmlElementCollection = WebBrowser1.Document.All For Each webpageelement As HtmlElement In allelements If webpageelement.InnerText = "Sign Up" Then webpageelement.InvokeMember("click") End If Next

制作一个定时器,当它滴答作响时,激活你想要的任何代码。确保计时器代码的第一行是: timer.enabled = false 将计时器替换为您命名的计时器 然后在代码中使用此选项: WebBrowser1.Document.Window.DomWindow.execscript("checkPasswordConfirm();","JavaScript") timer.enabled = true Dim allelements As HtmlElementCollection = We

Vb.net 如何将DataGridView绑定到自定义类列表

我有一个使用TableAdapter构建的自定义类列表 我想将它们添加到仅绑定某些列的DataGridView中 我尝试了以下代码来填充和绑定数据: lAllBookings = (From r As DataRow In BookingsTableAdapter1.GetDataWithItems().Rows Select New Booking With {.bookingID = r.Item("BookingID"), _

Vb.net 短信使用clickatell,代码不起作用

我已经注册了clickatell服务发送短信。他们给了我下面的vb.net代码,说他们不知道这是对还是错 Dim client As WebClient = New WebClient ' Add a user agent header in case the requested URI contains a query. client.Headers.Add("user-agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .N

Vb.net 向列表框中的元素添加数字

我必须创建一个应用程序,允许我从数组中的每个元素中减去数字1,并使用for…next语句将其显示在列表框中 这是我到目前为止所拥有的 Private intQuantities()作为整数={45,67,2,5,90} Dim intnum2为整数=整数数量。长度 对于intCount As Integer=0到4 lstQuantilities.Items.Add(整数数量(整数计数)) intCount=intCount+1 在您的代码中有两件事很突出 首先,在将intQuantities变

Vb.net 打印到多页

下面的代码可以很好地打印图像和文本 现在的问题是,当一页已满时,如何自动将打印移动到下一页 也可以添加一个页码: Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click PrintPreviewDialog1.Document = PrintDocument1 PrintPreviewDialog1.ShowDialog()

Vb.net 替换/删除两个字符之间的字符串

我开始创建一个代码(在VB.NET中)来从文本中提取信息; 我在StackOverflow和搜索引擎中找不到的是在“”之间替换/删除文本的示例 可能是REPLACE或REGEX;我两个都试过了,但都想不出来; 我能得到一些帮助吗。。。。 非常感谢 Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim SSSS = Replace(

Vb.net 是否有任何方法将从二维码获取的所有值放入各自的字段

我正在开发发票打印软件,如miracle,供我个人使用 首先,我为我的所有产品生成了二维码,现在我使用二维码扫描仪并将其链接到我的软件 现在我想知道的是,当我扫描任何产品的二维码时,它将能够在我的发票软件中输入所有值到它们所尊重的字段中 比如说, 我在每个QR中有四个值,即产品名称、产品价格、产品类别、折扣 现在,当我扫描此产品时,发票软件中的所有四个字段都将自动填充,如发票软件中的产品名称将进入产品名称字段,发票软件中的产品价格将进入产品价格字段等等 所以请帮帮我。谢谢。二维码没有字段。他们只

Vb.net ToUnicode不返回特殊字符

基本上,我正在尝试实现一个与ToUnicode相结合的WHU键盘钩子。。。 我知道这听起来很愚蠢。。但我确实成功了,使用了特殊字符,如:“##·%#!*”,等等。但我一直在玩弄代码,试图修复重音。我最终意识到它不起作用(在网上读了很多书之后) 所以我想现在就可以了,但是当我恢复到我的旧代码时,它不再工作了 因此,钩子本身正在工作(至少我正在获得向下键和向上键事件) 问题在于虚拟键->字符转换,即在该方法中: 'This is the callback method from the hook

Vb.net 使用Linq查找副本并在新datagridview中显示

我有两个DataGridView: DataGridView1: 这是使用以下代码从csv文件生成的: For Each line As String In System.IO.File.ReadAllLines("C:\path\test.csv") Form1.DataGriView1.Rows.Add(line.Split(";")) Next Dim MyConnection As System.Data.OleDb.OleDbConnection

Vb.net Visual Basic FileSystem.GetFiles

我正在制作一个控制台应用程序,我想看看文件夹中有哪些文件 For Each foundFile As String In My.Computer.FileSystem.GetFiles("c:\users\zac\desktop\booked vehicle\requested\") Console.WriteLine(foundFile) Next 使用此代码后,发现文件夹是空的,我需要一个If语句,说的是 如果foundfile没有文件,则 告诉

在vb.net中检测串行端口中的5伏信号

我正在制作一个投币式的网吧软件。我想让我的程序在每次插入硬币时都能检测到来自硬币检测器的5伏信号。然而,我一直在谷歌搜索,试图找到这样做的示例代码,但没有用。Pinchhange事件不起作用,因为传输信号的导线始终连接到串行端口引脚,即使没有在投币槽中插入硬币,Pinchhange事件也始终发生。我只想在每次插入硬币时检测硬币检测器发送到串行端口的5伏信号。请帮我做这个 谢谢你,并致以最良好的问候。我有几个项目与此项目相似。我建议使用.NET库读取串行端口。在VB.NET中,它类似于: Dim

Vb.net Visual Basic PictureBox面板闪烁

我正在制作一个简单的游戏(主要部分)由一个面板组成,里面有32个图片框,每个图片框都有背景图片。你点击一个“瓷砖”,它会翻转显示一张图片。我的问题是,当窗体加载时,我可以看到它正在绘图。我看到了面板。。然后清空图片框,最后用背景图片填充图片框 我已将表单的DoubleBuffer设置为True,并添加了以下内容: Private Sub UseDoubleBuffer() Me.SetStyle(ControlStyles.AllPaintingInWmPaint Or Control

Vb.net 防止代码更改禁用的按钮';s文本(VB)

作为学校的最后一个项目,我正在做一个井字游戏。基本前提是在按钮上单击按钮文本进入“X”并禁用按钮,然后随机选择按钮周围的按钮,使其变为“O”。(我正在尝试制作一个可以玩的假AI) 好吧,问题是;即使该按钮在单击时被禁用,当您单击其附近的另一个按钮时,另一个按钮上的文本也可以被禁用。例如,如果您按下按钮A1,机器人会在B2上放置一个“O”,然后按下A2,即使A1被禁用,但机器人会将A1更改为“O” 那么,您如何不允许代码更改文本呢? 代码如下:在您的代码中有一堆类似的if语句块,在这些语句块中,

Vb.net 在vbnet中查找长变量中的第n个数字

我有一个很长的数字是这样的: numb as long=011212201220200112202001200101121220200120010112200101120112122.... 它将超过4000000000位。我的问题是在数字中找到任何数字。如果它是整数,我将转换为字符串并执行以下操作: numb(200) 但是他的头发很长。你知道如何找到它吗?与整数一样,你也可以将长转换成字符串,以获得第n个元素 Dim numb As Long = 9876543210 Dim targe

Vb.net DGV组合框显示但不选择默认值

我正在向DataGridView添加一个ComboBoxColumn,并使用BindingSources将其链接到一个单独的相关部门表 一个新行显示第一个列出的部门(帐户),但默认情况下未选择它,导致错误: 无法将值NULL插入到表的列“DeptID”中 ‘StaffDB.dbo.Staff’;列不允许空值。插入失败 根据回答中的建议,我使用以下设置默认值: comboCol.DefaultCellStyle.NullValue = _bsDept(0)("Department")

Vb.net 检查多个IP是否联机

我目前有一个应用程序,可以ping大约50个设备,并显示一个“向上”或“向下”箭头,这取决于它是否在线。问题是,它一次只能发出一个ping,这需要一段时间。我想看看是否有一种方法可以同时ping所有这些对象,并在它们出现时显示结果 当前方法的示例: If My.Computer.Network.Ping(RouterBox.Text, 2000) Then 'Online If GetPingMs(RouterBox.Text) &

使用rdlc reports vb.net为子报表添加处理程序

我有一个包含2个子报告的主报告(尝试包含2个子报告)。目前我拥有的是这个 在按钮上单击“查询数据”并填充主报告-报告1 一旦填充了这些数据,我就添加了一个AddHandler来填充第一个子报告的数据-这非常有效! -现在我正试图以同样的方式查询第二个子报表的数据,但它没有显示我的任何数据 代码: '正在查询未包含的数据和其他代码 Dim rds As ReportDataSource = New ReportDataSource("DataSet1", ds.Tables("Data

Vb.net 数据网格中的按钮列

我有一个网格,第一列是每行的一个按钮,带有Excluir(“Delete”) 当我点击按钮时,我需要恢复按钮操作以及它被点击的行,我正在尝试,但不起作用 Private Sub dgAdm_CellClick(ByVal sender As System.Object, ByVal e As DataGridViewCellEventArgs) IF e.ColumnIndex = dgAdm.Columns["Delete"].Index AndAlso e.RowIndex &

VB.NET图表中显示的红色X

我有计算坦克上多个点的应力的代码,然后将这些应力绘制在图表上。我将毫无问题地查看图表,突然,图表显示红色X,我需要关闭程序再次查看压力结果 我知道我的代码中没有bug。没有抛出异常。有什么建议吗 Public Sub Graph(Curves) 'Creates the Graphs crtStressData.Series.Clear() crtStressData.Legends.Clear() 'Dimension arrays for data poin

Vb.net Crystal报表页脚未打印

使用VB.Net 2012和Crystal报表 页面底部未打印节页脚 我已将页面大小设置为信封大小,以便在信封上打印 我知道我的设置必须正确 我根据以前在vb.NET2003中制作的crystal报告进行了更新,该报告运行良好 我量了一下信封,信封上不应该有印刷品。 该节未被抑制或包含空白信息 需要进入“打印选项”并检查“无打印机”和“取消打印纸张大小” 您应该检查并重试。我们总是很乐意帮助和支持新的编码人员,但您需要首先帮助自己。:-)如果您有问题,请发布您尝试过的内容,并清楚地解释哪些内容不

Vb.net 如何从文本框中显示名称?

我在猜一个词。 在第一种形式中,我有两个用于球员姓名的文本框: 所以接下来我想在表格上显示球员1的名字,他写的名字 谢谢你的帮助!:我做到了:D 我用以下内容创建了一个类: 公共共享的另存名称为String=Nothing 在文本框1中,我使用了以下代码: Class1.savedname=TextBox1.Text 在加载我想要显示的名称的表单时,我编码: Label1.Text=Class1.savedname 谢谢 到目前为止你都试了些什么。你的代码在哪里?像这样做,以后在你想使用的地

Vb.net 如何放大(字符串)列表(字节)

我有一个变量队列,在其中我从流中写入信息。变量按如下方式启动: Public Shared Queue As List(Of String) = New List(Of String)(1024) 读取流的代码是 Public Shared Sub ReadStreamForever(ByVal stream As Stream) Dim encoder = New UTF8Encoding() Dim buffer = New Byte(2047) {} Dim co

如何在vb.net窗体中禁用GroupBox中的所有文本框

我有一个vb.net表单,其中添加了一个GroupBox,包括10个文本框。我想在加载时禁用9个文本框,应该启用一个文本框。通常,您需要显示您尝试过的内容。下次请这样做 创建要禁用的文本框数组。然后循环到数组,将每个框的enabled属性设置为False Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim boxes = {TextBox1, TextBox2} For

Vb.net 从另一个CSV文件为CSV文件赋值

我有两个csv文件,其中包含10辆车和15名司机的日历。目标是加入两个日历 Car.csv看起来像这样 Car 1;A Car 2;A Car 3;I Car 4;A Car 5;A Car 6;I Car 7;A Car 8;A Car 9;Y Car 10;A Driver 1;V Driver 2;V Driver 3;Y Driver 4;A Driver 5;A Driver 6;V Driver 7;A Driver 8;I Driver 9;I Driver 10;V Drive

VB.NET如何避免在将其捕获为热键时第一次按键?

我设法让我的应用程序捕获任何键以将其用作热键,但当我按下该键时,热键功能被激活。这就是我到目前为止所做的: Private Sub tmrFunc_Tick(sender As Object, e As EventArgs) Handles tmrFunc.Tick 'Function End Sub Private Sub tmrKey_Tick(sender As Object, e As EventArgs) Handles tmrKey.Tick 'Uses the hotke

  1    2   3   4   5   6  ... 下一页 最后一页 共 672 页