首页 > 解决方案 > 我的编码有问题吗?我还是新人

问题描述

我尝试运行这个程序,但总是出现错误:

从字符串“LBLBuku”到类型“Double”的转换无效。

If LBLBuku.Text >= 5 Or Val(LBLBuku.Text) + Val(TextBox1.Text) > 5 Then
    MsgBox("Peminjaman Melebihi")
Else
    If lbljudul.Text = "" Or TextBox1.Text = "" Then
        MsgBox("Silahkan isi Kode Buku")
    Else
        DataGridView1.Rows.Add(New String() {TextBox2.Text, lbljudul.Text, LBLPengarang.Text, LBLTahun.Text, TextBox2.Text})
        TextBox1.Text = ""
        TextBox2.Text = ""
        lbljudul.Text = ""
        TextBox2.Text = ""
        LBLPengarang.Text = ""
        LBLTahun.Text = ""
        Call rumustotalbuku()
    End If
End If

标签: vb.net

解决方案


请注意您的代码行

LBLBuku.Text >= 5

属性 Text 是 String 类型,您必须先将文本转换为整数类型,然后才能使用 ">="。


推荐阅读