VB无法转换变量问题

来源：百度知道编辑：UC知道时间：2024/09/22 11:38:20

Public Class Form1

Dim a
Dim b
Dim c
Dim d
Dim h
Dim f
Dim g

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If a > 1000 Then
MsgBox("你想干嘛！图像够大了！" & a & b)
Else
a = a + 100
b = b + 100

PictureBox1.Width = b
PictureBox1.Height = a
c = PictureBox1.Height
d = PictureBox1.Width
Me.Width = d
Me.Height = c
Me.Text = "高" & c & "宽" & d

End If
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
PictureBox1.Visible = False
Button1.Visible = False
Button2.Visible = False

End Sub<

可以用Load方法加载图片

PictureBox1.Load(g)

在Visual Basic 2008中，这是一种方法，另外一个等效的代码是：

PictureBox1.Location = g
PictureBox1.Load()

晕，你拷贝这么多代码，一看就头晕了。请把报错的代码粗体一下，也好让大家都看到嘛。

PictureBox1.picture = loadpicture(g)
是这样吗？
不知道你文本框要写什么内容，要是你是想用 TextBox1.Text输入路径，TextBox2.Text输入文件名PictureBox1显示图像就是这样

建议你在定义g是写
Dim g As Variant
应该可以

VB 变量问题 vb变量问题 VB 的变量问题： vb声明变量问题 VB问题(声明一个变量) VB声明变量的问题 VB中变量的问题 VB定义变量数量问题关于VB变量声明问题 java文本转换变量问题