Imports GrapeCity.Web.Input.IMBalloonTip
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
' 数値コントロールを表示します
GcNumber1.Visible = True
' バルーンチップの内容を設定します。
Dim ti As New BalloonTipInfo
ti.Text = "テキストコントロールに設定する最大文字数を入力してください。"
ti.AutoClose = False
ti.Span = 0
ti.CustomControl = GcNumber1
' テキストコントロールにバルーンチップを表示します。
GcBalloonTip1.Show("GcTextBox1", ti)
Else
' バルーンチップ表示時以外は数値コントロールを非表示に設定します。
GcNumber1.Visible = False
End If
End Sub
Protected Sub GcNumber1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GcNumber1.TextChanged
' テキストコントロールの最大文字数を設定します。
GcTextBox1.MaxLength = GcNumber1.Integer
End Sub
using GrapeCity.Web.Input.IMBalloonTip;
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
// 数値コントロールを表示します
GcNumber1.Visible = true;
// バルーンチップの内容を設定します。
BalloonTipInfo ti = new BalloonTipInfo();
ti.Caption = "設定";
ti.Text = "テキストコントロールに設定する最大文字数を入力してください。";
ti.AutoClose = false;
ti.Span = 0;
ti.CustomControl = GcNumber1;
// テキストコントロールにバルーンチップを表示します。
GcBalloonTip1.Show("GcTextBox1", ti);
}
else{
// バルーンチップ表示時以外は数値コントロールを非表示に設定します。
GcNumber1.Visible = false;
}
}
protected void GcNumber1_TextChanged(object sender, EventArgs e)
{
// テキストコントロールの最大文字数を設定します。
GcTextBox1.MaxLength = (int)GcNumber1.Integer;
}