Private Sub downloadimg_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim updatepic As String = "www.domainname.com/" & TextBox3.Text
End Sub
Private Sub imgshow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' ผมต้องการให้สามารถเรียกค่า updatepic มาที่นี้ได้อ่ะครับ
End Sub
Private updatepic As String = Nothing
Private Sub downloadimg_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
updatepic = "www.domainname.com/" & TextBox3.Text
End Sub
Private Sub imgshow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' ผมต้องการให้สามารถเรียกค่า updatepic มาที่นี้ได้อ่ะครับ
End Sub
Imports System.Data.OleDb
Imports System.Data
Imports System.Data.SqlClient
Partial Class _Default
Inherits System.Web.UI.Page
Dim test As String = "" '<<< ประกาศไว้ตรงนี้เลยครับ