대화 상자에서 데이터 테이블에 날짜 입력
사용자가 대화 상자에서 날짜를 입력한 후 데이터 테이블의 특정 행에 날짜를 입력하려고 합니다(예: 행 5). 이 작업을 수행하는 방법이 있습니까?
감사 해요
Names default to Here(1);
dt = New Table( "Untitled",
New Column( "Date 1", Numeric, "Continuous", Format( "yyyy-mm-dd", 12 )),
New Column( "Date 2", Numeric, "Continuous", Format( "yyyy-mm-dd", 12 )),
);
q = New Window( "Enter Dates", // Window for entering dates
Spacer Box( size(500, 30)),
H List Box(
Spacer Box(Size(100, 10)),
V list box (
Spacer Box(Size(10, 15)),
Text Box("Enter Dates (yyyy-mm-dd)"),
Spacer Box(Size(10, 20)),
Text Box("Enter Date 1"),
Spacer Box(Size(10,10)),
fontobj = da = Number Edit box(),
da << Set Format( Format("yyyy-mm-dd", 12)),
da << Set (Date MDY ( 12, 31, 2000)),
Spacer Box(Size(10,10)),
Text Box("Enter Date 2"),
Spacer Box(Size(10,10)),
fontobj = db = Number Edit box(),
db << Set Format( Format("yyyy-mm-dd", 12)),
db << Set (Date MDY ( 12, 31, 2000)),
),
),
Button Box( "Continue",
//code for adding dates to data table
q <<CLOSEWINDOW></CLOSEWINDOW>데이터 테이블스크립팅Re: 대화 상자에서 데이터 테이블에 날짜 입력다음은 날짜의 텍스트 입력과 날짜의 숫자 입력을 모두 처리하도록 코드를 수정한 것입니다.또한 채우기 전에 데이터 테이블에 행을 추가해야 합니다.
Names Default To Here( 1 );
dt = New Table( "Untitled",
New Column( "Date 1", Numeric, "Continuous", Format( "yyyy-mm-dd", 12 ) ),
New Column( "Date 2", Numeric, "Continuous", Format( "yyyy-mm-dd", 12 ) ),
);
dt << add rows( 1 );
q = New Window( "Enter Dates", // Window for entering dates
Spacer Box( size( 500, 30 ) ),
H List Box(
Spacer Box( Size( 100, 10 ) ),
V List Box(
Spacer Box( Size( 10, 15 ) ),
Text Box( "Enter Dates (yyyy-mm-dd)" ),
Spacer Box( Size( 10, 20 ) ),
Text Box( "Enter Date 1" ),
Spacer Box( Size( 10, 10 ) ),
fontobj = da = Number Edit Box(),
da << Set Format( Format( "yyyy-mm-dd", 12 ) ),
da << Set( Date MDY( 12, 31, 2000 ) ),
Spacer Box( Size( 10, 10 ) ),
Text Box( "Enter Date 2" ),
Spacer Box( Size( 10, 10 ) ),
fontobj2 = db2 = Number Edit Box(),
db2 << Set Format( Format( "yyyy-mm-dd", 12 ) ),
db2 << Set( Date MDY( 12, 31, 2000 ) ),
),
),
Button Box( "Continue",
dt:Date1[1] = da << get;
dt:Date2[1] = Informat( db2 << get text, "yyyy-mm-dd" );
//code for adding dates to data table
q << closewindow;
)
);
Re: 대화 상자에서 데이터 테이블에 날짜 입력감사 해요!