标签: vb.net-2010

我(VB.NET新手)正在对一个函数进行一些代码维护,这个函数有时会抛出异常"错误转换字符串"False"(或"True")到Integer类型." 我发现的东西与此相当

someVal是一个字符串,someFun1返回一个Integer,someFun2将一个Integer作为参数

...
someVal = someVal = someFun1()
...
someFun2(someVal)
...

我认为可能发生的是它试图将someFun1的返回值分配给someVal,然后执行bool检查someVal是否已经改变 - 但我不认为这是需要做的事情.

我的问题是 - 这个双重赋值(someVal = someVal = someFun1())完成了我在VB.NET中不知道的任何事情吗？

另一个注意事项:我意识到有整数到字符串的隐式强制转换并返回整数,但这不应该导致任何问题,因为值应该始终保持一个数值(可以从Integer和String中隐式地来回转换) ,对吧？)不是对错 - 据我所知

如何从给定的字符串列表中选择任何随机字符串？例:

List1: banana, apple, pineapple, mango, dragon-fruit
List2: 10.2.0.212, 10.4.0.221, 10.2.0.223

当我调用一些函数如randomize(List1)= somevar时,它只会从该特定列表中获取任何字符串.somevar中的结果将是完全随机的.怎么做到呢？非常感谢你 :)

我是 Windows 桌面应用程序开发的新手。

我使用visual-studio 2010 创建了一个应用程序，其中我使用了一个表单进行数据输入。一种带有报表查看器控件和用于绘制报表的报表 (.rdlc) 文件的表单。

我的问题是我想让我的应用程序与 dot net framework 3.5 兼容。为此，我已将项目属性中的“高级编译选项...”中的目标框架更改为 3.5。但是在将目标框架更改为 3.5 后运行应用程序时出现错误是：

Could not load file or assembly 'System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a' or one of its dependencies. The system cannot find the file specified. Line 123, position 5. C:\Users\Amir\Desktop\Bill_System\Bill_System\Bill_System\My Project\Resources.resx Billing_System

如何解决这个错误？

请帮忙。提前致谢。

以前我是这样玩的

 My.Computer.Audio.Play(My.Resources.island, AudioPlayMode.BackgroundLoop)

但是由于不同的原因（比如：缺乏设置可能性），那还不够好，所以我换了Windows media player，但我不知道如何让声音在后台循环

嗨,请将以下代码行解释成英文吗？

"foo".TrimEnd(New Char(0  - 1) {})

我知道TrimEnd会做什么,但不知道Char位.

我正在尝试将 excel 文件保存到特定路径中。所以基本上，当我单击按钮时，我正在创建一个文件夹，并希望将文件保存在该文件夹中。创建的文件夹以当前月份为名称。我正在尝试保存到当前月份的文件夹中。

    'Create folder as Month Name. Save filename as date inside "month".
    Dim sDate As String = DateTime.Now.ToString("yyyy-MM-dd") & "_" & DateTime.Now.ToString("HH-mm-ss")
    Dim sMonth As String = DateTime.Now.ToString("MMMM")
    Dim sFolder = Application.StartupPath & "\Resources\Excel\"


    My.Computer.FileSystem.CreateDirectory(sFolder & Format(sMonth))

    Dim sfinal = Path.Combine(sFolder, sMonth)
    xlSh.SaveAs(sfinal & Format(sDate) & ".xlsx")

    xlApp.Workbooks.Close()
    xlApp.Quit()

事实上，这段代码没有给我任何错误。但不是创建一个名为“March”<-当前月份的文件夹并将其保存在其中，而是将文件保存在 \Excel\ 中，并且还在同一位置创建文件夹。

我的程序中有两个下拉框.从第一个下拉列表中选择项目时,它会在第二个下拉列表中填充可选项目.当我在第二个中选择某个内容然后在第一个中更改选择时,值保留在第二个中.如何在第一次更改时"重置"第二次下拉？

任何帮助都是极好的!

下拉是窗口形式.

示例代码:

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MessageBox.Show(Val(TextBox1.Text), "Val of text input")
    End Sub
End Class

无论如何出于简单的好奇心,我想知道为什么会这样做？

从其他一些帖子和个人经验我知道不推荐使用VAL(表达式),这只是VB6时代的遗留功能.我尝试了所有其他字母和没有引起这个问题,我也尝试了几个变化&它在d或e之后出现任何数字添加许多零(看起来像它的倍增).据我所知,该值可能会溢出数据类型VAL.我看到e是子过程的默认变量,所以这可能是原因,但我无法弄清楚d的任何逻辑.

请注意我是VB.NET的新手,刚刚开始上大学课程并且没有构建任何实际的应用程序.此外,我们的老师似乎没有告诉我们我非常感兴趣的错误处理,因为我目前的工作情况有一些相当旧的应用程序有问题.还要任何推荐的错误处理文章/读物

我有一个使用TableAdapter.

我只想将这些添加到DataGridView绑定某些列中。

我已经尝试了下面的代码来填充和绑定数据：

lAllBookings = (From r As DataRow In BookingsTableAdapter1.GetDataWithItems().Rows
                        Select New Booking With {.bookingID = r.Item("BookingID"), _
                                                 .itemID = r.Item("ItemID"), _
                                                 .bookedOutDate = r.Field(Of DateTime?)("BookedOutDate"), _
                                                 .bookedInDate = r.Field(Of DateTime?)("BookedInDate"), _
                                                 .identType = r.Item("IdentType"), _
                                                 .identString = r.Item("IdentString"), _
                                                 .image = r.Item("Image"), _
                                                 .complete = r.Item("Complete"), _
                                                 .notes = r.Item("Notes"), _
                                                 .itemName = r.Item("ItemName"), _
                                                 .itemBC = r.Item("ItemBarcode")}).ToList



        dgvBookings.Columns("BookingID").DataPropertyName = "bookingID"
        dgvBookings.Columns("ItemIdent").DataPropertyName = "itemName"
        dgvBookings.Columns("BookedOut").DataPropertyName = "bookedOutDate"
        dgvBookings.Columns("IdentString").DataPropertyName = "identString"


        dgvBookings.DataSource = lAllBookings

现在，当我这样做时，我得到了正确的行数，但所有字段都是空白的。 …

我正在使用下面的代码来调用On-Screen Keyboard(OSK)

Process.Start("C:\Windows\System32\OSK.EXE")

但正如你在下面看到的，我收到了一个错误。但如果我手动打开它，它工作正常。

可以调用OSK，但只能显示数字(0 - 9)